prawn 0.3.0 → 0.4.0

data/vendor/ttfunk/lib/ttfunk/table/glyf/compound.rb

@@ -0,0 +1,81 @@
+require 'ttfunk/reader'
+
+module TTFunk
+  class Table
+    class Glyf
+      class Compound
+        include Reader
+
+        ARG_1_AND_2_ARE_WORDS    = 0x0001
+        WE_HAVE_A_SCALE          = 0x0008
+        MORE_COMPONENTS          = 0x0020
+        WE_HAVE_AN_X_AND_Y_SCALE = 0x0040
+        WE_HAVE_A_TWO_BY_TWO     = 0x0080
+        WE_HAVE_INSTRUCTIONS     = 0x0100
+
+        attr_reader :raw
+        attr_reader :x_min, :y_min, :x_max, :y_max
+        attr_reader :glyph_ids
+
+        Component = Struct.new(:flags, :glyph_index, :arg1, :arg2, :transform)
+
+        def initialize(raw, x_min, y_min, x_max, y_max)
+          @raw = raw
+          @x_min, @y_min, @x_max, @y_max = x_min, y_min, x_max, y_max
+
+          # Because TTFunk only cares about glyphs insofar as they (1) provide
+          # a bounding box for each glyph, and (2) can be rewritten into a
+          # font subset, we don't really care about the rest of the glyph data
+          # except as a whole. Thus, we don't actually decompose the glyph
+          # into it's parts--all we really care about are the locations within
+          # the raw string where the component glyph ids are stored, so that
+          # when we rewrite this glyph into a subset we can rewrite the
+          # component glyph-ids so they are correct for the subset.
+
+          @glyph_ids = []
+          @glyph_id_offsets = []
+          offset = 10 # 2 bytes for each of num-contours, min x/y, max x/y
+
+          loop do
+            flags, glyph_id = @raw[offset, 4].unpack("n*")
+            @glyph_ids << glyph_id
+            @glyph_id_offsets << offset + 2
+
+            break unless flags & MORE_COMPONENTS != 0
+            offset += 4
+
+            if flags & ARG_1_AND_2_ARE_WORDS != 0
+              offset += 4
+            else
+              offset += 2
+            end
+
+            if flags & WE_HAVE_A_TWO_BY_TWO != 0
+              offset += 8
+            elsif flags & WE_HAVE_AN_X_AND_Y_SCALE != 0
+              offset += 4
+            elsif flags & WE_HAVE_A_SCALE != 0
+              offset += 2
+            end
+          end
+        end
+
+        def compound?
+          true
+        end
+
+        def recode(mapping)
+          result = @raw.dup
+          new_ids = glyph_ids.map { |id| mapping[id] }
+
+          new_ids.zip(@glyph_id_offsets).each do |new_id, offset|
+            result[offset, 2] = [new_id].pack("n")
+          end
+
+          return result
+        end
+      end
+    end
+  end
+end
+

data/vendor/ttfunk/lib/ttfunk/table/glyf/simple.rb

@@ -0,0 +1,37 @@
+require 'ttfunk/reader'
+
+module TTFunk
+  class Table
+    class Glyf
+      class Simple
+        attr_reader :raw
+        attr_reader :number_of_contours
+        attr_reader :x_min, :y_min, :x_max, :y_max
+
+        def initialize(raw, number_of_contours, x_min, y_min, x_max, y_max)
+          @raw = raw
+          @number_of_contours = number_of_contours
+          @x_min, @y_min = x_min, y_min
+          @x_max, @y_max = x_max, y_max
+
+          # Because TTFunk is, at this time, a library for simply pulling
+          # metrics out of font files, or for writing font subsets, we don't
+          # really care what the contours are for simple glyphs. We just
+          # care that we've got an entire glyph's definition. Also, a
+          # bounding box could be nice to know. Since we've got all that
+          # at this point, we don't need to worry about parsing the full
+          # contents of the glyph.
+        end
+
+        def compound?
+          false
+        end
+
+        def recode(mapping)
+          raw
+        end
+      end
+    end
+  end
+end
+

