fontina 0.1.0

data/lib/fontina/formats/open_type/constants.rb

@@ -0,0 +1,79 @@
+module Fontina::Formats
+  
+  module OpenType
+    OT_VERSION = 0x4f54544f  # OTTO
+    TT_VERSION = 0x00010000
+
+    FW_NORMAL = 400
+    FW_BOLD   = 700
+  
+    PLATFORMS = {
+      0 => :unicode,
+      1 => :mac,
+      3 => :windows,
+    }.freeze
+  
+    ENCODINGS = {
+      unicode: {
+         0 => :unicode_1_0,
+         1 => :unicode_1_1,
+         3 => :unicode_2_0_bmp,
+         4 => :unicode_2_0,
+      }.freeze,
+  
+      mac: {
+         0 => :roman,
+         1 => :japanese,
+         2 => :chinese_traditional,
+         3 => :korean,
+         4 => :arabic,
+         5 => :hebrew,
+         6 => :greek,
+         7 => :russian,
+         8 => :r_symbol,
+         9 => :devanagari,
+        10 => :gurmukhi,
+        11 => :gujarati,
+        12 => :oriya,
+        13 => :bengali,
+        14 => :tamil,
+        15 => :telugu,
+        16 => :kannada,
+        17 => :malayalam,
+        18 => :sinhalese,
+        19 => :burmese,
+        20 => :khmer,
+        21 => :thai,
+        22 => :laotian,
+        23 => :georgian,
+        24 => :armenian,
+        25 => :chinese_simplified,
+        26 => :tibetan,
+        27 => :mongolian,
+        28 => :geez,
+        29 => :slavic,
+        30 => :vietnamese,
+        31 => :sindhi,
+        32 => :uninterpreted,
+      }.freeze,
+  
+      windows: {
+         0 => :symbol,
+         1 => :unicode_ucs2_bmp,
+         2 => :shift_jis,
+         3 => :prc,
+         4 => :big5,
+         5 => :wansung,
+         6 => :johab,
+        10 => :unicode_ucs4,
+      }.freeze,
+    }.freeze
+  
+    LANGUAGES = {
+      unicode: { 0 => nil }.freeze,
+      mac: { 0xffff => nil }.merge!(Shared::LanguageCodes::MAC).freeze,
+      windows: Shared::LanguageCodes::WINDOWS,
+    }.freeze
+  end
+
+end

data/lib/fontina/formats/open_type/container.rb

@@ -0,0 +1,10 @@
+module Fontina::Formats::OpenType
+
+  class OT_Container < BinData::Record
+    search_prefix :ot
+
+    offset_table :offset_table
+    table_directory :table_directory
+  end
+
+end

data/lib/fontina/formats/open_type/head_table.rb

@@ -0,0 +1,17 @@
+module Fontina::Formats::OpenType
+
+  class OT_HeadTable < BinData::Record
+    endian :big
+    hide :checksum_adjustment, :magic
+
+    uint16 :major_version
+    uint16 :minor_version
+    skip length: 4
+    uint32 :checksum_adjustment
+    uint32 :magic, assert: 0x5f0f3cf5
+    skip length: 28
+    uint16 :mac_style
+    skip length: 8
+  end
+
+end

data/lib/fontina/formats/open_type/name_table.rb

@@ -0,0 +1,34 @@
+module Fontina::Formats::OpenType
+
+  class OT_NameRecord < BinData::Record
+    endian :big
+    hide :len, :offs, :platform_id, :encoding_id, :language_id
+
+    uint16 :platform_id, assert: -> { PLATFORMS.key? value }
+    virtual :platform, initial_value: -> { PLATFORMS[platform_id] }
+    uint16 :encoding_id, assert: -> { ENCODINGS[platform.value].key? value }
+    virtual :encoding, initial_value: -> { ENCODINGS[platform.value][encoding_id] }
+    uint16 :language_id, assert: -> { LANGUAGES[platform.value].key? value }
+    virtual :language, initial_value: -> { LANGUAGES[platform.value][language_id] }
+    uint16 :name_id
+    uint16 :len
+    uint16 :offs
+
+    delayed_io :string, read_abs_offset: -> { addr + string_offs + offs } do
+      string length: :len
+    end
+  end
+
+  class OT_NameTable < BinData::Record
+    endian :big
+    search_prefix :ot
+    hide :name_count, :string_offs
+
+    uint16 :format
+    uint16 :name_count
+    uint16 :string_offs
+
+    array :names, type: :name_record, initial_length: :name_count
+  end
+
+end

