zakuro 0.4.0 → 0.6.1

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/list.rb

@@ -0,0 +1,244 @@
+# 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'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Calculation
+    # :nodoc:
+    module Gengou
+      # :nodoc:
+      module Reserve
+        # List
+        #
+        # 予約元号一覧
+        #
+        class List
+          # @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 [True, False] first true:1行目元号, false:2行目元号
+          # @param [Western::Calendar] start_date 開始日
+          # @param [Western::Calendar] last_date 終了日
+          #
+          def initialize(first: true, start_date: Western::Calendar.new,
+                         last_date: Western::Calendar)
+            @index = first ? Japan::Gengou::FIRST_LINE : Japan::Gengou::SECOND_LINE
+            @start_date = start_date.clone
+            @last_date = last_date.invalid? ? start_date.clone : 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
+
+            # TODO: refactor
+            if result.size.zero?
+              result.push(
+                Gengou::Counter.new(
+                  gengou: Japan::Resource::Gengou.new(
+                    both_start_date: Japan::Resource::Both::Date.new(
+                      western: start_date.clone
+                    ),
+                    last_date: last_date.clone
+                  )
+                )
+              )
+              return result
+            end
+
+            # FIXME: 有効元号の前後しか見ていない
+            if start_date < result[0].start_date
+              result.unshift(
+                Gengou::Counter.new(
+                  gengou: Japan::Resource::Gengou.new,
+                  start_date: start_date.clone,
+                  last_date: result[0].start_date.clone - 1
+                )
+              )
+            end
+
+            if last_date > result[-1].last_date
+              result.push(
+                Gengou::Counter.new(
+                  gengou: Japan::Resource::Gengou.new,
+                  start_date: result[0].last_date.clone + 1,
+                  last_date: last_date.clone
+                )
+              )
+            end
+
+            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 [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
+            # 開始日の30日前に前の元号がある場合は、前の元号を設定する
+            start_date = @start_date.clone - (MAX_MONTH_DAYS + 1)
+            # 開始日の30日後に次の元号がある場合は、次の元号を設定する
+            last_date = @last_date.clone + (MAX_MONTH_DAYS + 1)
+
+            @list |= line(start_date: start_date, last_date: last_date)
+          end
+
+          #
+          # 元号
+          #
+          # @param [Western::Calendar] 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
+        end
+      end
+    end
+  end
+end