zakuro 0.0.0 → 0.1.1

data/lib/zakuro/version/senmyou/monthly/month_label.rb

@@ -0,0 +1,87 @@
+# frozen_string_literal: true
+
+# TODO: moduleでMonthly とする（全暦むけに共通化したあと）
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Senmyou
+    #
+    # MonthLabel 月表示情報
+    #
+    class MonthLabel
+      # @return [True] 大の月（30日）
+      # @return [False] 小の月（29日）
+      attr_reader :is_many_days
+      # @return [Integer] 月（xx月のxx）
+      attr_reader :number
+      # @return [True] 閏月
+      # @return [False] 平月
+      attr_reader :leaped
+
+      # :reek:ControlParameter and :reek:BooleanParameter
+
+      #
+      # 初期化
+      #
+      # @param [Integer] number 月（xx月のxx）
+      # @param [True, False] is_many_days 月の大小
+      # @param [True, False] leaped 閏月/平月
+      #
+      def initialize(number: -1, is_many_days: false, leaped: false)
+        # 月の大小
+        @is_many_days = is_many_days
+        # 月
+        @number = number
+        # 閏
+        @leaped = leaped
+      end
+
+      #
+      # 月の日数を返す
+      #
+      # @return [Integer] 日数
+      #
+      def days
+        @is_many_days ? 30 : 29
+      end
+
+      #
+      # 月の名前（大小）を返す
+      #
+      # @return [String] 月の名前（大小）
+      #
+      def days_name
+        @is_many_days ? '大' : '小'
+      end
+
+      #
+      # 一ヶ月戻す
+      #
+      # @return [True] 昨年
+      # @return [False] 今年
+      #
+      def back_to_last_month
+        @number -= 1
+
+        return false if @number.positive?
+
+        @number = 12
+
+        true
+      end
+
+      #
+      # 同一の月情報かを検証する
+      #
+      # @param [Month] other 他の月情報
+      #
+      # @return [True] 同一の月
+      # @return [False] 異なる月
+      #
+      def same?(other:)
+        @number == other.number && @leaped == other.leaped
+      end
+    end
+  end
+end

data/lib/zakuro/version/senmyou/monthly/operated_month.rb

