zakuro 0.5.0 → 0.7.0

data/lib/zakuro/calculation/era/gengou/dated_scroll.rb

@@ -0,0 +1,30 @@
+# frozen_string_literal: true
+
+require_relative './abstract_scroll'
+require_relative './internal/reserve/dated_range'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Calculation
+    # :nodoc:
+    module Gengou
+      # DatedScroll
+      #
+      # 元号スクロール
+      #
+      class DatedScroll < AbstractScroll
+        #
+        # 初期化
+        #
+        # @param [Western::Calendar] start_date 西暦開始日（最大範囲）
+        # @param [Western::Calendar] last_date 西暦終了日（最大範囲）
+        #
+        def initialize(start_date: Western::Calendar.new, last_date: Western::Calendar.new)
+          range = Reserve::DatedRange.new(start_date: start_date, last_date: last_date)
+          super(range: range)
+        end
+      end
+    end
+  end
+end

data/lib/zakuro/calculation/era/gengou/internal/connector.rb

@@ -0,0 +1,107 @@
+# frozen_string_literal: true
+
+require_relative '../../../../era/japan/gengou/resource'
+require_relative '../../../../era/japan/calendar'
+require_relative '../../../../era/western/calendar'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Calculation
+    # :nodoc:
+    module Gengou
+      #
+      # Connector 元号接続器
+      #
+      # 現在は"明徳"のみを解決している
+      #   元中1年4月28日                  元中9年閏10月4日        明徳5年7月4日
+      #   1384-05-18                     1392-11-18              1394-8-1
+      #  [1] |-------------元中---------------|---------明徳------------|
+      #  [2]            |---------明徳--------|
+      #             明徳1年3月26日
+      #             1390-04-12
+      #
+      #  * 明徳は2行目元号から始まる
+      #  * 1392-11-19より1行目元号に移行する
+      #  * 移行のタイミングで元号年を引き継げるようにする
+      #
+      class Connector
+        # @return [Array<Counter>] 未解決元号
+        attr_reader :unsolved_list
+
+        #
+        # 初期化
+        #
+        def initialize
+          @unsolved_list = []
+        end
+
+        #
+        # 元号を更新する
+        #
+        # @param [Array<Array<Counter>>] lines 全行元号
+        #
+        def update(lines: [])
+          lines.each do |line|
+            line.each_with_index do |gengou, index|
+              next unless gengou.changed?
+
+              line[index] = replace(gengou: gengou)
+            end
+          end
+        end
+
+        #
+        # 元号を年を更新した元号に入れ替える
+        #
+        # @param [Counter] gengou 元号
+        #
+        # @return [Counter] 元号/更新済元号
+        #
+        def replace(gengou:)
+          matched_index = -1
+          @unsolved_list.each_with_index do |unsolved, index|
+            next unless unsolved.name == gengou.name
+
+            matched_index = index
+            break
+          end
+
+          if matched_index == -1
+            @unsolved_list.push(gengou)
+            return gengou
+          end
+
+          matched = @unsolved_list[matched_index]
+
+          result = recreate(gengou: gengou, unsolved: matched)
+
+          @unsolved_list[matched_index] = result
+
+          # 分離した元号の末尾まで到達した
+          @unsolved_list.delete_at(matched_index) unless result.change_last_date?
+
+          result
+        end
+
+        #
+        # 年を更新した元号を生成する
+        #
+        # @param [Counter] gengou 元号
+        # @param [Counter] unsolved 未解決元号
+        #
+        # @return [Counter] 更新済元号
+        #
+        def recreate(gengou:, unsolved:)
+          japan_year = gengou.japan_year
+          japan_year = unsolved.japan_year if unsolved.japan_year > gengou.japan_year
+
+          Counter.new(
+            gengou: gengou.gengou, start_date: gengou.start_date,
+            last_date: gengou.last_date, japan_year: japan_year
+          )
+        end
+      end
+    end
+  end
+end

data/lib/zakuro/calculation/era/gengou/internal/counter.rb

