zakuro 0.2.0 → 0.6.0

data/lib/zakuro/calculation/gengou/scroll.rb

@@ -0,0 +1,262 @@
+# frozen_string_literal: true
+
+require_relative '../../era/western/calendar'
+require_relative '../base/gengou'
+require_relative '../base/linear_gengou'
+require_relative './internal/reserve/interval'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Calculation
+    # :nodoc:
+    module Gengou
+      # Scroll
+      #
+      # 元号スクロール
+      #
+      class Scroll
+        # @return [Western::Calendar] 月初日
+        attr_reader :monthly_start_date
+        # @return [Western::Calendar] 月末日
+        attr_reader :monthly_end_date
+        # @return [Reserve::Interval] 予約範囲
+        attr_reader :interval
+        # @return [Array<Counte>] 1行目元号
+        attr_reader :first_gengou
+        # @return [Array<Counte>] 2行目元号
+        attr_reader :second_gengou
+
+        #
+        # 初期化
+        #
+        # @param [Western::Calendar] start_date 西暦開始日（最大範囲）
+        # @param [Western::Calendar] end_date 西暦終了日（最大範囲）
+        #
+        def initialize(start_date: Western::Calendar.new, end_date: Western::Calendar.new)
+          @monthly_start_date = Western::Calendar.new
+          @monthly_end_date = Western::Calendar.new
+          @interval = Reserve::Interval.new(start_date: start_date, end_date: end_date)
+          @first_gengou = []
+          @second_gengou = []
+          @ignited = false
+        end
+
+        #
+        # 進める
+        #
+        # @param [Monthly::Month] month 月
+        #
+        def run(month:)
+          unless @ignited
+            # 開始日の検索を行う
+            @ignited = ignite(month: month)
+            return
+          end
+
+          # 時間を進める
+          advance(month: month)
+        end
+
+        #
+        # 元号開始を試みる
+        #
+        # @param [Monthly::Month] month 月
+        #
+        # @return [True] 開始あり
+        # @return [False] 開始なし
+        #
+        def ignite(month:)
+          return false unless ignitable?(month: month)
+
+          japan_start_date = @interval.japan_start_date
+
+          western_start_date = @interval.western_start_date
+
+          # 今月初日（和暦日が1月2日であれば、開始日の1日前が初日）
+          @monthly_start_date = western_start_date.clone - japan_start_date.day + 1
+
+          # 今月末
+          @monthly_end_date = @monthly_start_date.clone + month.days - 1
+
+          update_current_gengou
+
+          true
+        end
+
+        #
+        # 進める
+        #
+        # @param [Monthly::Month] month 月
+        #
+        def advance(month:)
+          @monthly_start_date = @monthly_end_date.clone + 1
+
+          @monthly_end_date = @monthly_start_date.clone + month.days - 1
+
+          next_year if month.number == 1 && !month.leaped?
+
+          update_current_gengou
+        end
+
+        #
+        # 共通の元号に変換する
+        #
+        # @return [Base::Gengou] 元号
+        #
+        def to_gengou
+          start_date = @monthly_start_date.clone
+          end_date = @monthly_end_date.clone
+
+          Base::Gengou.new(
+            start_date: start_date,
+            end_date: end_date,
+            first_line: to_linear_gengou(
+              start_date: start_date, end_date: end_date, gengou_list: @first_gengou
+            ),
+            second_line: to_linear_gengou(
+              start_date: start_date, end_date: end_date, gengou_list: @second_gengou
+            )
+          )
+        end
+
+        #
+        # 開始西暦年を取得する
+        #
+        # @return [Integer] 開始西暦年
+        #
+        def western_start_year
+          @interval.western_start_year
+        end
+
+        #
+        # 終了西暦年を取得する
+        #
+        # @return [Integer] 終了西暦年
+        #
+        def western_end_year
+          @interval.western_end_year
+        end
+
+        private
+
+        #
+        # 現在月に合わせて元号を更新する
+        #
+        def update_current_gengou
+          start_date = @monthly_start_date
+          end_date = @monthly_end_date
+          first_gengou = @interval.collect_first_gengou(start_date: start_date, end_date: end_date)
+          second_gengou = @interval.collect_second_gengou(start_date: start_date,
+                                                          end_date: end_date)
+
+          @first_gengou = replace_gengou(source: @first_gengou, destination: first_gengou)
+          @second_gengou = replace_gengou(source: @second_gengou, destination: second_gengou)
+        end
+
+        #
+        # 元号を差し替える
+        #
+        # @param [Array<Counter>] source 元の元号
+        # @param [Array<Counter>] destination 次の元号
+        #
+        # @return [Array<Counter>] 差し替え結果
+        #
+        def replace_gengou(source: [], destination: [])
+          return destination if destination.size.zero?
+
+          return destination if source.size.zero?
+
+          last = source[-1]
+          destination[0] = last if destination[0].name == last.name
+
+          destination
+        end
+
+        #
+        # 直列元号に変換する
+        #
+        #   * 最初の元号：開始日～その元号の終了日
+        #   * 中間の元号：その元号の開始日～その元号の終了日
+        #   * 最後の元号：その元号の開始日～終了日
+        #
+        # @param [Western::Calendar] start_date 西暦開始日
+        # @param [Western::Calendar] end_date 西暦終了日
+        # @param [Array<Counter>] gengou_list 元号リスト
+        #
+        # @return [Array<Base::Gengou>] 元号リスト
+        #
+        def to_linear_gengou(start_date:, end_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,
+              end_date: end_date,
+              gengou: gengou
+            )
+            result.push(linear_gengou)
+          end
+
+          result
+        end
+
+        #
+        # 範囲を限定した直列元号に変換する
+        #
+        # * 開始日・終了日により範囲を狭める
+        #
+        # @param [Western::Calendar] start_date 西暦開始日
+        # @param [Western::Calendar] end_date 西暦終了日
+        # @param [Counter] gengou 加算元号
+        #
+        # @return [Base::Gengou] 元号
+        #
+        def to_limited_linear_gengou(start_date:, end_date:, gengou:)
+          gengou_start_date = gengou.western_start_date.clone
+          gengou_end_date = gengou.western_end_date.clone
+
+          gengou_start_date = start_date.clone if start_date > gengou_start_date
+          gengou_end_date = end_date.clone if end_date < gengou_end_date
+
+          Base::LinearGengou.new(
+            start_date: gengou_start_date, end_date: gengou_end_date,
+            name: gengou.name, year: gengou.japan_year
+          )
+        end
+
+        #
+        # 開始可能か
+        #
+        # @param [Monthly::Month] month 月
+        #
+        # @return [True] 開始可
+        # @return [True] 開始不可
+        #
+        def ignitable?(month:)
+          return false unless @monthly_start_date.invalid?
+
+          japan_start_date = @interval.japan_start_date
+
+          japan_start_date.same_month?(leaped: month.leaped?, month: month.number)
+        end
+
+        #
+        # 次年にする
+        #
+        def next_year
+          @first_gengou.each(&:next_year)
+          @second_gengou.each(&:next_year)
+        end
+      end
+    end
+  end
+end

