zakuro 0.0.0 → 0.1.1

data/lib/zakuro/result/result.rb

@@ -0,0 +1,37 @@
+# frozen_string_literal: true
+
+require 'json'
+
+require_relative './core'
+require_relative './data'
+require_relative './operation'
+
+# :nodoc:
+module Zakuro
+  #
+  # Result 演算結果
+  #
+  module Result
+    #
+    # Single 1日検索結果
+    #
+    class Single < Core
+      # @return [Data::SingleDay] 1日
+      attr_reader :data
+      # @return [Operation::Bundle] 運用情報
+      attr_reader :operation
+
+      #
+      # 初期化
+      #
+      # @param [Data::SingleDay] data 1日
+      # @param [Operation::Bundle] operation 運用情報
+      #
+      def initialize(data:, operation:)
+        super
+        @data = data
+        @operation = operation
+      end
+    end
+  end
+end

data/lib/zakuro/{output → tools}/stringifier.rb

@@ -1,11 +1,13 @@
 # frozen_string_literal: true
 
+require_relative './typeof'
+
 # :nodoc:
 module Zakuro
   #
-  # Result 演算結果
+  # Tools 汎用メソッド群
   #
-  module Result
+  module Tools
     #
     # Stringifier 文字列処理
     #
@@ -18,16 +20,18 @@ module Zakuro
       #
       # @return [Hash<String, Objcet>] ハッシュ
       #
-      def self.to_h(obj:, class_prefix:)
+      def self.to_h(obj:, class_prefix:, formatted: true)
         hash = {}
         obj.instance_variables.each do |var|
           key = var.to_s.delete('@')
-          hash[key] = value_to_hash(obj: obj.instance_variable_get(var), class_prefix: class_prefix)
+          hash[key] = value_to_hash(
+            obj: obj.instance_variable_get(var), class_prefix: class_prefix, formatted: formatted
+          )
         end
         hash
       end
 
-      # :reek:TooManyStatements { max_statements: 7 } and :reek:NilCheck
+      # :reek:TooManyStatements { max_statements: 7 }
 
       #
       # 対象インスタンスをハッシュ化する（再帰処理）
@@ -37,19 +41,22 @@ module Zakuro
       #
       # @return [Hash<String, Objcet>] ハッシュ
       #
-      def self.value_to_hash(obj:, class_prefix:)
-        return obj if obj.nil?
+      def self.value_to_hash(obj:, class_prefix:, formatted:)
+        return obj unless obj
+
+        # 日付をフォーマットする
+        return obj.format if formatted && Tools::Typeof.time?(obj: obj)
 
         # 同じモジュール内のオブジェクトは再帰する
         if obj.class.name.start_with?(class_prefix)
-          return to_h(obj: obj, class_prefix: class_prefix)
+          return to_h(obj: obj, class_prefix: class_prefix, formatted: formatted)
         end
 
         # 配列は要素一つずつで再帰する
         if obj.is_a?(Array)
           arr = []
           obj.each do |item|
-            arr.push(to_h(obj: item, class_prefix: class_prefix))
+            arr.push(to_h(obj: item, class_prefix: class_prefix, formatted: formatted))
           end
           return arr
         end

data/lib/zakuro/tools/typeof.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+require_relative '../cycle/abstract_remainder'
+require_relative '../era/western'
+
+# :nodoc:
+module Zakuro
+  #
+  # Tools 汎用メソッド群
+  #
+  module Tools
+    #
+    # Typeof 型判定
+    #
+    module Typeof
+      #
+      # 時間を表す型か
+      #
+      # @param [Object] obj 引数
+      #
+      # @return [True] 時間型である
+      # @return [False] 時間型ではない
+      #
+      def self.time?(obj:)
+        return true if obj.is_a?(Western::Calendar)
+
+        return true if obj.is_a?(Cycle::AbstractRemainder)
+
+        false
+      end
+    end
+  end
+end

data/lib/zakuro/version.rb

@@ -3,5 +3,5 @@
 # :nodoc:
 module Zakuro
   # @return [String] library version
-  VERSION = '0.0.0'
+  VERSION = '0.1.1'
 end

data/lib/zakuro/version/senmyou/README.md

@@ -1,6 +1,6 @@
 # 宣明暦
 
-貞観4年1月1日（859/02/07）-貞享2年12月29日（1686/01/23）
+貞観4年1月1日（862/02/03）-貞享1年12月30日（1685/02/03）
 
 # 著者
 
@@ -100,6 +100,8 @@
 
 日本の旧暦（太陰太陽暦）において、元号は1月1日を境に改元または継続する
 
