hexapdf 0.17.1 → 0.17.2

data/test/hexapdf/font/test_encoding.rb

@@ -0,0 +1,27 @@
+# -*- encoding: utf-8 -*-
+
+require 'test_helper'
+require 'hexapdf/font/encoding'
+
+describe HexaPDF::Font::Encoding do
+  describe "::for_name" do
+    it "returns nil if an unsupported encoding is given" do
+      assert_nil(HexaPDF::Font::Encoding.for_name(:some_unknown_encoding))
+    end
+
+    it "returns the requested encoding object" do
+      assert_kind_of(HexaPDF::Font::Encoding::WinAnsiEncoding,
+                     HexaPDF::Font::Encoding.for_name(:WinAnsiEncoding))
+      assert_kind_of(HexaPDF::Font::Encoding::MacRomanEncoding,
+                     HexaPDF::Font::Encoding.for_name(:MacRomanEncoding))
+      assert_kind_of(HexaPDF::Font::Encoding::StandardEncoding,
+                     HexaPDF::Font::Encoding.for_name(:StandardEncoding))
+      assert_kind_of(HexaPDF::Font::Encoding::MacExpertEncoding,
+                     HexaPDF::Font::Encoding.for_name(:MacExpertEncoding))
+      assert_kind_of(HexaPDF::Font::Encoding::SymbolEncoding,
+                     HexaPDF::Font::Encoding.for_name(:SymbolEncoding))
+      assert_kind_of(HexaPDF::Font::Encoding::ZapfDingbatsEncoding,
+                     HexaPDF::Font::Encoding.for_name(:ZapfDingbatsEncoding))
+    end
+  end
+end

data/test/hexapdf/font/test_invalid_glyph.rb

@@ -0,0 +1,34 @@
+# -*- encoding: utf-8 -*-
+
+require 'test_helper'
+require 'hexapdf/font/invalid_glyph'
+
+describe HexaPDF::Font::InvalidGlyph do
+  before do
+    font = Object.new
+    font.define_singleton_method(:missing_glyph_id) { 0 }
+    font.define_singleton_method(:full_name) { "Test Roman" }
+    @glyph = HexaPDF::Font::InvalidGlyph.new(font, "str")
+  end
+
+  it "returns the missing glyph id for id/name" do
+    assert_equal(0, @glyph.id)
+    assert_equal(0, @glyph.name)
+  end
+
+  it "returns 0 for all glyph dimensions" do
+    assert_equal(0, @glyph.x_min)
+    assert_equal(0, @glyph.x_max)
+    assert_equal(0, @glyph.y_min)
+    assert_equal(0, @glyph.y_max)
+  end
+
+  it "doesn't allow the application of word spacing" do
+    refute(@glyph.apply_word_spacing?)
+  end
+
+  it "can represent itself for debug purposes" do
+    assert_equal('#<HexaPDF::Font::InvalidGlyph font="Test Roman" id=0 "str">',
+                 @glyph.inspect)
+  end
+end

data/test/hexapdf/font/test_true_type_wrapper.rb

