maguire 0.1.0

data/iso_data/symbol_layer/thb.json~

@@ -0,0 +1,11 @@
+{
+  "name": "Baht",
+  "code": "THB",
+  "number": "764",
+  "minor_units": 2,
+  "symbol": "฿",
+  "symbol_html": "฿",
+  "countries": [
+    "THAILAND"
+  ]
+}

data/iso_data/symbol_layer/try.json

@@ -0,0 +1,4 @@
+{
+  "symbol": "₺",
+  "symbol_html": "₺"
+}

data/iso_data/symbol_layer/try.json~

@@ -0,0 +1,11 @@
+{
+  "name": "Turkish Lira",
+  "code": "TRY",
+  "number": "949",
+  "minor_units": 2,
+  "symbol": "₺",
+  "symbol_html": "₺",
+  "countries": [
+    "TURKEY"
+  ]
+}

data/iso_data/symbol_layer/uah.json

@@ -0,0 +1,4 @@
+{
+  "symbol": "₴",
+  "symbol_html": "₴"
+}

data/iso_data/symbol_layer/uah.json~

@@ -0,0 +1,11 @@
+{
+  "name": "Hryvnia",
+  "code": "UAH",
+  "number": "980",
+  "minor_units": 2,
+  "symbol": "₴",
+  "symbol_html": "₴",
+  "countries": [
+    "UKRAINE"
+  ]
+}

data/iso_data/symbol_layer/usd.json

@@ -0,0 +1,3 @@
+{
+  "symbol": "$"
+}

data/iso_data/symbol_layer/usd.json~

@@ -0,0 +1,28 @@
+{
+  "name": "US Dollar",
+  "code": "USD",
+  "number": "840",
+  "minor_units": 2,
+  "symbol": "$",
+  "countries": [
+    "AMERICAN SAMOA",
+    "BONAIRE, SINT EUSTATIUS AND SABA",
+    "BRITISH INDIAN OCEAN TERRITORY",
+    "ECUADOR",
+    "EL SALVADOR",
+    "GUAM",
+    "HAITI",
+    "MARSHALL ISLANDS",
+    "MICRONESIA, FEDERATED STATES OF",
+    "NORTHERN MARIANA ISLANDS",
+    "PALAU",
+    "PANAMA",
+    "PUERTO RICO",
+    "TIMOR-LESTE",
+    "TURKS AND CAICOS ISLANDS",
+    "UNITED STATES",
+    "UNITED STATES MINOR OUTLYING ISLANDS",
+    "VIRGIN ISLANDS (BRITISH)",
+    "VIRGIN ISLANDS (U.S.)"
+  ]
+}

data/iso_data/symbol_layer/vnd.json

@@ -0,0 +1,4 @@
+{
+  "symbol": "₫",
+  "symbol_html": "₫"
+}

data/iso_data/symbol_layer/vnd.json~

@@ -0,0 +1,11 @@
+{
+  "name": "Dong",
+  "code": "VND",
+  "number": "704",
+  "minor_units": 0,
+  "symbol": "₫",
+  "symbol_html": "₫",
+  "countries": [
+    "VIET NAM"
+  ]
+}

data/iso_data/symbol_layer/zar.json

@@ -0,0 +1,3 @@
+{
+  "symbol": "R"
+}

data/iso_data/symbol_layer/zar.json~

@@ -0,0 +1,12 @@
+{
+  "name": "Rand",
+  "code": "ZAR",
+  "number": "710",
+  "minor_units": 2,
+  "symbol": "R",
+  "countries": [
+    "LESOTHO",
+    "NAMIBIA",
+    "SOUTH AFRICA"
+  ]
+}

data/lib/maguire/currency.rb

@@ -0,0 +1,29 @@
+require 'json'
+require 'ostruct'
+
+module Maguire
+  class Currency < OpenStruct
+    def initialize(iso_data={})
+      @data = iso_data
+      super
+    end
+
+    def precision
+      10 ** minor_units
+    end
+
+    def inspect
+      "<##{self.class} name=#{name} code=#{code}>"
+    end
+
+    def overlay(locale_data={})
+      Currency.new(Maguire::Hash.merge([@data, locale_data]))
+    end
+
+    class << self
+      def coded(code)
+        self.new(Maguire.data_paths.load(code.downcase))
+      end
+    end
+  end
+end

data/lib/maguire/data_set.rb

@@ -0,0 +1,61 @@
+require 'maguire/hash'
+
+module Maguire
+  class DataSet
+    include Enumerable
+
+    class NoDataFound < StandardError; end
+
+    def initialize()
+      @cache = {}
+      @paths = []
+    end
+
+    def each(&block)
+      @paths.each(&block)
+    end
+
+    def <<(path)
+      clear_cache!
+      @paths << path
+    end
+
+    def clear_cache!
+      @cache = {}
+    end
+
+    def clear
+      clear_cache!
+      @paths = []
+    end
+
+    def load(id)
+      return @cache[id.to_sym] if @cache && @cache[id.to_sym]
+
+      data_sets = map do |data_path|
+        path = data_path.join("#{id}.json")
+        if File.exists?(path)
+          JSON.parse(File.read(path), symbolize_names: true)
+        else
+          {}
+        end
+      end
+
+      merged_data = merge_data(data_sets)
+      if merged_data.empty?
+        raise NoDataFound.new(@paths.join(':'))
+      end
+
+      @cache[id.to_sym] = merged_data
+    end
+
+    def merge_data(data_sets)
+      merged_set = Maguire::Hash.merge(data_sets)
+      if merged_set[:enabled] == false
+        nil
+      else
+        merged_set
+      end
+    end
+  end
+end