data/lib/zakuro/calculation/monthly/first_day.rb

@@ -1,6 +1,6 @@
 # frozen_string_literal: true
 
-require_relative '../../era/western'
+require_relative '../../era/western/calendar'
 
 # :nodoc:
 module Zakuro
@@ -23,7 +23,8 @@ module Zakuro
         # @param [Remainder] remainder 西暦日
         # @param [Western::Calendar] western_date 大余小余
         #
-        def initialize(western_date: Western::Calendar.new, remainder: Remainder.new)
+        def initialize(western_date: Western::Calendar.new,
+                       remainder: Calculation::Cycle::AbstractRemainder.new)
           # 西暦日
           @western_date = western_date
           # 大余小余

data/lib/zakuro/calculation/monthly/month.rb

@@ -1,5 +1,6 @@
 # frozen_string_literal: true
 
+require_relative '../base/gengou'
 require_relative './first_day'
 require_relative './month_label'
 
@@ -21,6 +22,8 @@ module Zakuro
         attr_reader :first_day
         # @return [Array<SolarTerm>] 二十四節気
         attr_reader :solar_terms
+        # @return [Base::Gengou] 元号
+        attr_reader :gengou
 
         #
         # 初期化
@@ -29,13 +32,25 @@ module Zakuro
         # @param [MonthLabel] month_label 月表示名
         # @param [FirstDay] first_day 月初日（朔日）
         # @param [Array<SolarTerm>] solar_terms 二十四節気