@@ -0,0 +1,186 @@
+# -*- encoding: utf-8 -*-
+
+require 'test_helper'
+require 'hexapdf/font/true_type_wrapper'
+require 'hexapdf/document'
+
+describe HexaPDF::Font::TrueTypeWrapper do
+  before do
+    @doc = HexaPDF::Document.new
+    @font_file = File.join(TEST_DATA_DIR, "fonts", "Ubuntu-Title.ttf")
+    @font = HexaPDF::Font::TrueType::Font.new(File.open(@font_file))
+    @cmap = @font[:cmap].preferred_table
+    @font_wrapper = HexaPDF::Font::TrueTypeWrapper.new(@doc, @font)
+  end
+
+  after do
+    @font.io.close
+  end
+
+  describe "initialize" do
+    it "fails if the TrueType font has no Unicode cmap table" do
+      @font[:cmap].tables.clear
+      assert_raises(HexaPDF::Error) { HexaPDF::Font::TrueTypeWrapper.new(@doc, @font) }
+    end
+  end
+
+  it "can be asked whether font wil be subset" do
+    assert(@font_wrapper.subset?)
+    refute(HexaPDF::Font::TrueTypeWrapper.new(@doc, @font, subset: false).subset?)
+  end
+
+  describe "decode_utf8" do
+    it "returns an array of glyph objects" do
+      assert_equal("Test",
+                   @font_wrapper.decode_utf8("Test").map {|g| @cmap.gid_to_code(g.id) }.pack('U*'))
+    end
+
+    it "invokes font.on_missing_glyph for UTF-8 characters for which no glyph exists" do
+      glyphs = @font_wrapper.decode_utf8("😁")
+      assert_equal(1, glyphs.length)
+      assert_kind_of(HexaPDF::Font::InvalidGlyph, glyphs.first)
+      assert_equal('' << 128_513, glyphs.first.str)
+    end
+  end
+
+  describe "glyph" do
+    it "returns the glyph object for the given id" do
+      glyph = @font_wrapper.glyph(17)
+      assert_equal(17, glyph.id)
+      assert_equal("0", glyph.str)
+      assert_equal(628, glyph.width)
+      assert_equal(47, glyph.x_min)
+      assert_equal(0, glyph.y_min)
+      assert_equal(584, glyph.x_max)
+      assert_equal(696, glyph.y_max)
+      refute(glyph.apply_word_spacing?)
+      assert_equal('#<HexaPDF::Font::TrueTypeWrapper::Glyph font="Ubuntu-Title" id=17 "0">',
+                   glyph.inspect)
+    end
+
+    it "invokes font.on_missing_glyph for missing glyphs" do
+      glyph = @font_wrapper.glyph(9999)
+      assert_kind_of(HexaPDF::Font::InvalidGlyph, glyph)
+      assert_equal(0, glyph.id)
+      assert_equal('' << 0xFFFD, glyph.str)
+    end
+  end
+
+  describe "encode" do
+    it "returns the encoded glyph ID for fonts that are subset" do
+      code = @font_wrapper.encode(@font_wrapper.glyph(3))
+      assert_equal([1].pack('n'), code)
+      code = @font_wrapper.encode(@font_wrapper.glyph(10))
+      assert_equal([2].pack('n'), code)
+    end
+
+    it "returns the encoded glyph ID for fonts that are not subset" do
+      @font_wrapper = HexaPDF::Font::TrueTypeWrapper.new(@doc, @font, subset: false)
+      code = @font_wrapper.encode(@font_wrapper.glyph(3))
+      assert_equal([3].pack('n'), code)
+      code = @font_wrapper.encode(@font_wrapper.glyph(10))
+      assert_equal([10].pack('n'), code)
+    end
+
+    it "raises an error if an InvalidGlyph is encoded" do
+      assert_raises(HexaPDF::Error) { @font_wrapper.encode(@font_wrapper.glyph(9999)) }
+    end
+  end
+
+  describe "creates the necessary PDF dictionaries" do
+    it "with fonts that are subset" do
+      @font_wrapper.encode(@font_wrapper.glyph(3))
+      glyph = @font_wrapper.decode_utf8('H').first
+      @font_wrapper.encode(glyph)
+      @doc.dispatch_message(:complete_objects)
+
+      dict = @font_wrapper.pdf_object
+
+      # Checking the circular reference
+      assert_same(@font_wrapper, dict.font_wrapper)
+
+      # Checking Type 0 font dictionary
+      assert_equal(:Font, dict[:Type])
+      assert_equal(:Type0, dict[:Subtype])
+      assert_equal(:'Identity-H', dict[:Encoding])
+      assert_equal(1, dict[:DescendantFonts].length)
+      assert_equal(dict[:BaseFont], dict[:DescendantFonts][0][:BaseFont])
+      assert_equal(HexaPDF::Font::CMap.create_to_unicode_cmap([[1, ' '.ord], [2, 'H'.ord]]),
+                   dict[:ToUnicode].stream)
+      assert_match(/\A[A-Z]{6}\+Ubuntu-Title\z/, dict[:BaseFont])
+
+      # Checking CIDFont dictionary
+      cidfont = dict[:DescendantFonts][0]
+      assert_equal(:Font, cidfont[:Type])
+      assert_equal(:CIDFontType2, cidfont[:Subtype])
+      assert_equal({Registry: "Adobe", Ordering: "Identity", Supplement: 0},
+                   cidfont[:CIDSystemInfo].value)
+      assert_equal(:Identity, cidfont[:CIDToGIDMap])
+      assert_equal(@font_wrapper.glyph(3).width, cidfont[:DW])
+      assert_equal([2, [glyph.width]], cidfont[:W].value)
+      assert(cidfont.validate)
+
+      # Checking font descriptor
+      fd = cidfont[:FontDescriptor]
+      assert_equal(dict[:BaseFont], fd[:FontName])
+      assert(fd.flagged?(:symbolic))
+      assert(fd.key?(:FontFile2))
+      assert(fd.validate)
+
+      # Two special cases for determining cap height and x-height
+      @cmap.stub(:[], nil) do
+        @font[:'OS/2'].typo_ascender = 1000
+        font_wrapper = HexaPDF::Font::TrueTypeWrapper.new(@doc, @font)
+        font_wrapper.encode(glyph)
+        fd = font_wrapper.pdf_object[:DescendantFonts][0][:FontDescriptor]
+        assert_equal(800, fd[:CapHeight])
+        assert_equal(500, fd[:XHeight])
+      end
+
+      @font[:'OS/2'].version = 2
+      @font[:'OS/2'].x_height = 500 * @font[:head].units_per_em / 1000
+      @font[:'OS/2'].cap_height = 1000 * @font[:head].units_per_em / 1000
+      font_wrapper = HexaPDF::Font::TrueTypeWrapper.new(@doc, @font)
+      font_wrapper.encode(glyph)
+      fd = font_wrapper.pdf_object[:DescendantFonts][0][:FontDescriptor]
+      assert_equal(1000, fd[:CapHeight])
+      assert_equal(500, fd[:XHeight])
+    end
+
+    it "with fonts that are not subset (only differences to other case)" do
+      @font_wrapper = HexaPDF::Font::TrueTypeWrapper.new(@doc, @font, subset: false)
+      @font_wrapper.encode(@font_wrapper.glyph(3))
+      glyph = @font_wrapper.decode_utf8('H').first
+      @font_wrapper.encode(glyph)
+      @doc.dispatch_message(:complete_objects)
+
+      dict = @font_wrapper.pdf_object
+
+      assert_equal(HexaPDF::Font::CMap.create_to_unicode_cmap([[3, ' '.ord], [glyph.id, 'H'.ord]]),
+                   dict[:ToUnicode].stream)
+      assert_equal([glyph.id, [glyph.width]], dict[:DescendantFonts][0][:W].value)
+    end
+  end
+
+  describe "font file embedding" do
+    it "embeds subset fonts" do
+      @font_wrapper.encode(@font_wrapper.glyph(10))
+      @doc.dispatch_message(:complete_objects)
+
+      font_data = @font_wrapper.pdf_object[:DescendantFonts][0][:FontDescriptor][:FontFile2].stream
+      font = HexaPDF::Font::TrueType::Font.new(StringIO.new(font_data))
+      assert_equal(@font[:glyf][0].raw_data, font[:glyf][0].raw_data)
+      assert_equal(@font[:glyf][10].raw_data, font[:glyf][1].raw_data)
+    end
+
+    it "embeds full fonts" do
+      @font_wrapper = HexaPDF::Font::TrueTypeWrapper.new(@doc, @font, subset: false)
+      @doc.dispatch_message(:complete_objects)
+
+      assert_equal(File.size(@font_file),
+                   @font_wrapper.pdf_object[:DescendantFonts][0][:FontDescriptor][:FontFile2][:Length1])
+      assert_equal(File.binread(@font_file),
+                   @font_wrapper.pdf_object[:DescendantFonts][0][:FontDescriptor][:FontFile2].stream)
+    end
+  end
+end