@@ -0,0 +1,214 @@
+# frozen_string_literal: true
+
+require_relative '../../../../era/japan/gengou/resource'
+require_relative '../../../../era/japan/calendar'
+require_relative '../../../../era/western/calendar'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Calculation
+    # :nodoc:
+    module Gengou
+      #
+      # Counter 加算元号
+      #
+      class Counter
+        # @return [Integer] 不正値
+        INVALID_YEAR = -1
+
+        # @return [Japan::Resource::Gengou] 元号
+        attr_reader :gengou
+        # @return [Integer] 元号年
+        attr_reader :japan_year
+        # @return [Integer] 西暦年
+        attr_reader :western_year
+        # @return [Western::Calendar] 西暦開始年
+        attr_reader :start_date
+        # @return [Western::Calendar] 西暦終了年
+        attr_reader :last_date
+
+        #
+        # 初期化
+        #
+        # @param [Japan::Resource::Gengou] gengou 元号
+        # @param [Western::Calendar] start_date 西暦開始年
+        # @param [Western::Calendar] last_date 西暦終了年
+        # @param [Integer] japan_year 和暦年
+        #
+        def initialize(gengou: Japan::Resource::Gengou.new,
+                       start_date: Western::Calendar.new, last_date: Western::Calendar.new,
+                       japan_year: INVALID_YEAR)
+          @gengou = gengou
+          @japan_year = japan_year
+          @japan_year = gengou.both_start_year.japan if @japan_year == INVALID_YEAR
+          @western_year = gengou.both_start_year.western
+
+          @start_date = start_date.clone
+          @last_date = last_date.clone
+
+          select_valid_date
+        end
+
+        #
+        # 和暦開始日を取得する
+        #
+        # @return [Japan::Calendar] 和暦開始日
+        #
+        def japan_start_date
+          return Japan::Calendar.new if @gengou.invalid?
+
+          @gengou.both_start_date.japan
+        end
+
+        #
+        # 西暦開始日を取得する
+        #
+        # @return [Western::Calendar] 西暦開始日
+        #
+        def western_start_date
+          return Western::Calendar.new if @gengou.invalid?
+
+          @start_date
+        end
+
+        #
+        # 西暦終了日を取得する
+        #
+        # @return [Western::Calendar] 西暦終了日
+        #
+        def western_last_date
+          return Western::Calendar.new if @gengou.invalid?
+
+          @last_date
+        end
+
+        #
+        # 次年にする
+        #
+        # @return [MultiGengou] 自身
+        #
+        def next_year
+          @japan_year += 1
+          @western_year += 1
+
+          self
+        end
+
+        #
+        # 元号名を取得する
+        #
+        # @return [String] 元号名
+        #
+        def name
+          return '' unless @gengou
+
+          @gengou.name
+        end
+
+        #
+        # 不正か
+        #
+        # @return [True] 不正
+        # @return [False] 不正なし
+        #
+        def invalid?
+          @gengou.invalid? || @japan_year == INVALID_YEAR || @western_year == INVALID_YEAR
+        end
+
+        #
+        # 指定した日が元号に含まれるか
+        #
+        # @param [Western::Calendar] date 日
+        #
+        # @return [True] 含まれる
+        # @return [False] 含まれない
+        #
+        def include?
+          @gengou.include?
+        end
+
+        #
+        # 元は1繋ぎであった元号が別の行に存在するか（設定値から変更されているか）？
+        #
+        # @return [True] 存在する
+        # @return [False] 存在しない
+        #
+        def changed?
+          return true if change_start_date?
+
+          return true if change_last_date?
+
+          false
+        end
+
+        #
+        # 開始日が設定された開始日と異なるか（行が変更されているか）
+        #
+        # @return [True] 異なる
+        # @return [False] 同一
+        #
+        def change_start_date?
+          return false if invalid?
+
+          @start_date != native_start_date
+        end
+
+        #
+        # 終了日が設定された終了日と異なるか（行が変更されているか）
+        #
+        # @return [True] 異なる
+        # @return [False] 同一
+        #
+        def change_last_date?
+          return false if invalid?
+
+          @last_date != native_last_date
+        end
+
+        #
+        # ディープコピー
+        #
+        # @param [MultiGengou] obj 自身
+        #
+        def initialize_copy(obj)
+          @gengou = obj.gengou.clone
+          @japan_year = obj.japan_year
+          @western_year = obj.western_year
+          @start_date = obj.start_date.clone
+          @last_date = obj.last_date.clone
+        end
+
+        private
+
+        #
+        # 有効な日付範囲を選択する
+        #
+        def select_valid_date
+          return if @gengou.invalid?
+
+          @start_date = @gengou.both_start_date.western.clone if @start_date.invalid?
+          @last_date = @gengou.last_date.clone if @last_date.invalid?
+        end
+
+        #
+        # 設定された元号の開始日を取得する
+        #
+        # @return [Western::Calendar]設定された元号の開始日
+        #
+        def native_start_date
+          @gengou.both_start_date.western
+        end
+
+        #
+        # 設定された元号の終了日を取得する
+        #
+        # @return [Western::Calendar] 設定された元号の終了日
+        #
+        def native_last_date
+          @gengou.last_date
+        end
+      end
+    end
+  end
+end