+        # @param [Base::Gengou] gengou 元号
         #
-        def initialize(context:, month_label: MonthLabel.new, first_day: FirstDay.new,
-                       solar_terms: [])
+        def initialize(context: Context.new, month_label: MonthLabel.new, first_day: FirstDay.new,
+                       solar_terms: [], gengou: Base::Gengou.new)
           @context = context
           @month_label = month_label
           @first_day = first_day
           @solar_terms = solar_terms
+          @gengou = gengou
+        end
+
+        #
+        # 不正か
+        #
+        # @return [True] 不正
+        # @return [False] 不正なし
+        #
+        def invalid?
+          @context.invalid?
         end
 
         #
@@ -181,6 +196,38 @@ module Zakuro
         def same?(other:)
           number == other.number && leaped? == other.leaped?
         end
+
+        #
+        # 月の終了日を返す
+        #
+        # @return [Western::Calendar] 月の終了日
+        #
+        def end_date
+          return Western::Calendar.new if western_date.invalid?
+
+          western_date.clone + days - 1
+        end
+
+        #
+        # 範囲内か
+        #
+        # @param [Western::Calendar] date 日付
+        #
+        # @return [True] 範囲内
+        # @return [False] 範囲外
+        #
+        def include?(date:)
+          return false if invalid?
+
+          start_date = western_date
+          return false if start_date.invalid?
+
+          return false if date < start_date
+
+          return false if date > end_date
+
+          true
+        end
       end
     end
   end

data/lib/zakuro/calculation/monthly/operated_month.rb

@@ -9,7 +9,7 @@ module Zakuro
   module Calculation
     # :nodoc:
     module Monthly
-      # :reek:TooManyInstanceVariables { max_instance_variables: 5 }
+      # :reek:TooManyInstanceVariables { max_instance_variables: 6 }
 
       #
       # OperatedMonth 月情報（運用）
@@ -34,12 +34,13 @@ module Zakuro
         # @param [Operation::MonthHistory] history 変更履歴（月）
         #
         def initialize(context:, operated_solar_terms:, month_label: MonthLabel.new,
-                       first_day: FirstDay.new, solar_terms: [],
+                       first_day: FirstDay.new, solar_terms: [], gengou: Base::Gengou.new,
                        history: Operation::MonthHistory.new)
           super(context: context, month_label: month_label, first_day: first_day,
-                solar_terms: solar_terms)
+                solar_terms: solar_terms, gengou: gengou)
           @history = history
           @operated_solar_terms = operated_solar_terms
+          @moved = false
         end
 
         # rubocop:enable Metrics/ParameterLists
@@ -99,9 +100,9 @@ module Zakuro
         end
 
         #
-        # <Description>
+        # 運用情報によって改変した二十四節気を作成する
         #
-        # @param [<Type>] operated_solar_term <description>
+        # @param [<Type>] operated_solar_term 運用情報（二十四節気）
         # @param [Array<SolarTerm>] solar_terms 二十四節気
         #
         # @return [Array<SolarTerm>] 二十四節気
@@ -203,6 +204,49 @@ module Zakuro
 
           western_date
         end
