zakuro 0.0.3 → 0.1.4

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

@@ -0,0 +1,187 @@
+# frozen_string_literal: true
+
+require_relative './first_day'
+require_relative './month_label'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Calculation
+    # :nodoc:
+    module Monthly
+      #
+      # Month 月情報
+      #
+      class Month
+        # @return [Context] 暦コンテキスト
+        attr_reader :context
+        # @return [MonthLabel] 月表示名
+        attr_reader :month_label
+        # @return [FirstDay] 月初日（朔日）
+        attr_reader :first_day
+        # @return [Array<SolarTerm>] 二十四節気
+        attr_reader :solar_terms
+
+        #
+        # 初期化
+        #
+        # @param [Context] context 暦コンテキスト
+        # @param [MonthLabel] month_label 月表示名
+        # @param [FirstDay] first_day 月初日（朔日）
+        # @param [Array<SolarTerm>] solar_terms 二十四節気
+        #
+        def initialize(context:, month_label: MonthLabel.new, first_day: FirstDay.new,
+                       solar_terms: [])
+          @context = context
+          @month_label = month_label
+          @first_day = first_day
+          @solar_terms = solar_terms
+        end
+
+        #
+        # 中気なしは閏月とする
+        #
+        def eval_leaped
+          leaped = even_term.invalid?
+
+          @month_label = MonthLabel.new(number: number, is_many_days: many_days?, leaped: leaped)
+        end
+
+        #
+        # 月初日の西暦日を返す
+        #
+        # @return [Western::Calendar] 西暦日
+        #
+        def western_date
+          @first_day.western_date
+        end
+
+        #
+        # 月初日の大余小余を返す
+        #
+        # @return [Remainder] 大余小余
+        #
+        def remainder
+          @first_day.remainder
+        end
+
+        #
+        # 月の大小を返す
+        #
+        # @return [True] 大の月（30日）
+        # @return [False] 小の月（29日）
+        #
+        def many_days?
+          @month_label.is_many_days
+        end
+
+        #
+        # 月の日数を返す
+        #
+        # @return [Integer] 日数
+        #
+        def days
+          @month_label.days
+        end
+
+        #
+        # 月の名前（大小）を返す
+        #
+        # @return [String] 月の名前（大小）
+        #
+        def days_name
+          @month_label.days_name
+        end
+
+        #
+        # 月を返す
+        #
+        # @return [Integer] 月（xx月のxx）
+        #
+        def number
+          @month_label.number
+        end
+
+        #
+        # 閏を返す
+        #
+        # @return [True] 閏月
+        # @return [False] 平月
+        #
+        def leaped?
+          @month_label.leaped
+        end
+
+        #
+        # 次月の大余から月の日数を定める
+        #
+        # @param [Integer] next_month_day 次月の大余
+        #
+        def eval_many_days(next_month_day:)
+          is_many_days = remainder.same_remainder_divided_by_ten?(other: next_month_day)
+
+          @month_label = MonthLabel.new(
+            number: number, is_many_days: is_many_days, leaped: leaped?
+          )
+        end
+
+        #
+        # 二十四節気が未設定かどうかを検証する
+        #
+        # @return [True] 設定なし
+        # @return [False] 設定あり
+        #
+        def empty_solar_term?
+          @solar_terms.empty?
+        end
+
+        #
+        # 中気を返す
+        #
+        # @return [SolarTerm] 中気
+        #
+        def even_term
+          @solar_terms.each do |term|
+            return term if term.index.even?
+          end
+
+          context.resolver.solar_term.new
+        end
+
+        #
+        # 節気を返す
+        #
+        # @return [SolarTerm] 節気
+        #
+        def odd_term
+          @solar_terms.each do |term|
+            return term if term.index.odd?
+          end
+
+          context.resolver.solar_term.new
+        end
+
+        #
+        # 二十四節気を追加する
+        #
+        # @param [SolarTerm] term 二十四節気
+        #
+        def add_term(term:)
+          @solar_terms.push(term)
+        end
+
+        #
+        # 同一の月情報かを検証する
+        #
+        # @param [Month] other 他の月情報
+        #
+        # @return [True] 同一の月
+        # @return [False] 異なる月
+        #
+        def same?(other:)
+          number == other.number && leaped? == other.leaped?
+        end
+      end
+    end
+  end
+end

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

@@ -0,0 +1,88 @@
+# frozen_string_literal: true
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Calculation
+    # :nodoc:
+    module Monthly
+      #
+      # 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
+end

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