data/lib/maguire/hash.rb

@@ -0,0 +1,13 @@
+module Maguire
+  module Hash
+    def self.merge(hashes)
+      return hashes.first if hashes.size == 1
+
+      hashes.inject do |acc, hash|
+        acc.merge(hash) do |key, old_value, new_value|
+          new_value || old_value
+        end
+      end
+    end
+  end
+end

data/lib/maguire/locale.rb

@@ -0,0 +1,165 @@
+require 'json'
+
+module Maguire
+  class Locale
+    class NotSupportedError < StandardError; end
+
+    attr_reader :locale, :code, :symbol, :locale
+
+    def initialize(locale, locale_data={})
+      @locale = locale
+
+      @positive_formatting = parse_layout(locale_data[:layouts][:positive])
+      @negative_formatting = parse_layout(locale_data[:layouts][:negative])
+
+      @currency_overlays = locale_data
+    end
+
+    def inspect
+      "<##{self.class} locale=#{locale}>"
+    end
+
+    def format(value, currency, options={})
+      major_value = value.abs / currency.precision
+      minor_value = round(value.abs - major_value * currency.precision)
+
+      overlay = @currency_overlays[currency.code.downcase.to_sym]
+      currency = currency.overlay(overlay) if overlay
+
+      groups = split_value_into_groups(major_value)
+
+      formatting = value >= 0 ?
+        @positive_formatting : @negative_formatting
+
+      symbol = currency.symbol
+      if options[:html] && currency.symbol_html
+        symbol = currency.symbol_html
+      end
+
+      strip_insignificant_zeros = options[:strip_insignificant_zeros]
+      if options[:no_minor_units] || currency.minor_units == 0
+        minor_value = 0
+        strip_insignificant_zeros = true
+      end
+
+      if strip_insignificant_zeros && minor_value == 0
+        minor_value = ""
+        decimal_symbol = ""
+      else
+        minor_value = minor_value.to_s.rjust(currency.minor_units, "0")
+        decimal_symbol = formatting[:decimal_symbol]
+      end
+
+      formatting[:layout] % {
+        symbol: symbol,
+        code: currency.code,
+        decimal: decimal_symbol,
+        major_value: groups.join(formatting[:digit_grouping_symbol]),
+        minor_value: minor_value
+      }
+    end
+
+    private
+
+      SOUTH_ASIAN_GROUPING_RE = /([0-9]{2}[^0-9]){3}[0-9]{3}[^0-9]/
+      GROUPS_OF_FOUR_RE = /([0-9]{4}[^0-9])+/
+      GROUPS_OF_THREE_RE = /([0-9]{3}[^0-9]){3}+/
+
+      def parse_groups_in_south_asian_style(layout)
+        @group_numbers_in_south_asian_style = true
+        digit_grouping_symbol = layout.match(/1([^0-9]*)23/)[1]
+        layout.gsub!(["1", "23", "45", "67", "890"].join(digit_grouping_symbol), "%{major_value}")
+        digit_grouping_symbol
+      end
+
+      def parse_groups_of_four(layout)
+        @group_numbers_in_fours = true
+        digit_grouping_symbol = layout.match(/12([^0-9]*)3456/)[1]
+        layout.gsub!(["12", "3456", "7890"].join(digit_grouping_symbol), "%{major_value}")
+        digit_grouping_symbol
+      end
+
+      def parse_groups_of_three(layout)
+        @group_numbers_in_threes = true
+        digit_grouping_symbol = layout.match(/1([^0-9]*)234/)[1]
+        layout.gsub!(["1", "234", "567", "890"].join(digit_grouping_symbol), "%{major_value}")
+        digit_grouping_symbol
+      end
+
+      # Currency layouts are defined using a standard format of:
+      # 1234567890.12 USD
+      # 1,23,45,67,890.12 USD
+      # 12,3456,7890.12 USD
+      def parse_layout(layout)
+        layout = layout.dup
+
+        digit_grouping_symbol =
+          if layout =~ SOUTH_ASIAN_GROUPING_RE
+            parse_groups_in_south_asian_style(layout)
+          elsif layout =~ GROUPS_OF_FOUR_RE
+            parse_groups_of_four(layout)
+          elsif layout =~ GROUPS_OF_THREE_RE
+            parse_groups_of_three(layout)
+          end
+
+        layout.gsub!("USD", "%{code}")
+        layout.gsub!("$", "%{symbol}")
+        layout.gsub!("12", "%{minor_value}")
+        decimal_symbol = layout.match(/major_value}(.*)%{minor_value/)[1]
+        layout.gsub!(decimal_symbol, "%{decimal}")
+
+        {
+          layout: layout,
+          decimal_symbol: decimal_symbol,
+          digit_grouping_symbol: digit_grouping_symbol
+        }
+      end
+
+      def round(value)
+        value.to_i
+      end
+
+      def break_off(value, number)
+        len = value.length
+        number = len if number > len
+        [value.slice(0, len - number), value.slice(len - number, len)]
+      end
+
+      def split_value_into_groups_of(value, number)
+        groups = []
+        while value && value.length > 0
+          (value, partial) = break_off(value, number)
+          groups.unshift(partial)
+        end
+        groups
+      end
+
+      def split_value_into_groups(value)
+        value = value.to_s
+
+        if @group_numbers_in_threes
+          split_value_into_groups_of(value, 3)
+        elsif @group_numbers_in_fours
+          split_value_into_groups_of(value, 4)
+        elsif @group_numbers_in_south_asian_style
+          (value, partial) = break_off(value, 3)
+
+          split_value_into_groups_of(value, 2) << partial
+        else
+          []
+        end
+      end
+
+    class << self
+      def lookup(options)
+        locale = "#{options[:lang].downcase}_#{options[:country].upcase}"
+        data = Maguire.locale_paths.load(locale)
+        if data.nil?
+          raise Locale::NotSupportedError.new("The locale #{locale} isn't supported")
+        else
+          self.new(locale, data)
+        end
+      end
+    end
+  end
+end