data/test/hexapdf/font/test_type1_wrapper.rb

@@ -0,0 +1,107 @@
+# -*- encoding: utf-8 -*-
+
+require 'test_helper'
+require_relative 'type1/common'
+require 'hexapdf/font/type1_wrapper'
+require 'hexapdf/document'
+
+describe HexaPDF::Font::Type1Wrapper do
+  before do
+    @doc = HexaPDF::Document.new
+    @times_wrapper = HexaPDF::Font::Type1Wrapper.new(@doc, FONT_TIMES)
+    @symbol_wrapper = HexaPDF::Font::Type1Wrapper.new(@doc, FONT_SYMBOL)
+  end
+
+  it "can be used with an existing PDF object" do
+    font = @doc.add({Type: :Font, Subtype: :Type1, Encoding: {Differences: [65, :B]},
+                     BaseFont: :"Times-Roman"})
+    wrapper = HexaPDF::Font::Type1Wrapper.new(@doc, FONT_TIMES, pdf_object: font)
+    assert_equal([:B, :E, :A, :S, :T], wrapper.decode_utf8("BEAST").map(&:name))
+    assert_equal("A", wrapper.encode(wrapper.glyph(:A)))
+    assert_equal("A", wrapper.encode(wrapper.glyph(:B)))
+  end
+
+  it "returns 1 for the scaling factor" do
+    assert_equal(1, @times_wrapper.scaling_factor)
+  end
+
+  describe "decode_utf8" do
+    it "returns an array of glyph objects" do
+      assert_equal([:T, :e, :s, :t], @times_wrapper.decode_utf8("Test").map(&:name))
+    end
+
+    it "falls back to the internal font encoding if the Unicode codepoint is not mapped" do
+      assert_equal([:Delta, :Delta], @symbol_wrapper.decode_utf8("D∆").map(&:name))
+    end
+
+    it "UTF-8 characters for which no glyph name exists, are mapped to InvalidGlyph objects" do
+      glyphs = @times_wrapper.decode_utf8("😁")
+      assert_equal(1, glyphs.length)
+      assert_kind_of(HexaPDF::Font::InvalidGlyph, glyphs.first)
+      assert_equal('' << 128_513, glyphs.first.str)
+    end
+  end
+
+  describe "glyph" do
+    it "returns the glyph object for the given name" do
+      glyph = @times_wrapper.glyph(:A)
+      assert_equal(:A, glyph.name)
+      assert_equal("A", glyph.str)
+      assert_equal(722, glyph.width)
+      assert_equal(15, glyph.x_min)
+      assert_equal(0, glyph.y_min)
+      assert_equal(706, glyph.x_max)
+      assert_equal(674, glyph.y_max)
+      refute(glyph.apply_word_spacing?)
+      assert_equal('#<HexaPDF::Font::Type1Wrapper::Glyph font="Times Roman" id=:A "A">',
+                   glyph.inspect)
+    end
+
+    it "invokes font.on_missing_glyph for missing glyphs" do
+      glyph = @times_wrapper.glyph(:ffi)
+      assert_kind_of(HexaPDF::Font::InvalidGlyph, glyph)
+      assert_equal(:'.notdef', glyph.name)
+      assert_equal('ffi', glyph.str)
+    end
+  end
+
+  describe "encode" do
+    describe "uses WinAnsiEncoding as initial encoding for non-symbolic fonts" do
+      it "returns the PDF font dictionary using WinAnsiEncoding and encoded glyph" do
+        code = @times_wrapper.encode(@times_wrapper.glyph(:a))
+        @doc.dispatch_message(:complete_objects)
+        assert_equal("a", code)
+        assert_equal(:WinAnsiEncoding, @times_wrapper.pdf_object[:Encoding])
+      end
+
+      it "fails if an InvalidGlyph is encoded" do
+        assert_raises(HexaPDF::Error) { @times_wrapper.encode(@times_wrapper.glyph(:ffi)) }
+      end
+
+      it "fails if the encoding does not support the given glyph" do
+        assert_raises(HexaPDF::Error) { @times_wrapper.encode(@times_wrapper.glyph(:uring)) }
+      end
+    end
+
+    it "uses the font's internal encoding for fonts with the Special character set" do
+      code = @symbol_wrapper.encode(@symbol_wrapper.glyph(:plus))
+      @doc.dispatch_message(:complete_objects)
+      assert_equal("+", code)
+      assert_nil(@symbol_wrapper.pdf_object[:Encoding])
+    end
+
+    it "uses an empty encoding as initial encoding if a custom encoding is needed" do
+      wrapper = HexaPDF::Font::Type1Wrapper.new(@doc, FONT_TIMES, custom_encoding: true)
+      code = wrapper.encode(wrapper.glyph(:plus))
+      @doc.dispatch_message(:complete_objects)
+      assert_equal("\x21", code)
+      assert_equal({Differences: [32, :space, :plus]}, wrapper.pdf_object[:Encoding].value)
+    end
+  end
+
+  describe "creates the necessary PDF dictionaries" do
+    it "sets the circular reference" do
+      assert_same(@times_wrapper, @times_wrapper.pdf_object.font_wrapper)
+    end
+  end
+end