data/lib/fontina/formats/open_type/offset_table.rb

@@ -0,0 +1,15 @@
+module Fontina::Formats::OpenType
+
+  class OT_OffsetTable < BinData::Record
+    endian :big
+    search_prefix :ot
+    hide :table_count
+
+    uint32 :version, assert: -> { [OT_VERSION, TT_VERSION].include? value }
+    uint16 :table_count
+    uint16 :search_range
+    uint16 :entry_selector
+    uint16 :range_shift
+  end
+
+end

data/lib/fontina/formats/open_type/os2_table.rb

@@ -0,0 +1,14 @@
+module Fontina::Formats::OpenType
+
+  class OT_OS2Table < BinData::Record
+    endian :big
+
+    uint16 :version
+    skip length: 2
+    uint16 :weight_class
+    skip length: 56
+    uint16 :fs_selection
+    skip length: 14
+  end
+
+end

data/lib/fontina/formats/open_type/table.rb

@@ -0,0 +1,15 @@
+module Fontina::Formats::OpenType
+
+  class OT_Table < BinData::Choice
+    search_prefix :ot
+
+    default_parameter selection: :tag
+
+    name_table 'name'
+    head_table 'head'
+    os2_table 'OS/2'
+
+    virtual :default
+  end
+
+end

data/lib/fontina/formats/open_type/table_directory.rb

@@ -0,0 +1,26 @@
+module Fontina::Formats::OpenType
+
+  class OT_TableDirectoryEntry < BinData::Record
+    endian :big
+    search_prefix :ot
+    hide :checksum
+
+    string :tag, length: 4
+    uint32 :checksum
+    uint32 :addr
+    uint32 :len
+
+    delayed_io :table, read_abs_offset: :addr do
+      buffer type: :table, length: :len
+    end
+  end
+
+  class OT_TableDirectory < BinData::Array
+    search_prefix :ot
+
+    default_parameter initial_length: -> { offset_table.table_count }
+
+    table_directory_entry
+  end
+
+end

data/lib/fontina/formats/open_type.rb

@@ -0,0 +1,77 @@
+module Fontina
+
+  module Formats::OpenType
+    extend Format
+    extension '.otf', '.ttf'
+
+    class << self
+      def read(io)
+        package container.read io
+      end
+
+      private
+
+      def container
+        @container ||= begin
+          %w[
+            shared/language_codes/mac
+            shared/language_codes/windows
+            open_type/constants
+            open_type/name_table
+            open_type/head_table
+            open_type/os2_table
+            open_type/table
+            open_type/table_directory
+            open_type/offset_table
+            open_type/container
+          ].each { |file| require_relative file }
+
+          Class.new(OT_Container) { auto_call_delayed_io }
+        end
+      end
+
+      def package(ot)
+        name_records = get_table(ot, 'name').names
+
+        Package[
+          name_records.find_all { |n| n.name_id == 4 }
+            .map { |n| QualifiedName[n.string, n.platform, n.language] },
+
+          [Font[
+            name_records.find_all { |n| n.name_id == 1 }
+              .map { |n| QualifiedName[n.string, n.platform, n.language] },
+            :vector,
+            nil,
+            *get_style(ot)
+          ]]
+        ]
+      end
+
+      def get_table(ot, tag)
+        entry = ot.table_directory.find { |t| t.tag == tag } and
+        entry.table
+      end
+
+      def get_style(ot)
+        get_table(ot, 'OS/2').tap do |t|
+          return [
+            t.weight_class,
+            t.fs_selection[0] == 1,
+            t.fs_selection[1] == 1,
+            t.fs_selection[4] == 1
+          ] if t
+        end
+
+        get_table(ot, 'head').tap do |t|
+          return [
+            t.mac_style[0] == 1 ? FW_BOLD : FW_NORMAL,
+            t.mac_style[1] == 1,
+            t.mac_style[2] == 1,
+            nil
+          ]
+        end
+      end
+    end
+  end
+
+end

data/lib/fontina/formats/shared/language_codes/mac.rb