data/vendor/ttfunk/lib/ttfunk/table/head.rb

@@ -1,25 +1,44 @@
+require 'ttfunk/table'
+
 module TTFunk  
   class Table
     class Head < TTFunk::Table
-      def initialize(fh, font, info)
-        fh.pos = info[:offset]
-        data = fh.read(20)
-        @version, @font_revision, @check_sum_adjustment, @magic_number,
-        @flags, @units_per_em = data.unpack("N4n2")
-    
-        # skip dates
-        fh.read(16)
-    
-        data = fh.read(8)
-        @x_min, @y_min, @x_max, @y_max = data.unpack("n4").map { |e| to_signed(e) }
-    
-        data = fh.read(4)
-        @mac_style, @lowest_rec_ppem = data.unpack("n2")
-    
-        data = fh.read(6)
-        @font_direction_hint, @index_to_loc_format, @glyph_data_format =
-          data.unpack("n3")
+      attr_reader :version
+      attr_reader :font_revision
+      attr_reader :checksum_adjustment
+      attr_reader :magic_number
+      attr_reader :flags
+      attr_reader :units_per_em
+      attr_reader :created
+      attr_reader :modified
+      attr_reader :x_min
+      attr_reader :y_min
+      attr_reader :x_max
+      attr_reader :y_max
+      attr_reader :mac_style
+      attr_reader :lowest_rec_ppem
+      attr_reader :font_direction_hint
+      attr_reader :index_to_loc_format
+      attr_reader :glyph_data_format
+
+      def self.encode(head, loca)
+        table = head.raw
+        table[8,4] = "\0\0\0\0" # set checksum adjustment to 0 initially
+        table[-4,2] = [loca[:type]].pack("n") # set index_to_loc_format
+        return table
       end
+
+      private
+
+        def parse!
+          @version, @font_revision, @check_sum_adjustment, @magic_number,
+            @flags, @units_per_em, @created, @modified = read(36, "N4n2q2")
+      
+          @x_min, @y_min, @x_max, @y_max = read_signed(4)
+      
+          @mac_style, @lowest_rec_ppem, @font_direction_hint,
+            @index_to_loc_format, @glyph_data_format = read(10, "n*")
+        end
     end
   end
-end
+end

data/vendor/ttfunk/lib/ttfunk/table/hhea.rb

@@ -1,27 +1,41 @@
+require 'ttfunk/table'
+
 module TTFunk  
   class Table
     class Hhea < Table
-      def initialize(fh, font, info)
-        fh.pos = info[:offset]
-        @length = info[:length]
-        data   = fh.read(4)
-        @version = data.unpack("N")
-    
-        data = fh.read(6)
-        @ascent, @descent, @line_gap= data.unpack("n3").map {|e| to_signed(e) } 
-    
-        data = fh.read(2) 
-        @advance_width_max = data.unpack("n")
-    
-        data = fh.read(22)
-        @min_left_side_bearing, @min_right_side_bearing, @x_max_extent, 
-        @caret_slope_rise, @caret_slope_run,
-        @caret_offset, _, _, _, _, @metric_data_format =
-        data.unpack("n11").map {|e| to_signed(e) }
-    
-        data = fh.read(2)
-        @number_of_hmetrics = data.unpack("n").first
+      attr_reader :version
+      attr_reader :ascent
+      attr_reader :descent
+      attr_reader :line_gap
+      attr_reader :advance_width_max
+      attr_reader :min_left_side_bearing
+      attr_reader :min_right_side_bearing
+      attr_reader :x_max_extent
+      attr_reader :carot_slope_rise
+      attr_reader :carot_slope_run
+      attr_reader :metric_data_format
+      attr_reader :number_of_metrics
+
+      def self.encode(hhea, hmtx)
+        raw = hhea.raw
+        raw[-2,2] = [hmtx[:number_of_metrics]].pack("n")
+        return raw
       end
