tokyo_metro 0.10.1

data/lib/tokyo_metro/modules/common/info.rb

@@ -0,0 +1,2 @@
+module TokyoMetro::Modules::Common::Info
+end

data/lib/tokyo_metro/modules/common/info/decision.rb

@@ -0,0 +1,2 @@
+module TokyoMetro::Modules::Common::Info::Decision
+end

data/lib/tokyo_metro/modules/common/info/decision/actual_starting_station.rb

@@ -0,0 +1,97 @@
+module TokyoMetro::Modules::Common::Info::Decision::ActualStartingStation
+
+  # @!group 列車の始発駅に関するメソッド (1) - 駅
+
+  ::TokyoMetro::Modules::Common::Dictionary::Station::StringInfo.constants( false ).each do | const_name |
+    eval <<-DEF
+      def actually_starting_at_#{ const_name.downcase }?
+        actually_starting?( ::TokyoMetro::Modules::Common::Dictionary::Station::StringInfo.#{ const_name.downcase } )
+      end
+    DEF
+
+    #-------- [alias]
+    [ :is_actually_starting_at , :actually_start_at ].each do | prefix |
+      eval <<-ALIAS
+        alias :#{ prefix }_#{ const_name.downcase }? :actually_starting_at_#{ const_name.downcase }?
+      ALIAS
+    end
+  end
+
+  ::TokyoMetro::Modules::Common::Dictionary::Station::RegexpInfo.constants( false ).each do | const_name |
+    eval <<-DEF
+      def actually_starting_at_#{ const_name.downcase }?
+        actually_starting?( ::TokyoMetro::Modules::Common::Dictionary::Station::RegexpInfo.#{ const_name.downcase } )
+      end
+    DEF
+
+    #-------- [alias]
+    [ :is_actually_starting_at , :actually_start_at ].each do | prefix |
+      eval <<-ALIAS
+        alias :#{ prefix }_#{ const_name.downcase }? :actually_starting_at_#{ const_name.downcase }?
+      ALIAS
+    end
+  end
+
+  # @!group 列車の始発駅に関するメソッド (2) - 路線
+
+  ::TokyoMetro::Modules::Common::Dictionary::RailwayLine::RegexpInfo.constants( false ).each do | const_name |
+    eval <<-DEF
+      def actually_starting_on_#{ const_name.downcase }?
+        actually_starting?( ::TokyoMetro::Modules::Common::Dictionary::RailwayLine::RegexpInfo.#{ const_name.downcase } )
+      end
+    DEF
+
+    #-------- [alias]
+    [ :is_actually_starting_on , :actually_start_on ].each do | prefix |
+      eval <<-ALIAS
+        alias :#{ prefix }_#{ const_name.downcase }? :actually_starting_on_#{ const_name.downcase }?
+      ALIAS
+    end
+  end
+
+  # @!group 列車の始発駅に関するメソッド (3) - 区間
+
+  def actually_starting_on_marunouchi_branch_line_including_invalid?
+    actually_starting?( ::TokyoMetro::Modules::Common::Dictionary::Station::StringList.between_honancho_and_nakano_sakaue_including_invalid )
+  end
+
+  #-------- [alias]
+  [ :is_actually_starting_on , :actually_start_on ].each do | prefix |
+    eval <<-ALIAS
+      alias :#{ prefix }_marunouchi_branch_line_including_invalid? :actually_starting_on_marunouchi_branch_line_including_invalid?
+    ALIAS
+  end
+
+  # @!group 列車の始発駅に関するメソッド (4) - 東急東横線・みなとみらい線
+
+  def actually_starting_on_tokyu_toyoko_or_minatomirai_line?
+    actually_starting_on_tokyu_toyoko_line? or actually_starting_on_minatomirai_line?
+ end
+
+  def actually_starting_on_tokyu_toyoko_or_at_motomachi_chukagai?
+    actually_starting_on_tokyu_toyoko_line? or actually_starting_at_motomachi_chukagai?
+ end
+
+  #-------- [alias]
+  [ :is_actually_starting_on , :actually_start_on ].each do | prefix |
+    eval <<-ALIAS
+      alias :#{ prefix }_tokyu_toyoko_or_minatomirai_line? :actually_starting_on_tokyu_toyoko_or_minatomirai_line?
+      alias :#{ prefix }_tokyu_toyoko_or_at_motomachi_chukagai? :actually_starting_on_tokyu_toyoko_or_at_motomachi_chukagai?
+    ALIAS
+  end
+
+  # @!endgroup
+
+  private
+
+  # @param args [Regexp or String] 比較に使用する正規表現または文字列
+  # @param compared [String] 比較対象（include されるクラスで指定する）
+  # @note include されるクラス・モジュールで、super を用いるなどして上書きする。（include されるクラスにより、compared の部分が @starting_station になったり @starting_station_info_in_db.same_as になったりするため）
+  def actually_starting?( *args , compared )
+    compare_base( args , compared )
+  end
+
+  alias :is_actually_starting? :actually_starting?
+  alias :actually_start? :actually_starting?
+
+end

data/lib/tokyo_metro/modules/common/info/decision/actual_terminal_station.rb

@@ -0,0 +1,104 @@
+module TokyoMetro::Modules::Common::Info::Decision::ActualTerminalStation
+
+  # @!group 列車の行先に関するメソッド (1) - 駅
+
+  def actually_bound_for?( *args , compared )
+    compare_base( args , compared )
+  end
+
+  #-------- [alias]
+  alias :is_actually_bound_for? :actually_bound_for?
+
+  ::TokyoMetro::Modules::Common::Dictionary::Station::StringInfo.constants( false ).each do | const_name |
+    eval <<-DEF
+      def actually_terminating_at_#{ const_name.downcase }?
+        actually_terminating?( ::TokyoMetro::Modules::Common::Dictionary::Station::StringInfo.#{ const_name.downcase } )
+      end
+    DEF
+
+    #-------- [alias]
+    [ :is_actually_terminating_at , :actually_terminate_at ].each do | prefix |
+      eval <<-ALIAS
+        alias :#{ prefix }_#{ const_name.downcase }? :actually_terminating_at_#{ const_name.downcase }?
+      ALIAS
+    end
+  end
+
+  ::TokyoMetro::Modules::Common::Dictionary::Station::RegexpInfo.constants( false ).each do | const_name |
+    eval <<-DEF
+      def actually_terminating_at_#{ const_name.downcase }?
+        actually_terminating?( ::TokyoMetro::Modules::Common::Dictionary::Station::RegexpInfo.#{ const_name.downcase } )
+      end
+    DEF
+
+    #-------- [alias]
+    [ :is_actually_terminating_at , :actually_terminate_at ].each do | prefix |
+      eval <<-ALIAS
+        alias :#{ prefix }_#{ const_name.downcase }? :actually_terminating_at_#{ const_name.downcase }?
+      ALIAS
+    end
+  end
+
+  # @!group 列車の行先に関するメソッド (2) - 路線
+
+  ::TokyoMetro::Modules::Common::Dictionary::RailwayLine::RegexpInfo.constants( false ).each do | const_name |
+    eval <<-DEF
+      def actually_terminating_on_#{ const_name.downcase }?
+        actually_terminating?( ::TokyoMetro::Modules::Common::Dictionary::RailwayLine::RegexpInfo.#{ const_name.downcase } )
+      end
+    DEF
+
+    #-------- [alias]
+    [ :is_actually_terminating_on , :actually_terminate_on ].each do | prefix |
+      eval <<-ALIAS
+        alias :#{ prefix }_#{ const_name.downcase }? :actually_terminating_on_#{ const_name.downcase }?
+      ALIAS
+    end
+  end
+
+  # @!group 列車の行先に関するメソッド (3) - 区間
+
+  def actually_terminating_on_marunouchi_branch_line_including_invalid?
+    actually_terminating?( ::TokyoMetro::Modules::Common::Dictionary::Station::StringList.between_honancho_and_nakano_sakaue_including_invalid )
+  end
+
+  #-------- [alias]
+  [ :is_actually_terminating_on , :actually_terminate_on ].each do | prefix |
+    eval <<-ALIAS
+      alias :#{ prefix }_marunouchi_branch_line_including_invalid? :actually_terminating_on_marunouchi_branch_line_including_invalid?
+    ALIAS
+  end
+
+  # @!group 列車の行先に関するメソッド (4) - 東急東横線・みなとみらい線
+
+  def actually_terminating_on_tokyu_toyoko_or_minatomirai_line?
+    actually_terminating_on_tokyu_toyoko_line? or actually_terminating_on_minatomirai_line?
+ end
+
+  def actually_terminating_on_tokyu_toyoko_or_at_motomachi_chukagai?
+    actually_terminating_on_tokyu_toyoko_line? or actually_terminating_at_motomachi_chukagai?
+ end
+
+  #-------- [alias]
+  [ :is_actually_terminating_on , :actually_terminate_on ].each do | prefix |
+    eval <<-ALIAS
+      alias :#{ prefix }_tokyu_toyoko_or_minatomirai_line? :actually_terminating_on_tokyu_toyoko_or_minatomirai_line?
+      alias :#{ prefix }_tokyu_toyoko_or_at_motomachi_chukagai? :actually_terminating_on_tokyu_toyoko_or_at_motomachi_chukagai?
+    ALIAS
+  end
+
+  # @!endgroup
+
+  private
+
+  # @param args [Regexp or String] 比較に使用する正規表現または文字列
+  # @param compared [String] 比較対象（include されるクラスで指定する）
+  # @note include されるクラス・モジュールで、super を用いるなどして上書きする。
+  def actually_terminating?( *args , compared )
+    compare_base( args , compared )
+  end
+
+  alias :is_actually_terminating? :actually_terminating?
+  alias :actually_terminate? :actually_terminating?
+
+end

data/lib/tokyo_metro/modules/common/info/decision/arrival_station.rb

@@ -0,0 +1,41 @@
+module TokyoMetro::Modules::Common::Info::Decision::ArrivalStation
+
+  # @!group 到着駅に関するメソッド
+
+  def arrival_at_yoyogi_uehara?
+    arrival_at?( ::TokyoMetro::Modules::Common::Dictionary::Station::StringInfo.yoyogi_uehara )
+  end
+
+  def arrival_at_wakoshi?
+    arrival_at?( ::TokyoMetro::Modules::Common::Dictionary::Station::StringList.wakoshi )
+  end
+
+  def arrival_at_wakoshi_on_yurakucho_line?
+    arrival_at?( ::TokyoMetro::Modules::Common::Dictionary::Station::StringInfo.wakoshi_on_yurakucho_line )
+  end
+
+  def arrival_at_wakoshi_on_fukutoshin_line?
+    arrival_at?( ::TokyoMetro::Modules::Common::Dictionary::Station::StringInfo.wakoshi_on_fukutoshin_line )
+  end
+
+  #-------- [alias]
+  [ :at_yoyogi_uehara , :at_wakoshi , :at_wakoshi_on_yurakucho_line , :at_wakoshi_on_fukutoshin_line ].each do | method_base_name |
+    eval <<-ALIAS
+      alias :is_arrival_#{ method_base_name }? :arrival_#{ method_base_name }?
+      alias :arrive_#{ method_base_name }? :arrival_#{ method_base_name }?
+    ALIAS
+  end
+
+  # @!endgroup
+
+  private
+
+  # @param args [::Array <::String or ::Regexp>]
+  def arrival_at?( *args , compared )
+    compared.present? and compare_base( args , compared )
+  end
+
+  alias :is_arrival_at? :arrival_at?
+  alias :arrive_at? :arrival_at?
+
+end

data/lib/tokyo_metro/modules/common/info/decision/compare_base.rb

@@ -0,0 +1,30 @@
+module TokyoMetro::Modules::Common::Info::Decision::CompareBase
+
+  private
+
+  def compare_base( *args , compared )
+    raise if args.empty?
+
+    if compared.nil?
+      return false
+    end
+
+    args = args.flatten
+
+    unless args.instance_of?( ::Array ) and args.all? { | item | item.instance_of?( ::String ) or item.instance_of?( ::Regexp ) }
+      class_list = args.map { | item | item.class }
+      raise "#{ class_list.to_s } is not valid."
+    end
+    unless compared.instance_of?( ::String ) or ( compared.instance_of?( ::Array ) and compared.all? { | item | item.instance_of?( ::String ) } )
+      raise "Error: \[#{ compared.class.name }\] #{ compared.to_s }"
+    end
+    if compared.instance_of?( ::String )
+      args.any? { | item | item === compared }
+    else
+      compared.any? { | compared_each_item |
+        args.any? { | item | item === compared_each_item }
+      }
+    end
+  end
+
+end

data/lib/tokyo_metro/modules/common/info/decision/current_station.rb

@@ -0,0 +1,132 @@
+module TokyoMetro::Modules::Common::Info::Decision::CurrentStation
+
+  #---------------- is_at_xxx?
+  # @note ::TokyoMetro::Modules::Common::Dictionary::Station::StringInfo を用いて定義
+
+  # @example
+  #   at_honancho?
+  #   at_nakano_fujimicho?
+  #   at_nakano_shimbashi?
+  #   at_nakano_sakaue_on_marunouchi_line?
+  #   at_nakano_sakaue_on_marunouchi_branch_line?
+  #   at_ogikubo?
+  #   at_honancho_invalid?
+  #   at_nakano_fujimicho_invalid?
+  #   at_nakano_shimbashi_invalid?
+  #   at_mitaka?
+  #   at_tsudanuma?
+  #   at_yoyogi_uehara?
+  #   at_ayase_on_chiyoda_main_line?
+  #   at_ayase_on_chiyoda_branch_line?
+  #   at_kita_ayase_on_chiyoda_branch_line?
+  #   at_kita_ayase_on_chiyoda_main_line?
+  #   at_shirokane_takanawa?
+  #   at_wakoshi_on_yurakucho_line?
+  #   at_wakoshi_on_fukutoshin_line?
+  #   at_kotake_mukaihara_on_yurakucho_line?
+  #   at_kotake_mukaihara_on_fukutoshin_line?
+  #   at_ikebukuro_on_yurakucho_line?
+  #   at_ikebukuro_on_fukutoshin_line?
+  #   at_shibuya_on_fukutoshin_line?
+  #   at_motomachi_chukagai?
+
+  ::TokyoMetro::Modules::Common::Dictionary::Station::StringInfo.constants( false ).each do | const_name |
+    base_method_name = const_name.to_s.downcase
+    eval <<-DEF
+      def at_#{ base_method_name }?
+        station_same_as__is_in?( ::TokyoMetro::Modules::Common::Dictionary::Station::StringInfo.#{ base_method_name } )
+      end
+
+      #-------- [alias]
+      alias :is_at_#{ base_method_name }? :at_#{ base_method_name }?
+    DEF
+  end
+
+  #---------------- is_at_xxx?
+  # @note ::TokyoMetro::Modules::Common::Dictionary::Station::RegexpInfo を用いて定義
+
+  # @example
+  #   at_honancho_including_invalid?
+  #   at_nakano_fujimicho_including_invalid?
+  #   at_nakano_shimbashi_including_invalid?
+  #   at_nakano_sakaue?
+  #   at_ayase?
+  #   at_kita_ayase?
+  #   at_wakoshi?
+  #   at_chikatetsu_narimasu?
+  #   at_chikatetsu_akatsuka?
+  #   at_heiwadai?
+  #   at_hikawadai?
+  #   at_kotake_mukaihara?
+  #   at_senkawa?
+  #   at_kanamecho?
+  #   at_ikebukuro_on_yurakucho_or_fukutoshin_line?
+
+  ::TokyoMetro::Modules::Common::Dictionary::Station::RegexpInfo.constants( false ).each do | const_name |
+    base_method_name = const_name.to_s.downcase
+    eval <<-DEF
+      def at_#{ base_method_name }?
+        station_same_as__is_in?( ::TokyoMetro::Modules::Common::Dictionary::Station::RegexpInfo.#{ base_method_name } )
+      end
+
+      #-------- [alias]
+      alias :is_at_#{ base_method_name }? :at_#{ base_method_name }?
+    DEF
+  end
+
+  #---------------- is_between_xxx?
+  #---------------- is_at_xxx?
+  # @note ::TokyoMetro::Modules::Common::Dictionary::Station::StringList を用いて定義
+
+  # @example
+  #   between_honancho_and_nakano_shimbashi_including_invalid?
+  #   between_honancho_and_nakano_shimbashi?
+  #   between_honancho_and_nakano_sakaue_including_invalid?
+  #   between_honancho_and_nakano_sakaue?
+  #   at_wakoshi_or_kotake_mukaihara?
+  #   between_chikatetsu_narimasu_and_hikawadai?
+  #   between_wakoshi_and_hikawadai?
+  #   between_wakoshi_and_kotake_mukaihara?
+  #   between_senkawa_and_kanamecho?
+  #   between_wakoshi_and_kanamecho?
+  #   between_wakoshi_and_ikebukuro?
+  #   at_yurakucho_and_fukutoshin_common_station?
+  #   at_namboku_and_toei_mita_line_common_station?
+
+  ::TokyoMetro::Modules::Common::Dictionary::Station::StringList.constants( false ).map { | const_name |
+    const_name.to_s.downcase
+  }.delete_if { | base_method_name |
+    /_in_system\Z/ === base_method_name
+  }.each do | base_method_name |
+    case base_method_name
+    # between で始まる場合
+    when /\Abetween_/
+      defined_method_base_name = "#{ base_method_name }?"
+    # common_stations で終わる場合
+    when /common_stations\Z/
+      defined_method_base_name = "at_" + base_method_name.gsub( /common_stations\Z/ , "common_station" ) + "?"
+    # and が含まれる場合
+    when /and/
+      defined_method_base_name = "at_" + base_method_name.gsub( /and/ , "or" ) + "?"
+    else
+      next
+    end
+
+    eval <<-DEF
+      def #{defined_method_base_name}
+        station_same_as__is_in?( ::TokyoMetro::Modules::Common::Dictionary::Station::StringList.#{base_method_name} )
+      end
+
+      #-------- [alias]
+      alias :is_#{defined_method_base_name} :#{defined_method_base_name}
+    DEF
+
+  end
+
+  private
+
+  def station_same_as__is_in?( *args , compared )
+    compare_base( args , compared )
+  end
+
+end

data/lib/tokyo_metro/modules/common/info/decision/operator.rb

@@ -0,0 +1,19 @@
+module TokyoMetro::Modules::Common::Info::Decision::Operator
+
+  def tokyo_metro?
+    operator == "odpt.Operator:TokyoMetro"
+  end
+
+  def operated_by_tokyo_metro?
+    tokyo_metro?
+  end
+
+  [ :tokyo_metro? , :operated_by_tokyo_metro? ].each do | method_base_name |
+    eval <<-DEF
+      def not_#{ method_base_name }
+        !( #{ method_base_name } )
+      end
+    DEF
+  end
+
+end

data/lib/tokyo_metro/modules/common/info/decision/railway_line.rb

@@ -0,0 +1,54 @@
+module TokyoMetro::Modules::Common::Info::Decision::RailwayLine
+
+  # @!group 路線に関するメソッド
+
+  ::YAML.load_file( "#{ ::TokyoMetro::dictionary_dir }/railway_line/tokyo_metro_lines_in_system.yaml" ).each do | item |
+    railway_line_base_name = item.underscore.downcase
+    eval <<-DEF
+      def on_#{ railway_line_base_name }_line?
+        on_the_railway_line_of?( ::TokyoMetro::Modules::Common::Dictionary::RailwayLine::StringInfo.#{ railway_line_base_name } )
+      end
+
+      #-------- [alias]
+      alias :#{ railway_line_base_name }_line? :on_#{ railway_line_base_name }_line?
+      alias :is_on_#{ railway_line_base_name }_line? :on_#{ railway_line_base_name }_line?
+      alias :is_#{ railway_line_base_name }_line? :on_#{ railway_line_base_name }_line?
+    DEF
+  end
+
+  def on_marunouchi_line_including_branch?
+    on_the_railway_line_of?( *( ::TokyoMetro::Modules::Common::Dictionary::RailwayLine::StringList.marunouchi_main_and_branch_line_same_as ) )
+  end
+
+  def on_yurakucho_or_fukutoshin_line?
+    on_the_railway_line_of?( *( ::TokyoMetro::Modules::Common::Dictionary::RailwayLine::StringList.yurakucho_and_fukutoshin_line_same_as ) )
+  end
+
+  def on_toei_mita_line?
+    on_the_railway_line_of?( "odpt.Railway:Toei.Mita" )
+  end
+
+  def on_namboku_or_toei_mita_line?
+    on_namboku_line? or on_toei_mita_line?
+  end
+
+  #-------- [alias]
+  [ :marunouchi_line_including_branch , :yurakucho_or_fukutoshin_line , :namboku_or_toei_mita_line , :toei_mita_line ].each do | method_base_name |
+    eval <<-ALIAS
+      alias :#{method_base_name}? :on_#{method_base_name}?
+      alias :is_on_#{method_base_name}? :on_#{method_base_name}?
+      alias :is_#{method_base_name}? :on_#{method_base_name}?
+    ALIAS
+  end
+
+  # @!endgroup
+
+  private
+
+  def on_the_railway_line_of?( *args , compared )
+    compare_base( args , compared )
+  end
+
+  alias :is_on_the_railway_line_of? :on_the_railway_line_of?
+
+end