@@ -0,0 +1,167 @@
+# frozen_string_literal: true
+
+require_relative './month'
+require_relative '../../../operation/operation'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Senmyou
+    #
+    # OperatedMonth 月情報（運用）
+    #
+    class OperatedMonth < Month
+      # @return [Operation::MonthHistory] 変更履歴（月）
+      attr_reader :history
+      # @return [OperatedSolarTerms] 運用時二十四節気
+      attr_reader :operated_solar_terms
+
+      #
+      # 初期化
+      #
+      # @param [MonthLabel] month_label 月表示名
+      # @param [FirstDay] first_day 月初日（朔日）
+      # @param [Array<SolarTerm>] solar_terms 二十四節気
+      # @param [Operation::MonthHistory] history 変更履歴（月）
+      #
+      def initialize(operated_solar_terms:, month_label: MonthLabel.new, first_day: FirstDay.new, solar_terms: [],
+                     history: Operation::MonthHistory.new)
+        super(month_label: month_label, first_day: first_day, solar_terms: solar_terms)
+        @history = history
+        @operated_solar_terms = operated_solar_terms
+      end
+
+      #
+      # 書き換える
+      #
+      def rewrite
+        rewrite_month
+        rewrite_solar_terms
+        rewrite_first_day
+      end
+
+      #
+      # 月ごとの差分で書き換える
+      #
+      def rewrite_month
+        diff = history.diffs.month
+
+        @month_label = MonthLabel.new(
+          number: rewrite_number(diff: diff.number),
+          is_many_days: rewrite_many_days(diff: diff.days),
+          leaped: rewrite_leaped(diff: diff.leaped)
+        )
+      end
+
+      #
+      # 月ごとの差分（月）で書き換える
+      #
+      # @param [Operation::Number] diff 差分
+      #
+      # @return [Integer] 月
+      #
+      def rewrite_number(diff:)
+        return month_label.number if diff.invalid?
+
+        diff.actual
+      end
+
+      #
+      # 月ごとの差分（月の大小）で書き換える
+      #
+      # @param [Operation::Days] diff 差分
+      #
+      # @return [Integer] 月の大小
+      #
+      def rewrite_many_days(diff:)
+        return month_label.is_many_days if diff.invalid?
+
+        diff.many_days_actual?
+      end
+
+      #
+      # 月ごとの差分（閏有無）で書き換える
+      #
+      # @param [Operation::Days] diff 差分
+      #
+      # @return [True] 閏あり
+      # @return [False] 閏なし
+      #
+      def rewrite_leaped(diff:)
+        return month_label.leaped if diff.invalid?
+
+        diff.actual
+      end
+
+      #
+      # 二十四節気ごとの差分で書き換える
+      #
+      def rewrite_solar_terms
+        # TODO: リファクタリング
+        operated_solar_terms = []
+        matched, operated_solar_term = @operated_solar_terms.get(
+          western_date: @first_day.western_date
+        )
+
+        return unless matched
+
+        used = false
+        @solar_terms.each do |solar_term|
+          if operated_solar_term.index == solar_term.index
+            used = true
+            next
+          end
+
+          operated_solar_terms.push(solar_term)
+        end
+
+        operated_solar_terms.push(operated_solar_term) unless used
+
+        @solar_terms = operated_solar_terms
+      end
+
+      #
+      # 月初日ごとの差分で書き換える
+      #
+      def rewrite_first_day
+        diffs = @history.diffs
+        return if diffs.invalid_days?
+
+        days = diffs.days
+
+        @first_day = FirstDay.new(
+          western_date: rewrite_western_date(days: days),
+          remainder: rewrite_remainder(days: days)
+        )
+      end
+
+      #
+      # 月初日の大余小余を日差分で書き換える
+      #
+      # @param [Integer] days 日差分
+      #
+      # @return [Remainder] 月初日の大余小余
+      #
+      def rewrite_remainder(days:)
+        remainder = @first_day.remainder.clone
+        remainder.add!(Remainder.new(day: days, minute: 0, second: 0))
+
+        remainder
+      end
+
+      #
+      # 月初日の西暦日を日差分で書き換える
+      #
+      # @param [Integer] days 日差分
+      #
+      # @return [Western::Calendar] 月初日の西暦日
+      #
+      def rewrite_western_date(days:)
+        western_date = @first_day.western_date.clone
+        western_date += days
+
+        western_date
+      end
+    end
+  end
+end

data/lib/zakuro/version/senmyou/{summary/annual_data.rb → range/annual_range.rb}

@@ -2,7 +2,7 @@
 
 require_relative '../../../output/logger'
 require_relative '../base/remainder'
-require_relative '../monthly/month'
+require_relative '../monthly/initialized_month'
 require_relative '../base/solar_term'
 require_relative '../monthly/lunar_phase'
 require_relative '../stella/solar_orbit'
@@ -13,10 +13,12 @@ require_relative '../stella/lunar_orbit'
 module Zakuro
   # :nodoc:
   module Senmyou
-    # AnnualData 年間データ
-    module AnnualData
+    #
+    # AnnualRange 年間範囲
+    #
+    module AnnualRange
       # @return [Logger] ロガー
-      LOGGER = Logger.new(location: 'annual_data')
+      LOGGER = Logger.new(location: 'annual_range')
 
       # :reek:TooManyStatements { max_statements: 6 }
 
@@ -61,20 +63,20 @@ module Zakuro
       #
       # @return [Array<Month>] 1年データ
       #
-      def self.collect_annual_data_after_last_november_1st(western_year:)
-        annual_data = initialized_annual_data(western_year: western_year)
+      def self.collect_annual_range_after_last_november_1st(western_year:)
+        annual_range = initialized_annual_range(western_year: western_year)
 