+
+        #
+        # 運用情報では昨年の月か
+        #
+        # @return [True] 昨年の月
+        # @return [False] 今年/来年の月
+        #
+        def last_year?
+          history_month_number.last_year?
+        end
+
+        #
+        # 運用情報では来年の月か
+        #
+        # @return [True] 来年の月
+        # @return [False] 今年/昨年の月
+        #
+        def next_year?
+          history_month_number.next_year?
+        end
+
+        #
+        # 別の年に移動したか
+        #
+        # @return [True] 移動済
+        # @return [False] 移動なし
+        #
+        def moved?
+          @moved
+        end
+
+        #
+        # 移動済とする
+        #
+        def moved
+          @moved = true
+        end
+
+        private
+
+        def history_month_number
+          @history.diffs.month.number
+        end
       end
     end
   end

data/lib/zakuro/calculation/range/full_range.rb

@@ -1,13 +1,20 @@
 # frozen_string_literal: true
 
-require_relative '../../era/western'
+require_relative '../../version/context'
+
+require_relative '../../era/western/calendar'
 require_relative '../../output/logger'
 
-require_relative '../base/multi_gengou_roller'
+require_relative '../gengou/scroll'
+
+require_relative '../base/gengou'
 require_relative '../base/year'
 
+require_relative '../version/version'
+
 require_relative './transfer/year_boundary'
-require_relative './transfer/western_date_allocation'
+
+require_relative './transfer/gengou_scroller'
 
 # :nodoc:
 module Zakuro
@@ -37,11 +44,7 @@ module Zakuro
         # @return [Western::Calendar] 終了日
         attr_reader :end_date
         # @return [MultiGengouRoller] 改元処理
-        attr_reader :multi_gengou_roller
-        # @return [Western::Calendar] 最過去の元旦
-        attr_reader :new_year_date
-        # @return [Integer] 西暦年
-        attr_reader :western_year
+        attr_reader :scroll
 
         # @return [Output::Logger] ロガー
         LOGGER = Output::Logger.new(location: 'full_range')
@@ -58,12 +61,9 @@ module Zakuro
           @end_date = end_date
           return if invalid?
 
+          # TODO: 現時点では使用していない。特定の暦を指定できるようになった状態で使用する
           @context = context
-          @multi_gengou_roller = Base::MultiGengouRoller.new(
-            start_date: start_date, end_date: end_date
-          )
-          @new_year_date = @multi_gengou_roller.oldest_date.clone
-          @western_year = @new_year_date.year
+          @scroll = Gengou::Scroll.new(start_date: start_date, end_date: end_date)
         end
 
         #
@@ -79,130 +79,92 @@ module Zakuro
         #
         # 完全範囲を取得する
         #
-        # @return [Array<Year>] 完全範囲
+        # @return [Array<Base::Year>] 完全範囲
         #
         def get
           return [] if invalid?
 
-          years = Transfer::YearBoundary.get(
-            context: @context, annual_ranges: annual_ranges
-          )
-          years = update_gengou(years: years)
-
-          Transfer::WesternDateAllocation.update_first_day(
-            context: @context, years: years
-          )
-
-          years
-        end
+          years = version_ranges
 
-        # :reek:TooManyStatements { max_statements: 7 }
-
-        #
-        # 完全範囲内の年データを取得する
-        #
-        # @return [Array<Year>] 年データ（冬至基準）
-        #
-        def annual_ranges
-          oldest_date = @new_year_date
-          newest_date = @multi_gengou_roller.newest_date
-          annual_range = context.resolver.annual_range
+          years.each(&:commit)
 
-          years = []
-          ((oldest_date.year)..(newest_date.year + 2)).each do |year|
-            years.push(
-              annual_range.get(
-                context: @context, western_year: year
-              )
-            )
-          end
+          Transfer::GengouScroller.set(scroll: scroll, years: years)
 
           years
         end
 
-        # :reek:TooManyStatements { max_statements: 8 }
+        private
 
         #