data/lib/maguire/version.rb

@@ -0,0 +1,3 @@
+module Maguire
+  VERSION = '0.1.0'
+end

data/lib/maguire.rb

@@ -0,0 +1,47 @@
+require 'json'
+require 'pathname'
+
+lib_path = File.expand_path('../../lib', __FILE__)
+$LOAD_PATH.unshift(lib_path)
+
+require 'maguire/currency'
+require 'maguire/data_set'
+require 'maguire/locale'
+require 'maguire/version'
+
+module Maguire
+  class << self
+
+    attr_accessor :root_path, :data_paths, :locale_paths, :default_locale
+
+    def reset_data_paths
+      data_paths.clear
+      data_paths << root_path + 'iso_data/seed_layer' << root_path + 'iso_data/symbol_layer'
+    end
+
+    def reset_locale_paths
+      locale_paths.clear
+      locale_paths << root_path + 'locale'
+    end
+
+    def format(money, options={})
+      currency = Currency.coded(money[:currency].downcase)
+      locale = Locale.lookup(options[:locale] || Maguire.default_locale)
+
+      locale.format(money[:value], currency, options)
+    end
+  end
+
+  self.root_path = Pathname.new(__FILE__) + '../..'
+
+  self.data_paths = Maguire::DataSet.new
+  self.reset_data_paths
+
+  self.locale_paths = Maguire::DataSet.new
+  self.reset_locale_paths
+
+  self.default_locale = {
+    lang: "en",
+    country: "US"
+  }
+end

data/locale/en_CA.json~

@@ -0,0 +1,26 @@
+{
+  "formats": {
+    "positive": "$1,234,567,890.12",
+    "negative": "($1,234,567,890.12)"
+  },
+
+  "aud": {
+    "symbol": "$A"
+  },
+
+  "brl": {
+    "symbol": "$R"
+  },
+
+  "hkd": {
+    "symbol": "$HK"
+  },
+
+  "mxn": {
+    "symbol": "$Mex"
+  },
+
+  "usd": {
+    "symbol": "$US"
+  }
+}

data/locale/en_US.json

@@ -0,0 +1,26 @@
+{
+  "layouts": {
+    "positive": "$1,234,567,890.12",
+    "negative": "-$1,234,567,890.12"
+  },
+
+  "aud": {
+    "symbol": "A$"
+  },
+
+  "brl": {
+    "symbol": "R$"
+  },
+
+  "cad": {
+    "symbol": "C$"
+  },
+
+  "hkd": {
+    "symbol": "HK$"
+  },
+
+  "mxn": {
+    "symbol": "Mex$"
+  }
+}

data/locale/en_US.json~

@@ -0,0 +1,50 @@
+{
+  "formats": {
+    "positive": "$1,234,567,890.12",
+    "negative": "($1,234,567,890.12)"
+  },
+
+  "aud": {
+    "symbol": "A$"
+  },
+
+  "brl": {
+    "symbol": "R$"
+  },
+
+  "cad": {
+    "symbol": "C$"
+  },
+
+  "chf": {
+    "symbol": "Fr."
+  },
+
+  "dkk": {
+    "symbol": "kr."
+  },
+
+  "hkd": {
+    "symbol": "HK$"
+  },
+
+  "mxn": {
+    "symbol": "Mex$"
+  },
+
+  "nok": {
+    "symbol": "kr."
+  },
+
+  "scr": {
+    "symbol": "SR"
+  },
+
+  "sek": {
+    "symbol": "kr"
+  },
+
+  "zar": {
+    "symbol": "R"
+  }
+}