data/lib/zakuro/calculation/era/gengou/internal/publisher.rb

@@ -0,0 +1,104 @@
+# frozen_string_literal: true
+
+require_relative '../../../../era/western/calendar'
+require_relative '../../../base/linear_gengou'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Calculation
+    # :nodoc:
+    module Gengou
+      # Publisher
+      #
+      # 元号発行
+      #
+      module Publisher
+        #
+        # 発行する
+        #
+        # @param [Western::Calendar] start_date 西暦開始日
+        # @param [Western::Calendar] last_date 西暦終了日
+        # @param [Array<Counter>] first_gengou 1行目元号
+        # @param [Array<Counter>] second_gengou 2行目元号
+        #
+        # @return [Base::Gengou] 元号
+        #
+        def self.run(start_date: Western::Calendar.new, last_date: Western::Calendar.new,
+                     first_gengou: [], second_gengou: [])
+
+          Base::Gengou.new(
+            start_date: start_date,
+            last_date: last_date,
+            first_line: to_linear_gengou(
+              start_date: start_date, last_date: last_date, gengou_list: first_gengou
+            ),
+            second_line: to_linear_gengou(
+              start_date: start_date, last_date: last_date, gengou_list: second_gengou
+            )
+          )
+        end
+
+        #
+        # 直列元号に変換する
+        #
+        #   * 最初の元号：開始日～その元号の終了日
+        #   * 中間の元号：その元号の開始日～その元号の終了日
+        #   * 最後の元号：その元号の開始日～終了日
+        #
+        # @param [Western::Calendar] start_date 西暦開始日
+        # @param [Western::Calendar] last_date 西暦終了日
+        # @param [Array<Counter>] gengou_list 元号リスト
+        #
+        # @return [Array<Base::LinearGengou>] 元号リスト
+        #
+        def self.to_linear_gengou(start_date:, last_date:, gengou_list: [])
+          return [] if gengou_list.size.zero?
+
+          result = []
+
+          gengou_list.each do |gengou|
+            if gengou.invalid?
+              # 無効元号は無効のままにする
+              result.push(Base::LinearGengou.new)
+              next
+            end
+
+            linear_gengou = to_limited_linear_gengou(
+              start_date: start_date,
+              last_date: last_date,
+              gengou: gengou
+            )
+            result.push(linear_gengou)
+          end
+
+          result
+        end
+
+        #
+        # 範囲を限定した直列元号に変換する
+        #
+        # * 開始日・終了日により範囲を狭める
+        #
+        # @param [Western::Calendar] start_date 西暦開始日
+        # @param [Western::Calendar] last_date 西暦終了日
+        # @param [Counter] gengou 加算元号
+        #
+        # @return [Base::LinearGengou] 元号
+        #
+        def self.to_limited_linear_gengou(start_date:, last_date:, gengou:)
+          gengou_start_date = gengou.western_start_date.clone
+          gengou_last_date = gengou.western_last_date.clone
+
+          gengou_start_date = start_date.clone if start_date > gengou_start_date
+          gengou_last_date = last_date.clone if last_date < gengou_last_date
+
+          Base::LinearGengou.new(
+            start_date: gengou_start_date, last_date: gengou_last_date,
+            name: gengou.name, year: gengou.japan_year
+          )
+        end
+      end
+    end
+  end
+end

data/lib/zakuro/calculation/era/gengou/internal/reserve/abstract_list.rb