data/test/hexapdf/font/true_type/common.rb

@@ -0,0 +1,17 @@
+# -*- encoding: utf-8 -*-
+
+require 'hexapdf/font/true_type/table'
+
+module TestHelper
+
+  class TrueTypeTestTable < HexaPDF::Font::TrueType::Table
+
+    attr_reader :data
+
+    def parse_table
+      @data = io.read(directory_entry.length)
+    end
+
+  end
+
+end

data/test/hexapdf/font/true_type/table/common.rb

@@ -0,0 +1,27 @@
+# -*- encoding: utf-8 -*-
+
+require 'test_helper'
+require 'stringio'
+require 'hexapdf/font/true_type'
+
+module TestHelper
+
+  def set_up_stub_true_type_font(initial_data = ''.b, register_vars: true)
+    font = Object.new
+    font.define_singleton_method(:io) { @io ||= StringIO.new(initial_data) }
+    font.define_singleton_method(:config) { @config ||= {} }
+    entry = HexaPDF::Font::TrueType::Table::Directory::Entry.new('mock', 0, 0, initial_data.length)
+    @font, @entry = font, entry if register_vars
+    [font, entry]
+  end
+
+  def create_table(name, data = nil, standalone: false)
+    font, entry = !standalone ? [@font, @entry] : set_up_stub_true_type_font(register_vars: false)
+    if data
+      font.io.string = data
+      entry.length = font.io.length
+    end
+    HexaPDF::Font::TrueType::Table.const_get(name).new(font, entry)
+  end
+
+end