@@ -0,0 +1,125 @@
+module Fontina::Formats::Shared::LanguageCodes
+
+  MAC = {
+      0 => 'en',
+      1 => 'fr',
+      2 => 'de',
+      3 => 'it',
+      4 => 'nl',
+      5 => 'sv',
+      6 => 'es',
+      7 => 'da',
+      8 => 'pt',
+      9 => 'no',
+     10 => 'he',
+     11 => 'ja',
+     12 => 'ar',
+     13 => 'fi',
+     14 => 'el',
+     15 => 'is',
+     16 => 'mt',
+     17 => 'tr',
+     18 => 'hr',
+     19 => 'zh',
+     20 => 'ur',
+     21 => 'hi',
+     22 => 'th',
+     23 => 'ko',
+     24 => 'lt',
+     25 => 'pl',
+     26 => 'hu',
+     27 => 'et',
+     28 => 'lv',
+     29 => 'smi',
+     30 => 'fo',
+     31 => 'fa',
+     32 => 'ru',
+     33 => 'zh',
+     34 => 'nl',
+     35 => 'ga',
+     36 => 'sq',
+     37 => 'ro',
+     38 => 'cs',
+     39 => 'sk',
+     40 => 'sl',
+     41 => 'yi',
+     42 => 'sr',
+     43 => 'mk',
+     44 => 'bg',
+     45 => 'uk',
+     46 => 'be',
+     47 => 'uz',
+     48 => 'kk',
+     49 => 'az',
+     50 => 'az',
+     51 => 'hy',
+     52 => 'ka',
+     53 => 'mo',
+     54 => 'ky',
+     55 => 'tg',
+     56 => 'tk',
+     57 => 'mn',
+     58 => 'mn',
+     59 => 'ps',
+     60 => 'ku',
+     61 => 'ks',
+     62 => 'sd',
+     63 => 'bo',
+     64 => 'ne',
+     65 => 'sa',
+     66 => 'mr',
+     67 => 'bn',
+     68 => 'as',
+     69 => 'gu',
+     70 => 'pa',
+     71 => 'or',
+     72 => 'ml',
+     73 => 'kn',
+     74 => 'ta',
+     75 => 'te',
+     76 => 'si',
+     77 => 'my',
+     78 => 'km',
+     79 => 'lo',
+     80 => 'vi',
+     81 => 'id',
+     82 => 'tl',
+     83 => 'ms',
+     84 => 'ms',
+     85 => 'am',
+     86 => 'ti',
+     87 => 'om',
+     88 => 'so',
+     89 => 'sw',
+     90 => 'rw',
+     91 => 'rn',
+     92 => 'ny',
+     93 => 'mg',
+     94 => 'eo',
+    128 => 'cy',
+    129 => 'eu',
+    130 => 'ca',
+    131 => 'la',
+    132 => 'qu',
+    133 => 'gn',
+    134 => 'ay',
+    135 => 'tt',
+    136 => 'ug',
+    137 => 'dz',
+    138 => 'jv',
+    139 => 'su',
+    140 => 'gl',
+    141 => 'af',
+    142 => 'br',
+    143 => 'iu',
+    144 => 'gd',
+    145 => 'gv',
+    146 => 'ga',
+    147 => 'to',
+    148 => 'el',
+    149 => 'kl',
+    150 => 'az',
+  }.tap { |x| x.freeze.each_value(&:freeze) }
+
+end
+

data/lib/fontina/formats/shared/language_codes/windows.rb