-        apply_big_and_small_of_the_month(annual_data: annual_data)
+        apply_big_and_small_of_the_month(annual_range: annual_range)
 
-        SolarAverage.set_solar_terms_into_annual_data(western_year: western_year,
-                                                      annual_data: annual_data)
+        SolarAverage.set_solar_terms_into_annual_range(western_year: western_year,
+                                                       annual_range: annual_range)
 
         # 月間隔を取得するためだけの末尾要素を削除
-        annual_data.pop
+        annual_range.pop
 
-        adjust_leap_month(annual_data: annual_data)
+        adjust_leap_month(annual_range: annual_range)
 
-        annual_data
+        annual_range
       end
 
       #
@@ -112,7 +114,7 @@ module Zakuro
       #
       # @return [Array<Month>] 1年データ
       #
-      def self.initialized_annual_data(western_year:)
+      def self.initialized_annual_range(western_year:)
         result = []
         lunar_phase = LunarPhase.new(western_year: western_year)
 
@@ -126,29 +128,28 @@ module Zakuro
           adjusted = lunar_phase.next_month
 
           result.push(
-            Month.new(is_last_year: is_last_year, number: month,
-                      remainder: adjusted, phase_index: 0)
+            InitializedMonth.new(month_label: MonthLabel.new(number: month),
+                                 first_day: FirstDay.new(remainder: adjusted),
+                                 is_last_year: is_last_year, phase_index: 0)
           )
           is_last_year = false if month == 12
         end
         result
       end
-      private_class_method :initialized_annual_data
+      private_class_method :initialized_annual_range
 
       #
       # 1年データの各月に月の大小を設定する
       #
-      # @param [Array<Month>] annual_data 1年データ
-      #
-      def self.apply_big_and_small_of_the_month(annual_data:)
-        size = annual_data.size - 1
-        (0...size).each do |idx|
-          current_month = annual_data[idx]
-          next_month = annual_data[idx + 1]
-          current_month.is_many_days = \
-            current_month.remainder.same_remainder_divided_by_ten?(
-              other: next_month.remainder.day
-            )
+      # @param [Array<Month>] annual_range 1年データ
+      #
+      def self.apply_big_and_small_of_the_month(annual_range:)
+        annual_range.each_with_index do |range, index|
+          # 最後は比較対象がないためスキップする（=計算外の余分な月が最後に必要である）
+          next if index == annual_range.size - 1
+
+          next_month = annual_range[index + 1]
+          range.eval_many_days(next_month_day: next_month.remainder.day)
         end
       end
       private_class_method :apply_big_and_small_of_the_month
@@ -159,25 +160,22 @@ module Zakuro
       # 閏月が存在した場合に以降の月を1つずつ減らす
       # @example 7,8,9 と続く月の8月が閏の場合、7, 閏7, 8 となる
       #
-      # @param [Array<Month>] annual_data 1年データ
+      # @param [Array<Month>] annual_range 1年データ
       #
-      def self.adjust_leap_month(annual_data:)
+      def self.adjust_leap_month(annual_range:)
         # 閏による月の再調整を行う
         leaped = false
-        annual_data.each do |month|
-          if month.even_term.invalid?
-            month.leaped = true
-            leaped = true
-          end
+        annual_range.each_with_index do |month, index|
+          month.eval_leaped
+          # NOTE: 初回閏月（閏11月）は前回月が存在しないため調整外
+          leaped = true if month.leaped? && !index.zero?
+
           next unless leaped
 
           # NOTE: 常気法では閏月は2-3年に一度のため、1年に二度発生しない前提
-          number = month.number - 1
-          if number <= 0
-            month.is_last_year = true
-            number = 12
-          end
-          month.number = number
+
+          # 閏の分だけ1ヶ月ずらす
+          month.back_to_last_month
         end
       end
       private_class_method :adjust_leap_month

data/lib/zakuro/version/senmyou/range/full_range.rb