data/test/hexapdf/font/true_type/table/test_cmap.rb

@@ -0,0 +1,47 @@
+# -*- encoding: utf-8 -*-
+
+require 'test_helper'
+require_relative 'common'
+require 'hexapdf/font/true_type/table/cmap'
+
+describe HexaPDF::Font::TrueType::Table::Cmap do
+  before do
+    f0 = [0, 262, 0].pack('n3') + (0..255).to_a.pack('C*')
+    data = [0, 3].pack('n2') << [
+      [0, 1, 28],
+      [3, 1, 28 + f0.length],
+      [1, 0, 28],
+    ].map {|a| a.pack('n2N') }.join('') << f0 << [10, 22, 0, 0, 2, 10, 13].pack('nN2N2n2')
+    set_up_stub_true_type_font(data)
+  end
+
+  describe "initialize" do
+    it "reads the data from the associated file" do
+      table = create_table(:Cmap)
+      assert_equal(0, table.version)
+      assert_equal(3, table.tables.length)
+    end
+
+    it "ignores unknown subtable when the config option is set to :ignore" do
+      table = create_table(:Cmap, [0, 1].pack('n2') << [3, 1, 12].pack('n2N') << "\x00\x03")
+      assert_equal(0, table.tables.length)
+    end
+
+    it "raises an error when an unsupported subtable is found and the option is set to :raise" do
+      data = [0, 1].pack('n2') << [3, 1, 12].pack('n2N') << "\x00\x03"
+      @font.config['font.true_type.unknown_format'] = :raise
+      assert_raises(HexaPDF::Error) { create_table(:Cmap, data) }
+    end
+
+    it "loads data from subtables with identical offsets only once" do
+      table = create_table(:Cmap)
+      assert_same(table.tables[0].gid_map, table.tables[2].gid_map)
+      refute_same(table.tables[0].gid_map, table.tables[1].gid_map)
+    end
+  end
+
+  it "returns the preferred table" do
+    table = create_table(:Cmap)
+    assert_equal(table.tables[1], table.preferred_table)
+  end
+end

data/test/hexapdf/font/true_type/table/test_cmap_subtable.rb