@@ -0,0 +1,211 @@
+module Fontina::Formats::Shared::LanguageCodes
+
+  WINDOWS = {
+    0x0401 => 'ar-SA',
+    0x0402 => 'bg-BG',
+    0x0403 => 'ca-ES',
+    0x0404 => 'zh-TW',
+    0x0405 => 'cs-CZ',
+    0x0406 => 'da-DK',
+    0x0407 => 'de-DE',
+    0x0408 => 'el-GR',
+    0x0409 => 'en-US',
+    0x040a => 'es-ES_tradnl',
+    0x040b => 'fi-FI',
+    0x040c => 'fr-FR',
+    0x040d => 'he-IL',
+    0x040e => 'hu-HU',
+    0x040f => 'is-IS',
+    0x0410 => 'it-IT',
+    0x0411 => 'ja-JP',
+    0x0412 => 'ko-KR',
+    0x0413 => 'nl-NL',
+    0x0414 => 'nb-NO',
+    0x0415 => 'pl-PL',
+    0x0416 => 'pt-BR',
+    0x0417 => 'rm-CH',
+    0x0418 => 'ro-RO',
+    0x0419 => 'ru-RU',
+    0x041a => 'hr-HR',
+    0x041b => 'sk-SK',
+    0x041c => 'sq-AL',
+    0x041d => 'sv-SE',
+    0x041e => 'th-TH',
+    0x041f => 'tr-TR',
+    0x0420 => 'ur-PK',
+    0x0421 => 'id-ID',
+    0x0422 => 'uk-UA',
+    0x0423 => 'be-BY',
+    0x0424 => 'sl-SI',
+    0x0425 => 'et-EE',
+    0x0426 => 'lv-LV',
+    0x0427 => 'lt-LT',
+    0x0428 => 'tg-Cyrl-TJ',
+    0x042a => 'vi-VN',
+    0x042b => 'hy-AM',
+    0x042c => 'az-Latn-AZ',
+    0x042d => 'eu-ES',
+    0x042e => 'hsb-DE',
+    0x042f => 'mk-MK',
+    0x0432 => 'tn-ZA',
+    0x0434 => 'xh-ZA',
+    0x0435 => 'zu-ZA',
+    0x0436 => 'af-ZA',
+    0x0437 => 'ka-GE',
+    0x0438 => 'fo-FO',
+    0x0439 => 'hi-IN',
+    0x043a => 'mt-MT',
+    0x043b => 'se-NO',
+    0x043e => 'ms-MY',
+    0x043f => 'kk-KZ',
+    0x0440 => 'ky-KG',
+    0x0441 => 'sw-KE',
+    0x0442 => 'tk-TM',
+    0x0443 => 'uz-Latn-UZ',
+    0x0444 => 'tt-RU',
+    0x0445 => 'bn-IN',
+    0x0446 => 'pa-IN',
+    0x0447 => 'gu-IN',
+    0x0448 => 'or-IN',
+    0x0449 => 'ta-IN',
+    0x044a => 'te-IN',
+    0x044b => 'kn-IN',
+    0x044c => 'ml-IN',
+    0x044d => 'as-IN',
+    0x044e => 'mr-IN',
+    0x044f => 'sa-IN',
+    0x0450 => 'mn-MN',
+    0x0451 => 'bo-CN',
+    0x0452 => 'cy-GB',
+    0x0453 => 'km-KH',
+    0x0454 => 'lo-LA',
+    0x0456 => 'gl-ES',
+    0x0457 => 'kok-IN',
+    0x045a => 'syr-SY',
+    0x045b => 'si-LK',
+    0x045d => 'iu-Cans-CA',
+    0x045e => 'am-ET',
+    0x0461 => 'ne-NP',
+    0x0462 => 'fy-NL',
+    0x0463 => 'ps-AF',
+    0x0464 => 'fil-PH',
+    0x0465 => 'dv-MV',
+    0x0468 => 'ha-Latn-NG',
+    0x046a => 'yo-NG',
+    0x046b => 'quz-BO',
+    0x046c => 'nso-ZA',
+    0x046d => 'ba-RU',
+    0x046e => 'lb-LU',
+    0x046f => 'kl-GL',
+    0x0470 => 'ig-NG',
+    0x0478 => 'ii-CN',
+    0x047a => 'arn-CL',
+    0x047c => 'moh-CA',
+    0x047e => 'br-FR',
+    0x0480 => 'ug-CN',
+    0x0481 => 'mi-NZ',
+    0x0482 => 'oc-FR',
+    0x0483 => 'co-FR',
+    0x0484 => 'gsw-FR',
+    0x0485 => 'sah-RU',
+    0x0486 => 'quc-Latn-GT',
+    0x0487 => 'rw-RW',
+    0x0488 => 'wo-SN',
+    0x048c => 'prs-AF',
+    0x0801 => 'ar-IQ',
+    0x0804 => 'zh-CN',
+    0x0807 => 'de-CH',
+    0x0809 => 'en-GB',
+    0x080a => 'es-MX',
+    0x080c => 'fr-BE',
+    0x0810 => 'it-CH',
+    0x0813 => 'nl-BE',
+    0x0814 => 'nn-NO',
+    0x0816 => 'pt-PT',
+    0x081a => 'sr-Latn-CS',
+    0x081d => 'sv-FI',
+    0x082c => 'az-Cyrl-AZ',
+    0x082e => 'dsb-DE',
+    0x083b => 'se-SE',
+    0x083c => 'ga-IE',
+    0x083e => 'ms-BN',
+    0x0843 => 'uz-Cyrl-UZ',
+    0x0845 => 'bn-BD',
+    0x0850 => 'mn-Mong-CN',
+    0x085d => 'iu-Latn-CA',
+    0x085f => 'tzm-Latn-DZ',
+    0x086b => 'quz-EC',
+    0x0c01 => 'ar-EG',
+    0x0c04 => 'zh-HK',
+    0x0c07 => 'de-AT',
+    0x0c09 => 'en-AU',
+    0x0c0a => 'es-ES',
+    0x0c0c => 'fr-CA',
+    0x0c1a => 'sr-Cyrl-CS',
+    0x0c3b => 'se-FI',
+    0x0c6b => 'quz-PE',
+    0x1001 => 'ar-LY',
+    0x1004 => 'zh-SG',
+    0x1007 => 'de-LU',
+    0x1009 => 'en-CA',
+    0x100a => 'es-GT',
+    0x100c => 'fr-CH',
+    0x101a => 'hr-BA',
+    0x103b => 'smj-NO',
+    0x1401 => 'ar-DZ',
+    0x1404 => 'zh-MO',
+    0x1407 => 'de-LI',
+    0x1409 => 'en-NZ',
+    0x140a => 'es-CR',
+    0x140c => 'fr-LU',
+    0x141a => 'bs-Latn-BA',
+    0x143b => 'smj-SE',
+    0x1801 => 'ar-MA',
+    0x1809 => 'en-IE',
+    0x180a => 'es-PA',
+    0x180c => 'fr-MC',
+    0x181a => 'sr-Latn-BA',
+    0x183b => 'sma-NO',
+    0x1c01 => 'ar-TN',
+    0x1c09 => 'en-ZA',
+    0x1c0a => 'es-DO',
+    0x1c1a => 'sr-Cyrl-BA',
+    0x1c3b => 'sma-SE',
+    0x2001 => 'ar-OM',
+    0x2009 => 'en-JM',
+    0x200a => 'es-VE',
+    0x201a => 'bs-Cyrl-BA',
+    0x203b => 'sms-FI',
+    0x2401 => 'ar-YE',
+    0x2409 => 'en-029',
+    0x240a => 'es-CO',
+    0x243b => 'smn-FI',
+    0x2801 => 'ar-SY',
+    0x2809 => 'en-BZ',
+    0x280a => 'es-PE',
+    0x2c01 => 'ar-JO',
+    0x2c09 => 'en-TT',
+    0x2c0a => 'es-AR',
+    0x3001 => 'ar-LB',
+    0x3009 => 'en-ZW',
+    0x300a => 'es-EC',
+    0x3401 => 'ar-KW',
+    0x3409 => 'en-PH',
+    0x340a => 'es-CL',
+    0x3801 => 'ar-AE',
+    0x380a => 'es-UY',
+    0x3c01 => 'ar-BH',
+    0x3c0a => 'es-PY',
+    0x4001 => 'ar-QA',
+    0x4009 => 'en-IN',
+    0x400a => 'es-BO',
+    0x4409 => 'en-MY',
+    0x440a => 'es-SV',
+    0x4809 => 'en-SG',
+    0x480a => 'es-HN',
+    0x4c0a => 'es-NI',
+    0x500a => 'es-PR',
+    0x540a => 'es-US',
+  }.tap { |x| x.freeze.each_value(&:freeze) }
+
+end