@@ -0,0 +1,209 @@
+# frozen_string_literal: true
+
+require_relative './month'
+require_relative '../../operation/operation'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Calculation
+    # :nodoc:
+    module Monthly
+      # :reek:TooManyInstanceVariables { max_instance_variables: 5 }
+
+      #
+      # OperatedMonth 月情報（運用）
+      #
+      class OperatedMonth < Month
+        # @return [Operation::MonthHistory] 変更履歴（月）
+        attr_reader :history
+        # @return [OperatedSolarTerms] 運用時二十四節気
+        attr_reader :operated_solar_terms
+
+        # :reek:LongParameterList {max_params: 6}
+        # rubocop:disable Metrics/ParameterLists
+
+        #
+        # 初期化
+        #
+        # @param [Context] context 暦コンテキスト
+        # @param [OperatedSolarTerms] operated_solar_terms 運用時二十四節気
+        # @param [MonthLabel] month_label 月表示名
+        # @param [FirstDay] first_day 月初日（朔日）
+        # @param [Array<SolarTerm>] solar_terms 二十四節気
+        # @param [Operation::MonthHistory] history 変更履歴（月）
+        #
+        def initialize(context:, operated_solar_terms:, month_label: MonthLabel.new,
+                       first_day: FirstDay.new, solar_terms: [],
+                       history: Operation::MonthHistory.new)
+          super(context: context, month_label: month_label, first_day: first_day,
+                solar_terms: solar_terms)
+          @history = history
+          @operated_solar_terms = operated_solar_terms
+        end
+
+        # rubocop:enable Metrics/ParameterLists
+
+        #
+        # 書き換える
+        #
+        def rewrite
+          rewrite_month
+          rewrite_solar_terms
+          rewrite_first_day
+        end
+
+        #
+        # 月ごとの差分で書き換える
+        #
+        def rewrite_month
+          diff = history.diffs.month
+
+          @month_label = MonthLabel.new(
+            number: OperatedMonth.rewrite_month_fields(
+              month_diff: diff, month_label: month_label, name: 'number'
+            ),
+            is_many_days: OperatedMonth.rewrite_month_fields(
+              month_diff: diff, month_label: month_label, name: 'is_many_days'
+            ),
+            leaped: OperatedMonth.rewrite_month_fields(
+              month_diff: diff, month_label: month_label, name: 'leaped'
+            )
+          )
+        end
+
+        def self.rewrite_month_fields(month_diff:, month_label:, name:)
+          method_name = name.intern
+
+          diff = month_diff.send(method_name)
+          default = month_label.send(method_name)
+          return default if diff.invalid?
+
+          diff.actual
+        end
+
+        #
+        # 二十四節気ごとの差分で書き換える
+        #
+        def rewrite_solar_terms
+          matched, operated_solar_term = @operated_solar_terms.get(
+            western_date: first_day.western_date
+          )
+
+          return unless matched
+
+          @solar_terms = OperatedMonth.create_operated_solar_terms(
+            operated_solar_term: operated_solar_term,
+            solar_terms: solar_terms
+          )
+        end
+
+        #
+        # <Description>
+        #
+        # @param [<Type>] operated_solar_term <description>
+        # @param [Array<SolarTerm>] solar_terms 二十四節気
+        #
+        # @return [Array<SolarTerm>] 二十四節気
+        #
+        def self.create_operated_solar_terms(operated_solar_term:, solar_terms:)
+          index = operated_solar_term.index
+
+          # 別の月に移動する二十四節気。割り当てない。
+          result = remove_solar_term(index: index, solar_terms: solar_terms)
+
+          return result if used_solar_term?(index: index, solar_terms: solar_terms)
+
+          result.push(operated_solar_term)
+
+          result
+        end
+
+        # :reek:ControlParameter
+
+        #
+        # 二十四節気が使用されているか
+        #
+        # @param [Integer] index 二十四節気番号
+        # @param [Array<SolarTerm>] solar_terms 二十四節気
+        #
+        # @return [True] 使用
+        # @return [False] 未使用
+        #
+        def self.used_solar_term?(index:, solar_terms:)
+          solar_terms.each do |solar_term|
+            return true if index == solar_term.index
+          end
+
+          false
+        end
+
+        # :reek:ControlParameter
+
+        #
+        # 対象の二十四節気を除外する
+        #
+        # @param [Integer] index 二十四節気番号
+        # @param [Array<SolarTerm>] solar_terms 二十四節気
+        #
+        # @return [Array<SolarTerm>] 二十四節気（対象除外済）
+        #
+        def self.remove_solar_term(index:, solar_terms:)
+          result = []
+          solar_terms.each do |solar_term|
+            next if index == solar_term.index
+
+            result.push(solar_term)
+          end
+
+          result
+        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!(
+            context.resolver.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
+end