@@ -0,0 +1,230 @@
+# frozen_string_literal: true
+
+require_relative '../../../../../era/japan/gengou/resource'
+require_relative '../../../../../era/japan/gengou'
+require_relative '../../../../../era/japan/calendar'
+require_relative '../../../../../era/western/calendar'
+
+require_relative '../counter'
+
+require_relative './empty_link'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Calculation
+    # :nodoc:
+    module Gengou
+      # :nodoc:
+      module Reserve
+        # AbstractList
+        #
+        # 抽象予約元号一覧
+        #
+        class AbstractList
+          # @return [Integer] 不正年
+          INVALID_YEAR = -1
+          # @return [Integer] 最大月日数
+          MAX_MONTH_DAYS = 30
+
+          # @return [Symbol] 行番号
+          attr_reader :index
+          # @return [Western::Calendar] 開始日
+          attr_reader :start_date
+          # @return [Western::Calendar] 終了日
+          attr_reader :last_date
+          # @return [Array<Japan::Alignment::LinearGengou>] 予約元号一覧
+          attr_reader :list
+
+          #
+          # 初期化
+          #
+          # @param [Integer] index n行目元号
+          # @param [Western::Calendar] start_date 開始日
+          # @param [Western::Calendar] last_date 終了日
+          #
+          def initialize(index:, start_date: Western::Calendar.new,
+                         last_date: Western::Calendar)
+            @index = index
+            @start_date = start_date.clone
+            @last_date = last_date.clone
+            @list = []
+
+            update
+          end
+
+          #
+          # 元号を取得する
+          #
+          # @param [Western::Calendar] western_date 西暦日
+          #
+          # @return [Gengou::Counter] 加算元号
+          #
+          def get(western_date: Western::Calendar.new)
+            @list.each do |linear_gengou|
+              next if linear_gengou.out?(start_date: western_date, last_date: western_date)
+
+              Gengou::Counter.new(gengou: linear_gengou.gengou).clone
+            end
+
+            Gengou::Counter.new
+          end
+
+          #
+          # 範囲内元号を取得する
+          #
+          # @param [Western::Calendar] start_date 西暦開始日
+          # @param [Western::Calendar] last_date 西暦終了日
+          #
+          # @return [Array<Gengou::Counter>] 範囲内元号
+          #
+          def collect(start_date: Western::Calendar.new, last_date: Western::Calendar.new)
+            result = []
+
+            @list.each do |linear_gengou|
+              next if linear_gengou.out?(start_date: start_date, last_date: last_date)
+
+              result.push(
+                Gengou::Counter.new(
+                  gengou: linear_gengou.gengou.clone,
+                  start_date: linear_gengou.start_date.clone,
+                  last_date: linear_gengou.last_date.clone
+                )
+              )
+            end
+
+            EmptyLink.fill(counters: result, start_date: start_date, last_date: last_date)
+
+            result
+          end
+
+          #
+          # 和暦開始日を取得する
+          #
+          # @return [Japan::Calendar] 和暦開始日
+          #
+          def japan_start_date
+            return Japan::Calendar.new if invalid?
+
+            @list[0].gengou.both_start_date.japan.clone
+          end
+
+          #
+          # 西暦開始日を取得する
+          #
+          # @return [Western::Calendar] 西暦開始日
+          #
+          def western_start_date
+            return Western::Calendar.new if invalid?
+
+            @list[0].gengou.both_start_date.western.clone
+          end
+
+          #
+          # 西暦終了日を取得する
+          #
+          # @return [Western::Calendar] 西暦開始日
+          #
+          def western_last_date
+            return Western::Calendar.new if invalid?
+
+            @list[-1].gengou.last_date.clone
+          end
+
+          #
+          # 西暦開始年を取得する
+          #
+          # @return [Integer] 西暦開始年
+          #
+          def western_start_year
+            return INVALID_YEAR if invalid?
+
+            @list[0].gengou.both_start_year.western.clone
+          end
+
+          #
+          # 西暦終了年を取得する
+          #
+          # @return [Integer] 西暦終了年
+          #
+          def western_last_year
+            return INVALID_YEAR if invalid?
+
+            return INVALID_YEAR if @list.size.zero?
+
+            @list[-1].gengou.last_year
+          end
+
+          #
+          # 不正か
+          #
+          # @return [True] 不正
+          # @return [False] 不正なし
+          #
+          def invalid?
+            return true unless @list
+
+            return true if @list.size.zero?
+
+            false
+          end
+
+          #
+          # 設定された元号の開始日を取得する
+          #
+          # @return [Western::Calendar]設定された元号の開始日
+          #
+          def native_start_date
+            return Western::Calendar.new if @list.size.zero?
+
+            @list[0].native_start_date
+          end
+
+          #
+          # 開始日が設定された開始日と異なるか（行が変更されているか）
+          #
+          # @return [True] 異なる
+          # @return [False] 同一
+          #
+          def change_start_date?
+            return false if @list.size.zero?
+
+            @list[0].change_start_date?
+          end
+
+          private
+
+          #
+          # 予約元号一覧を更新する
+          #
+          def update
+            # override
+          end
+
+          #
+          # 元号を取得する
+          #
+          # @param [Western::Calendar] start_date 開始日
+          # @param [Western::Calendar] last_date 終了日
+          #
+          # @return [Array<Japan::Alignment::LinearGengou>] 元号
+          #
+          def line(start_date:, last_date:)
+            Japan::Gengou.line(line: @index, start_date: start_date, last_date: last_date)
+          end
+
+          #
+          # 行番号に変換する
+          #
+          # @param [True, False] first 1行目/2行目
+          #
+          # @return [<Integer] 行番号
+          #
+          def parse_index(first: true)
+            first ? Japan::Gengou::FIRST_LINE : Japan::Gengou::SECOND_LINE
+          end
+        end
+      end
+    end
+  end
+end