+NOTE: これは『日本暦日原典』をベースにした場合であり、多くの場合、実際の改元は1月1日ではない [返却される元号が実際の存在期間と一致しない](https://github.com/pldb/zakuro/issues/3)
+
 ここで問題となるのは、元号2年目以降はその前年までの計算結果が必要になることである
 
 西暦（太陽暦）のように1年あたりの日数は一定しない

data/lib/zakuro/version/senmyou/base/era.rb

@@ -1,6 +1,6 @@
 # frozen_string_literal: true
 
-require_relative '../../../era/japan'
+require_relative '../../../era/japan/gengou'
 require_relative '../../../era/western'
 require_relative '../../../cycle/zodiac'
 
@@ -12,6 +12,8 @@ module Zakuro
     # Era 宣明暦時代
     #
     module Era
+      # FIXME: JOUGAN_START_DATE は不要。'貞観' かどうかだけで良い
+
       # @return [Western::Calendar] 貞観1年1月1日
       JOUGAN_START_DATE = Western::Calendar.new(year: 859, month: 2, day: 7)
       # @return [Western::Calendar] 貞観4年1月1日

data/lib/zakuro/version/senmyou/base/multi_gengou.rb

@@ -0,0 +1,98 @@
+# frozen_string_literal: true
+
+require_relative '../../../era/japan/gengou'
+require_relative '../../../era/western'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Senmyou
+    #
+    # MultiGengou 複数元号
+    #
+    class MultiGengou
+      # @return [Japan::Gengou] 元号（1行目）
+      attr_reader :first_line
+      # @return [Japan::Gengou] 元号（2行目）
+      attr_reader :second_line
+      # @return [Western::Calendar] 元旦
+      attr_reader :new_year_date
+
+      def initialize(first_line: Japan::Gengou.new, second_line: Japan::Gengou.new,
+                     new_year_date: Western::Calendar.new)
+        @first_line = first_line
+        @second_line = second_line
+        @new_year_date = new_year_date
+      end
+
+      # :reek:TooManyStatements { max_statements: 7 }
+
+      #
+      # 改元する
+      #
+      # @param [Japan::Gengou] first_line 元号（1行目）
+      # @param [Japan::Gengou] second_line 元号（2行目）
+      #
+      # @return [MultiGengou] 自身
+      #
+      def transfer(first_line: Japan::Gengou.new, second_line: Japan::Gengou.new)
+        cloned_first_line = first_line.clone
+        cloned_second_line = second_line.clone
+
+        if integrated?(first_line: cloned_first_line, second_line: cloned_second_line)
+          @first_line = @second_line.clone
+          @second_line = cloned_second_line
+        end
+
+        @first_line = cloned_first_line if @first_line.name != first_line.name
+        @second_line = cloned_second_line if @second_line.name != second_line.name
+
+        self
+      end
+
+      #
+      # 次年にする
+      #
+      # @param [Japan::Gengou] first_line 元号（1行目）
+      # @param [Japan::Gengou] second_line 元号（2行目）
+      #
+      # @return [MultiGengou] 自身
+      #
+      def next_year
+        @first_line.next_year
+        @second_line.next_year
+
+        self
+      end
+
+      #
+      # ディープコピー
+      #
+      # @param [MultiGengou] obj 自身
+      #
+      def initialize_copy(obj)
+        @first_line = obj.first_line.clone
+        @second_line = obj.second_line.clone
+      end
+
+      private
+
+      #
+      # 複数元号を統一するかどうか
+      #
+      # @param [Japan::Gengou] first_line 元号（1行目）
+      # @param [Japan::Gengou] second_line 元号（2行目）
+      #
+      # @return [True] 統一する
+      # @return [False] 統一しない
+      #
+      def integrated?(first_line: Japan::Gengou.new, second_line: Japan::Gengou.new)
+        return false if @second_line.name != first_line.name
+
+        return false unless second_line.invalid?
+
+        true
+      end
+    end
+  end
+end

data/lib/zakuro/version/senmyou/base/multi_gengou_roller.rb

@@ -0,0 +1,217 @@
+# frozen_string_literal: true
+
+require_relative './era'
+require_relative './multi_gengou'
+
+require_relative '../../../era/japan/gengou'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Senmyou
+    # FIXME: 宣明暦に依存しない共通処理にする
+
+    #
+    # MultiGengouRoller 改元処理
+    #
+    class MultiGengouRoller
+      # @return [MultiGengou] 複数元号
+      attr_reader :multi_gengou
+      # @return [Western::Calendar] 元旦（元号が2つある場合は再過去の日付になる）
+      attr_reader :oldest_date
+      # @return [Western::Calendar] 元号内での最未来日（元号が2つある場合は再未来の日付になる）
+      attr_reader :newest_date
+      # @return [Western::Calendar] 現在日
+      attr_reader :current_date
+
+      def initialize(start_date: Era::START_DATE, end_date: Western::Calendar.new)
+        end_date = start_date if end_date.invalid?
+
+        @oldest_date = MultiGengouRoller.choise_oldest_gengou_date(
+          first_line: Era.first(start_date: start_date),
+          second_line: Era.second(start_date: start_date)
+        )
+        @current_date = @oldest_date.clone
+        @newest_date = MultiGengouRoller.choise_newest_gengou_date(
+          first_line: Era.first(start_date: end_date),
+          second_line: Era.second(start_date: end_date)
+        )
+
+        @multi_gengou = MultiGengou.new(
+          first_line: current_first_line,
+          second_line: current_second_line,
+          new_year_date: @oldest_date
+        )
+      end
+
+      #
+      # 現在日付を未来に進める
+      #
+      # @param [<Type>] days <description>
+      #
+      # @return [<Type>] <description>
+      #
+      def next(days: 0)
+        @current_date += days
+      end
+
+      #
+      # 現在日から元号（1行目）を取得する
+      #
+      # @return [Japan::Gengou] 元号（1行目）
+      #
+      def current_first_line
+        MultiGengouRoller.first_line(date: @current_date)
+      end
+
+      #
+      # 現在日から元号（2行目）を取得する
+      #
+      # @return [Japan::Gengou] 元号（2行目）
+      #
+      def current_second_line
+        MultiGengouRoller.second_line(date: @current_date)
+      end
+
+      #
+      # 改元する
+      #
+      # @return [MultiGengou] 複数元号
+      #
+      def transfer
+        MultiGengouRoller.transfer(multi_gengou: @multi_gengou, date: @current_date)
+      end
+
+      #
+      # 次年にする
+      #
+      # @return [MultiGengou] 複数元号
+      #
+      def next_year
+        @multi_gengou.next_year
+      end
+
+      #
+      # 元号（1行目）を取得する
+      #
+      # @return [Japan::Gengou] 元号（1行目）
+      #
+      def self.first_line(date: Western::Calender.new)
+        Era.first(start_date: date)
+      end
+
+      #
+      # 元号（2行目）を取得する
+      #
+      # @return [Japan::Gengou] 元号（2行目）
+      #
+      def self.second_line(date: Western::Calender.new)
+        Era.second(start_date: date)
+      end
+
+      #
+      # 改元する
+      #
+      # @param [MultiGengou] multi_gengou 複数元号
+      # @param [Western::Calendar] date 対象日
+      #
+      # @return [MultiGengou] 改元済み複数元号
+      #
+      def self.transfer(multi_gengou:, date:)
+        multi_gengou.transfer(
+          first_line: first_line(date: date),
+          second_line: second_line(date: date)
+        )
+
+        multi_gengou
+      end
+
+      #
+      # 現在日からみて直近の未来に対する元号の切替前日を求める
+      # @note 2つの元号が重複した場合はより過去の日となる
+      #
+      # @param [Japan::Gengou] first_line 元号（1行目）
+      # @param [Japan::Gengou] second_line 元号（2行目）
+      #
+      # @return [Western::Calendar] 元号の切替前日
+      #
+      def choise_nearest_end_date
+        condition = lambda do |first_date, second_date|
+          first_date < second_date ? first_date : second_date
+        end
+
+        second_line = current_second_line
+
+        MultiGengouRoller.choise_date(condition: condition, second_line: second_line,
+                                      first_date: current_first_line.end_date.clone,
+                                      second_date: second_line.end_date.clone)
+      end
+
+      #
+      # 最過去の元旦を求める
+      # @note 2つの元号が重複した場合はより過去の日となる
+      #
+      # @param [Japan::Gengou] first_line 元号（1行目）
+      # @param [Japan::Gengou] second_line 元号（2行目）
+      #
+      # @return [Western::Calendar] 最過去の元旦
+      #
+      def self.choise_oldest_gengou_date(first_line:, second_line:)
+        condition = lambda do |first_date, second_date|
+          first_date < second_date ? first_date : second_date
+        end
+        choise_date(condition: condition, second_line: second_line,
+                    first_date: first_line.new_year_date.clone,
+                    second_date: second_line.new_year_date.clone)
+      end
+
+      #
+      # 元号内での最未来日を求める
+      # @note 2つの元号が重複した場合はより未来の日となる
+      #
+      # @param [Japan::Gengou] first_line 元号（1行目）
+      # @param [Japan::Gengou] second_line 元号（2行目）
+      #
+      # @return [Western::Calendar] 最未来日
+      #
+      def self.choise_newest_gengou_date(first_line:, second_line:)
+        condition = lambda do |first_date, second_date|
+          first_date > second_date ? first_date : second_date
+        end
+        choise_date(condition: condition, second_line: second_line,
+                    first_date: first_line.end_date.clone, second_date: second_line.end_date.clone)
+      end
+
+      # :reek:LongParameterList {max_params: 4}
+
+      #
+      # 条件を元に日付を求める
+      #
+      # @param [Proc] condition 比較条件
+      # @param [Japan::Gengou] second_line 元号（2行目）
+      # @param [Western::Calendar] first_date 比較対象（1行目）
+      # @param [Western::Calendar] second_date 比較対象（2行目）
+      #
+      # @return [Western::Calendar] 比較結果
+      #
+      def self.choise_date(condition:, second_line:, first_date:, second_date:)
+        # first_lineは常に存在する
+        return first_date if second_line.invalid?
+
+        condition.call(first_date, second_date)
+      end
+
+      #
+      # ディープコピー
+      #
+      # @param [MultiGengou] obj 自身
+      #
+      def initialize_copy(obj)
+        @oldest_date = obj.oldest_date.clone
+        @current_date = obj.current_date.clone
+        @newest_date = obj.newest_date.clone
+        @multi_gengou = obj.multi_gengou.clone
+      end
+    end
+  end
+end