+
+      private
+
+        def parse!
+          @version = read(4, "N").first
+          @ascent, @descent, @line_gap = read_signed(3)
+          @advance_width_max = read(2, "n").first
+
+          @min_left_side_bearing, @min_right_side_bearing, @x_max_extent,
+            @carot_slope_rise, @carot_slope_run, @caret_offset,
+            reserved, reserved, reserved, reserved,
+            @metric_data_format = read_signed(11)
+
+          @number_of_metrics = read(2, "n").first
+        end
     end
   end
-end
+end

data/vendor/ttfunk/lib/ttfunk/table/hmtx.rb

@@ -1,20 +1,47 @@
+require 'ttfunk/table'
+
 module TTFunk  
   class Table 
     class Hmtx < Table
-      def initialize(fh, font, info)
-        fh.pos = info[:offset]
-        @values = []
-
-        font.hhea.number_of_hmetrics.times do
-          advance = fh.read(2).unpack("n").first
-          lsb     = to_signed(fh.read(2).unpack("n").first)
-          @values << [advance,lsb]
+      attr_reader :metrics
+      attr_reader :left_side_bearings
+      attr_reader :widths
+
+      def self.encode(hmtx, mapping)
+        metrics = mapping.keys.sort.map do |new_id|
+          metric = hmtx.for(mapping[new_id])
+          [metric.advance_width, metric.left_side_bearing]
         end
-    
-        lsb_count = font.hhea.number_of_hmetrics - font.maxp.num_glyphs
-        pattern = "n#{lsb_count}"
-        @lsb = fh.read(2*lsb_count).unpack(pattern).map { |e| to_signed(e) }
+
+        { :number_of_metrics => metrics.length,
+          :table => metrics.flatten.pack("n*") }
+      end
+
+      HorizontalMetric = Struct.new(:advance_width, :left_side_bearing)
+
+      def for(glyph_id)
+        @metrics[glyph_id] ||
+          HorizontalMetric.new(@metrics.last.advance_width,
+            @left_side_bearings[glyph_id - @metrics.length])
       end
+
+      private
+
+        def parse!
+          @metrics = []
+
+          file.horizontal_header.number_of_metrics.times do
+            advance = read(2, "n").first
+            lsb     = read_signed(1).first
+            @metrics.push HorizontalMetric.new(advance, lsb)
+          end
+
+          lsb_count = file.maximum_profile.num_glyphs - file.horizontal_header.number_of_metrics
+          @left_side_bearings = read_signed(lsb_count)
+
+          @widths = @metrics.map { |metric| metric.advance_width }
+          @widths += [@widths.last] * @left_side_bearings.length
+        end
     end
   end
-end
+end

data/vendor/ttfunk/lib/ttfunk/table/kern.rb

@@ -1,48 +1,79 @@
+require 'ttfunk/table'
+
 module TTFunk
   class Table
     class Kern < Table
-      def initialize(fh, font, info)
-        fh.pos = info[:offset]
-        data = fh.read(4)
-        @fh = fh
-        @version, @table_count = data.unpack("n2")
-        
-        @table_headers = {}
-        
-        @table_count.times do
-          version, length, coverage = fh.read(6).unpack("n3")
-          @table_headers[version] = { :length   => length, 
-                                      :coverage => coverage,
-                                      :format   => coverage >> 8 }
-        end   
-        
-        generate_subtables
+      attr_reader :version
+      attr_reader :tables
+
+      def self.encode(kerning, mapping)
+        return nil unless kerning.exists? && kerning.tables.any?
+        tables = kerning.tables.map { |table| table.recode(mapping) }.compact
+        return nil if tables.empty?
+
+        [0, tables.length, tables.join].pack("nnA*")
       end
-        
-      def generate_subtables
-        @sub_tables = {}
-        @table_headers.each do |version, data|
-          if data[:format].zero?
-            @sub_tables[0] = parse_subtable_format0
+
+      private
+
+        def parse!
+          @version, num_tables = read(4, "n*")
+          @tables = []
+
+          if @version == 1 # Mac OS X fonts
+            @version = (@version << 16) + num_tables
+            num_tables = read(4, "N").first
+            parse_version_1_tables(num_tables)
           else