@@ -0,0 +1,324 @@
+# frozen_string_literal: true
+
+require_relative '../base/multi_gengou_roller'
+
+require_relative '../../../era/western'
+require_relative './annual_range'
+
+require_relative '../base/year'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Senmyou
+    # FullRange 完全範囲
+    #   ある日からある日の範囲を計算可能な年月範囲
+    #   * 前提として元号年はその元号の開始年から数える
+    #   * ある日の元号年を求める場合、その元号が含まれる最初の年まで遡る
+    #   * 元号は一つとは限らない。南北朝などで二つある場合は、古い方の元号から求める
+    #
+    # NOTE: 割り当てた元号は年初を基準にした元号年である
+    #   * 元旦を基準にした時の正しい元号を設定している
+    #   * 引き当てたい日付が元旦ではない場合、その月日に従い元号を再度求める
+    #   * この再計算が必要になるのは、元号が切り替わる年のみである
+    class FullRange
+      # @return [Western::Calendar] 開始日
+      attr_reader :start_date
+      # @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
+
+      # @return [Logger] ロガー
+      LOGGER = Logger.new(location: 'full_range')
+
+      #
+      # 初期化
+      #
+      # @param [Western::Calendar] start_date 開始日
+      # @param [Western::Calendar] end_date 終了日
+      #
+      def initialize(start_date: Western::Calendar.new, end_date: Western::Calendar.new)
+        @start_date = start_date
+        @end_date = end_date
+        return if invalid?
+
+        @multi_gengou_roller = 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
+      end
+
+      #
+      # 無効か
+      #
+      # @return [True] 無効
+      # @return [False] 有効
+      #
+      def invalid?
+        @start_date.invalid?
+      end
+
+      #
+      # 完全範囲を取得する
+      #
+      # @return [Array<Year>] 完全範囲
+      #
+      def get
+        return [] if invalid?
+
+        pre_get
+
+        years = FullRange.rearranged_years(annual_ranges: annual_ranges)
+        years = update_gengou(years: years)
+        years = update_first_day(years: years)
+
+        post_get
+
+        years
+      end
+
+      #
+      # 取得前処理
+      #
+      def pre_get
+        # FIXME: 別インスタンス変数を定義する方法は改善したい（ディープコピーにするか、get再取得を廃止するか）
+        @new_year_date_ = @new_year_date.clone
+        @multi_gengou_roller_ = @multi_gengou_roller.clone
+      end
+
+      #
+      # 取得前処理
+      #
+      # 再取得に備えて、カウントアップした日付を元に戻す
+      #
+      def post_get
+        @new_year_date = @new_year_date_
+        @multi_gengou_roller = @multi_gengou_roller_
+      end
+
+      # :reek:TooManyStatements { max_statements: 6 }
+
+      #
+      # 完全範囲内の年データを取得する
+      #
+      # @return [Array<Year>] 年データ（冬至基準）
+      #
+      def annual_ranges
+        oldest_date = @new_year_date
+        newest_date = @multi_gengou_roller.newest_date
+
+        years = []
+        ((oldest_date.year)..(newest_date.year + 2)).each do |year|
+          years.push(
+            AnnualRange.collect_annual_range_after_last_november_1st(
+              western_year: year
+            )
+          )
+        end
+
+        years
+      end
+
+      #
+      # 完全範囲内の年データの開始月を変更する
+      #
+      # @param [Array<Year>] annual_ranges 年データ（冬至基準）
+      #
+      # @return [Array<Year>] 年データ（元旦基準）
+      #
+      def self.rearranged_years(annual_ranges:)
+        years = []
+
+        (0..(annual_ranges.size - 2)).each do |index|
+          year = rearranged_year(annual_ranges: annual_ranges, index: index)
+          years.push(year)
+        end
+
+        years
+      end
+
+      # :reek:TooManyStatements { max_statements: 8 }
+
+      #
+      # 完全範囲内の年データの元号を開始年基準で更新する
+      #
+      # @param [Array<Year>] years 年データ（元旦基準）
+      #
+      # @return [Array<Year>] 元号更新済み年データ（元旦基準）
+      #
+      def update_gengou(years:)
+        updated_years = []
+
+        nearest_end_date = choise_nearest_end_date
+
+        years.each do |year|
+          next_year(years: updated_years, year: 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
+
+      #
+      # 月初日の西暦日を更新する
+      #
+      # @param [Array<Year>] years 完全範囲（月初日なし）
+      #
+      # @return [Array<Year>] 完全範囲（月初日あり）
+      #
+      def update_first_day(years:)
+        # TODO: リファクタリング
+
+        result = []
+
+        years.each do |year|
+          new_year_date = year.new_year_date.clone
+          date = new_year_date.clone
+
+          months = []
+          year.months.each do |month|
+            first_day = month.first_day
+            updated_month = Month.new(
+              month_label: month.month_label,
+              first_day: FirstDay.new(remainder: first_day.remainder,
+                                      western_date: date),
+              solar_terms: month.solar_terms
+            )
+            months.push(updated_month)
+
+            date = date.clone + updated_month.days
+          end
+
+          updated_year = Year.new(
+            multi_gengou: year.multi_gengou, new_year_date: new_year_date,
+            months: months, total_days: year.total_days
+          )
+
+          result.push(updated_year)
+        end
+
+        result
+      end
+
+      #
+      # 当年データを生成する
+      #
+      # @param [Array<Year>] annual_ranges 年データ（冬至基準）
+      # @param [Year] year 対象年
+      #
+      # @return [Year] 当年月ありの対象年
+      #
+      def self.push_current_year(annual_range:, year: Year.new)
+        annual_range.each do |month|
+          next if month.is_last_year
+
+          year.push(month: month)
+        end
+
+        year
+      end
+
+      #
+      # 昨年データを生成する
+      #
+      # @param [Array<Year>] annual_ranges 年データ（冬至基準）
+      # @param [Year] year 対象年
+      #
+      # @return [Year] 昨年月ありの対象年
+      #
+      def self.push_last_year(annual_range:, year: Year.new)
+        annual_range.each do |month|
+          next unless month.is_last_year
+
+          year.push(month: month)
+        end
+
+        year
+      end
+
+      #
+      # 年データの開始月を変更する
+      #
+      # @param [Array<Year>] annual_ranges 年データ（冬至基準）
+      # @param [Integer] index 対象年の要素番号
+      #
+      # @return [Year] 年データ（元旦基準）
+      #
+      def self.rearranged_year(annual_ranges:, index:)
+        current_annual_range = annual_ranges[index]
+        next_annual_range = annual_ranges[index + 1]
+
+        year = push_current_year(annual_range: current_annual_range)
+        push_last_year(annual_range: next_annual_range, year: year)
+
+        year
+      end
+      private_class_method :rearranged_year
+
+      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)
+
+        nil
+      end
+
+      #
+      # 年の元号を更新する
+      #
+      # @param [Year] year 元号処理前の年（元旦基準）
+      #
+      # @return [Year] 元号処理済の年（元旦基準）
+      #
+      def update_year(year:)
+        multi_gengou = @multi_gengou_roller.multi_gengou.clone
+
+        updated_year = Year.new(multi_gengou: multi_gengou, new_year_date: @new_year_date.clone,
+                                months: year.months)
+        updated_year.commit
+
+        updated_year
+      end
+
+      #
+      # 次の年に進める
+      #
+      # @param [Integer] total_days 年の日数
+      #
+      def next_new_year_date(total_days:)
+        @new_year_date += total_days
+        @multi_gengou_roller.next(days: total_days)
+
+        nil
+      end
+
+      #
+      # 現在日からみて直近の未来に対する元号の切替前日を求める
+      #
+      # @return [Western::Calendar] 元号の切替前日
+      #
+      def choise_nearest_end_date
+        @multi_gengou_roller.choise_nearest_end_date
+      end
+    end
+  end
+end