data/lib/fontina/formats/shared/p_string.rb

@@ -0,0 +1,16 @@
+module Fontina::Formats::Shared
+
+  class PString < BinData::Primitive
+    uint8 :len, value: -> { string.length }
+    string :string, read_length: :len
+
+    def get
+      string
+    end
+
+    def set(value)
+      string = value
+    end
+  end
+
+end

data/lib/fontina/meta_package.rb

@@ -0,0 +1,32 @@
+module Fontina
+
+  class MetaPackage
+    attr_reader :location
+
+    def initialize(location)
+      @location = location
+    end
+
+    def size
+      file.content.length
+    end
+
+    def format
+      @format ||= Format.for(
+        mime_type: file.mime_type,
+        extension: File.extname(file.filename).downcase
+      )
+    end
+
+    def package
+      @package ||= StringIO.open file.content, 'rb', &format.method(:read)
+    end
+
+    private
+
+    def file
+      @file ||= Fetcher.fetch location
+    end
+  end
+
+end

data/lib/fontina/package.rb

@@ -0,0 +1,18 @@
+module Fontina
+
+  QualifiedName = Mores::ImmutableStruct.new(
+    *%i[name platform language],
+    strict: true
+  )
+
+  Font = Mores::ImmutableStruct.new(
+    *%i[family_names type points weight italic underline strikeout],
+    strict: true
+  )
+
+  Package = Mores::ImmutableStruct.new(
+    *%i[names fonts],
+    strict: true
+  )
+
+end