-            warn "TTFunk does not support kerning tables of format #{data[:format]}"
+            parse_version_0_tables(num_tables)
           end
         end
-      end
-      
-      def parse_subtable_format0
-        sub_table = {}
-        pair_count, search_range, entry_selector, range_shift = @fh.read(8).unpack("n4")
-        
-        pair_count.times do
-          left, right = @fh.read(4).unpack("n2")
-          fword = to_signed(@fh.read(2).unpack("n").first)
-          sub_table[[left,right]] = fword
+
+        def parse_version_0_tables(num_tables)
+          # It looks like some MS fonts report their kerning subtable lengths
+          # wrong. In one case, the length was reported to be some 19366, and yet
+          # the table also claimed to hold 14148 pairs (each pair consisting of 6 bytes).
+          # You do the math!
+          #
+          # We're going to assume that the microsoft fonts hold only a single kerning
+          # subtable, which occupies the entire length of the kerning table. Worst
+          # case, we lose any other subtables that the font contains, but it's better
+          # than reading a truncated kerning table.
+          #
+          # And what's more, it appears to work. So.
+          version, length, coverage = read(6, "n*")
+          format = coverage >> 8
+
+          add_table format, :version => version, :length => length,
+            :coverage => coverage, :data => raw[10..-1],
+            :vertical => (coverage & 0x1 == 0),
+            :minimum => (coverage & 0x2 != 0),
+            :cross => (coverage & 0x4 != 0),
+            :override => (coverage & 0x8 != 0)
+        end
+
+        def parse_version_1_tables(num_tables)
+          num_tables.times do
+            length, coverage, tuple_index = read(8, "Nnn")
+            format = coverage & 0x0FF
+
+            add_table format, :length => length, :coverage => coverage,
+              :tuple_index => tuple_index, :data => io.read(length-8),
+              :vertical => (coverage & 0x8000 != 0),
+              :cross => (coverage & 0x4000 != 0),
+              :variation => (coverage & 0x2000 != 0)
+          end
+        end
+
+        def add_table(format, attributes={})
+          if format == 0
+            @tables << Kern::Format0.new(attributes)
+          else
+            # silently ignore unsupported kerning tables
+          end
         end
-        
-        return sub_table
-      end
-      
     end
   end
-end
+end
+
+require 'ttfunk/table/kern/format0'

data/vendor/ttfunk/lib/ttfunk/table/kern/format0.rb

@@ -0,0 +1,62 @@
+require 'ttfunk/reader'
+
+module TTFunk
+  class Table
+    class Kern
+      class Format0
+        include Reader
+
+        attr_reader :attributes
+        attr_reader :pairs
+
+        def initialize(attributes={})
+          @attributes = attributes
+
+          num_pairs, search_range, entry_selector, range_shift, *pairs =
+            attributes.delete(:data).unpack("n*")
+
+          @pairs = {}
+          num_pairs.times do |i|
+            break if i*3+2 > pairs.length # sanity check, in case there's a bad length somewhere
+            left = pairs[i*3]
+            right = pairs[i*3+1]
+            value = to_signed(pairs[i*3+2])
+            @pairs[[left, right]] = value
+          end
+        end
+
+        def vertical?
+          @attributes[:vertical]
+        end
+
+        def horizontal?
+          !vertical?
+        end
+
+        def cross_stream?
+          @attributes[:cross]
+        end
+
+        def recode(mapping)
+          subset = []
+          pairs.each do |(left, right), value|
+            if mapping[left] && mapping[right]
+              subset << [mapping[left], mapping[right], value]
+            end
+          end
+
+          return nil if subset.empty?
+
+          num_pairs = subset.length
+          search_range = 2 * 2 ** (Math.log(num_pairs) / Math.log(2)).to_i
+          entry_selector = (Math.log(search_range / 2) / Math.log(2)).to_i
+          range_shift = (2 * num_pairs) - search_range
+
+          [attributes[:version], num_pairs * 6 + 14, attributes[:coverage],
+            num_pairs, search_range, entry_selector, range_shift, subset].
+            flatten.pack("n*")
+        end
+      end
+    end
+  end
+end