@@ -0,0 +1,141 @@
+# -*- encoding: utf-8 -*-
+
+require 'test_helper'
+require 'stringio'
+require 'hexapdf/font/true_type/table/cmap_subtable'
+
+describe HexaPDF::Font::TrueType::Table::CmapSubtable do
+  before do
+    @klass = HexaPDF::Font::TrueType::Table::CmapSubtable
+  end
+
+  describe "initialize" do
+    it "uses default values" do
+      t = @klass.new(3, 1)
+      assert_equal(3, t.platform_id)
+      assert_equal(1, t.encoding_id)
+      assert_nil(t.format)
+      assert_equal(0, t.language)
+    end
+  end
+
+  describe "unicode?" do
+    it "identifies (0,x), (3,1) and (3,10) as unicode" do
+      assert(@klass.new(0, 1).unicode?)
+      assert(@klass.new(0, 5).unicode?)
+      assert(@klass.new(3, 1).unicode?)
+      assert(@klass.new(3, 10).unicode?)
+      refute(@klass.new(1, 0).unicode?)
+      refute(@klass.new(3, 0).unicode?)
+    end
+  end
+
+  describe "inspect" do
+    it "can represent itself nicely" do
+      assert_equal("#<#{@klass.name} (3, 1, 0, nil)>", @klass.new(3, 1).inspect)
+    end
+  end
+
+  describe "parse" do
+    def table(data)
+      @klass.new(3, 1).tap {|obj| obj.parse(StringIO.new(data), 0) }
+    end
+
+    it "works for format 0" do
+      t = table([0, 262, 0].pack('n3') + [255].pack('C*') + (0..254).to_a.pack('C*'))
+      assert_equal(0, t.gid_to_code(255))
+      assert_equal(234, t.gid_to_code(233))
+
+      assert_equal(255, t[0])
+      assert_equal(233, t[234])
+      assert_nil(t[256])
+
+      assert_raises(HexaPDF::Error) { table([0, 20, 0].pack('n3') + "a" * 20)[0] }
+    end
+
+    it "works for format 2" do
+      f2 = ([0, 8] + [0] * 254).pack('n*') + \
+        [[0, 256, 0, 2 + 8], [0x33, 3, 5, 2 + 256 * 2]].map {|a| a.pack('n2s>n') }.join('') + \
+        ((0..255).to_a + [35, 65534, 0]).pack('n*')
+      t = table([2, f2.length + 6, 0].pack('n3') << f2)
+      assert_nil(t[0x0132])
+      assert_equal(40, t[0x0133])
+      assert_equal(3, t[0x0134])
+      assert_nil(t[0x0135])
+      assert_nil(t[0x0136])
+      assert_equal(16, t[0x1036])
+      assert_nil(t[0xfffff])
+
+      assert_equal(0x0133, t.gid_to_code(40))
+      assert_equal(0x0134, t.gid_to_code(3))
+      assert_equal(16, t.gid_to_code(16))
+    end
+
+    it "works for format 4" do
+      f4 = [6, 8, 2, 4,  35, 134, 65535, 0, 30, 133, 65535, 100, 110, 120,
+            0, 6, 2, 65500, 0, 1].pack('n*')
+      t = table([4, f4.length + 6, 0].pack('n3') << f4)
+      assert_nil(t[25])
+      assert_equal(130, t[30])
+      assert_equal(133, t[33])
+      assert_equal(135, t[35])
+      assert_nil(t[36])
+      assert_nil(t[133])
+      assert_equal(111, t[134])
+      assert_equal(84, t[65535])
+      assert_nil(t[70000])
+
+      assert_equal(30, t.gid_to_code(130))
+      assert_equal(33, t.gid_to_code(133))
+      assert_equal(35, t.gid_to_code(135))
+      assert_equal(134, t.gid_to_code(111))
+      assert_equal(65535, t.gid_to_code(84))
+    end
+
+    it "works for format 4 with invalid 0xffff entry" do
+      f4 = [2, 0, 0, 0, 65535, 0, 65535, 0, 32767].pack('n*')
+      t = table([4, f4.length + 6, 0].pack('n3') << f4)
+      assert_nil(t[65535])
+      assert_equal(65535, t.gid_to_code(0))
+    end
+
+    it "works for format 6" do
+      t = table(([6, 30, 0, 1024, 10] + (1..10).to_a).pack('n*'))
+      assert_nil(t[0])
+      assert_equal(1, t[1024])
+      assert_equal(7, t[1030])
+      assert_equal(10, t[1033])
+      assert_nil(t[1034])
+
+      assert_equal(1033, t.gid_to_code(10))
+    end
+
+    it "works for format 10" do
+      t = table([10, 0].pack('n2') + [40, 0, 1024, 10].pack('N*') + (1..10).to_a.pack('n*'))
+      assert_nil(t[234])
+      assert_equal(1, t[1024])
+      assert_equal(7, t[1030])
+      assert_equal(10, t[1033])
+      assert_nil(t[1034])
+
+      assert_equal(1033, t.gid_to_code(10))
+    end
+
+    it "works for format 12" do
+      t = table([12, 0].pack('n2') + [40, 0, 2, 35, 38, 1000, 70000, 90000, 80000].pack('N*'))
+      assert_nil(t[30])
+      assert_equal(1000, t[35])
+      assert_equal(1003, t[38])
+      assert_equal(100_000, t[90_000])
+      assert_nil(t[90_001])
+
+      assert_equal(35, t.gid_to_code(1000))
+      assert_equal(38, t.gid_to_code(1003))
+      assert_equal(90_000, t.gid_to_code(100_000))
+    end
+
+    it "returns false if a format is not supported" do
+      refute(@klass.new(3, 1).parse(StringIO.new("\x00\x03".b), 0))
+    end
+  end
+end