-        # 完全範囲内の年データの元号を開始年基準で更新する
-        #
-        # @param [Array<Year>] years 年データ（元旦基準）
+        # 暦別範囲
         #
-        # @return [Array<Year>] 元号更新済み年データ（元旦基準）
+        # @return [Array<Base::Year>] 完全範囲
         #
-        def update_gengou(years:)
-          updated_years = []
+        def version_ranges
+          result = []
 
-          nearest_end_date = choise_nearest_end_date
+          start_year = @scroll.western_start_year
+          end_year = @scroll.western_end_year
 
-          years.each do |year|
-            next_year(years: updated_years, year: year)
+          versions = Version.get(start_year: start_year, end_year: end_year)
 
-            if @new_year_date > nearest_end_date
-              @multi_gengou_roller.transfer
-              nearest_end_date = choise_nearest_end_date
-            end
-            @multi_gengou_roller.next_year
-          end
-
-          updated_years
-        end
+          versions.each_with_index do |version, index|
+            context = Context.new(version_name: version.name)
+            start_year = version.start_year
+            end_year = version.end_year
+            # 最後の暦だけ1年足す（次の元号の開始年まで計算するケースあり）
+            end_year += 1 if (index + 1) == versions.size
 
-        private
-
-        #
-        # 元号処理対象の年を進める
-        #
-        # @param [Array<Year>] years 元号処理済み年データ（元旦基準）
-        # @param [Year] year 元号処理前の年（元旦基準）
-        #
-        def next_year(years:, year:)
-          updated_year = update_year(year: year)
-
-          years.push(updated_year)
-
-          next_new_year_date(total_days: updated_year.total_days)
+            years = boundary_resolved_ranges(
+              context: context, start_year: start_year, end_year: end_year
+            )
+            result.concat(years)
+          end
 
-          nil
+          result
         end
 
         #
-        # 年の元号を更新する
+        # 年境界解決済みの範囲
         #
-        # @param [Year] year 元号処理前の年（元旦基準）
+        # @param [Context] context 暦コンテキスト
+        # @param [Integer] start_year 開始西暦年
+        # @param [Integer] end_year 終了西暦年
         #
-        # @return [Year] 元号処理済の年（元旦基準）
+        # @return [Array<Base::Year>] 年境界解決済みの範囲
         #
-        def update_year(year:)
-          multi_gengou = @multi_gengou_roller.multi_gengou.clone
-
-          updated_year = Base::Year.new(
-            multi_gengou: multi_gengou, new_year_date: @new_year_date.clone,
-            months: year.months
+        def boundary_resolved_ranges(context:, start_year:, end_year:)
+          ranges = annual_ranges(
+            context: context, start_year: start_year, end_year: end_year
           )
-          updated_year.commit
 
-          updated_year
+          Transfer::YearBoundary.get(
+            context: context, annual_ranges: ranges
+          )
         end
 
         #
-        # 次の年に進める
+        # 完全範囲内の年データを取得する
         #
-        # @param [Integer] total_days 年の日数
+        # @param [Context] context 暦コンテキスト
+        # @param [Integer] start_year 開始西暦年
+        # @param [Integer] end_year 終了西暦年
         #
-        def next_new_year_date(total_days:)
-          @new_year_date += total_days
-          @multi_gengou_roller.next(days: total_days)
+        # @return [Array<Base::Year>] 年データ（冬至基準）
+        #
+        def annual_ranges(context:, start_year:, end_year:)
+          annual_range = context.resolver.annual_range
 
-          nil
-        end
+          years = []
+          (start_year..(end_year + 1)).each do |year|
+            years.push(
+              annual_range.get(
+                context: context, western_year: year
+              )
+            )
+          end
 
-        #
-        # 現在日からみて直近の未来に対する元号の切替前日を求める
-        #
-        # @return [Western::Calendar] 元号の切替前日
-        #
-        def choise_nearest_end_date
-          @multi_gengou_roller.choise_nearest_end_date
+          years
         end
       end
     end