data/test/hexapdf/font/true_type/table/test_directory.rb

@@ -0,0 +1,30 @@
+# -*- encoding: utf-8 -*-
+
+require 'test_helper'
+require 'hexapdf/font/true_type/table/directory'
+
+describe HexaPDF::Font::TrueType::Table::Directory do
+  before do
+    io = StringIO.new("TEST\x00\x01\x00\x00\x00\x00\x00\x00" \
+                      "CUST----\x00\x00\x00\x1C\x00\x00\x00\x05ENTRY".b)
+    @file = Object.new
+    @file.define_singleton_method(:io) { io }
+    @self_entry = HexaPDF::Font::TrueType::Table::Directory::SELF_ENTRY
+  end
+
+  it "has a dummy entry referring to itself" do
+    assert_equal(0, @self_entry.offset)
+    assert_equal(12, @self_entry.length)
+  end
+
+  describe "initialize" do
+    it "loads the table entries from the IO" do
+      dir = HexaPDF::Font::TrueType::Table::Directory.new(@file, @self_entry)
+      entry = dir.entry('CUST')
+      assert_equal('CUST', entry.tag)
+      assert_equal('----'.unpack1('N'), entry.checksum)
+      assert_equal(28, entry.offset)
+      assert_equal(5, entry.length)
+    end
+  end
+end

data/test/hexapdf/font/true_type/table/test_glyf.rb

@@ -0,0 +1,58 @@
+# -*- encoding: utf-8 -*-
+
+require 'test_helper'
+require_relative 'common'
+require 'hexapdf/font/true_type/table/glyf'
+
+describe HexaPDF::Font::TrueType::Table::Glyf do
+  before do
+    loca = Object.new
+    loca.define_singleton_method(:offsets) { @offsets ||= [] }
+    loca.define_singleton_method(:offset) {|i| @offsets[i] }
+    loca.define_singleton_method(:length) {|i| @offsets[i + 1] - @offsets[i] }
+    loca.offsets << 0 << 0
+    data = [1, -10, -20, 100, 150].pack('s>5')
+    loca.offsets << data.size
+    data << [-1, 10, 20, -100, -150].pack('s>5')
+    data << [0b00100000, 1, 20, 30].pack('n2C2')
+    data << [0b00101001, 2, 20, 30, 40].pack('n2n2n')
+    data << [0b01100001, 3, 20, 30, 40, 50].pack('n2n2n2')
+    data << [0b10100001, 4, 20, 30, 40, 50, 60, 70].pack('n2n2n4')
+    data << [0b00000000, 1, 20, 30].pack('n2C2')
+    loca.offsets << data.size
+    set_up_stub_true_type_font(data)
+    @font.define_singleton_method(:[]) {|_arg| loca }
+  end
+
+  describe "initialize" do
+    it "reads the data from the associated file" do
+      table = create_table(:Glyf)
+      glyph = table[0]
+      refute(glyph.compound?)
+      assert_equal(0, glyph.number_of_contours)
+      assert_equal(0, glyph.x_min)
+      assert_equal(0, glyph.y_min)
+      assert_equal(0, glyph.x_max)
+      assert_equal(0, glyph.y_max)
+
+      glyph = table[1]
+      refute(glyph.compound?)
+      assert_equal(1, glyph.number_of_contours)
+      assert_equal(-10, glyph.x_min)
+      assert_equal(-20, glyph.y_min)
+      assert_equal(100, glyph.x_max)
+      assert_equal(150, glyph.y_max)
+      assert_same(glyph, table[1])
+
+      glyph = table[2]
+      assert(glyph.compound?)
+      assert_equal(-1, glyph.number_of_contours)
+      assert_equal(10, glyph.x_min)
+      assert_equal(20, glyph.y_min)
+      assert_equal(-100, glyph.x_max)
+      assert_equal(-150, glyph.y_max)
+      assert_equal([1, 2, 3, 4, 1], glyph.components)
+      assert_equal([12, 18, 28, 40, 56], glyph.component_offsets)
+    end
+  end
+end