module LiteXBRL
  module TDnet
    class Summary2 < FinancialInformation2
      include SummaryAttribute, CompanyAttribute

      def self.read(doc)
        xbrl = read_data doc

        {summary: xbrl.attributes,
          results_forecast: [xbrl.attributes_results_forecast]}
      end

      private

      def self.read_data(doc)
        xbrl, context = find_base_data(doc)

        find_data(doc, xbrl, context)
      end

      def self.find_base_data(doc)
        season = find_season(doc)

        consolidation = find_consolidation(doc, season, NET_SALES)
        consolidation = find_consolidation(doc, season, OPERATING_INCOME) unless consolidation
        consolidation = find_consolidation(doc, season, ORDINARY_INCOME) unless consolidation
        consolidation = find_consolidation(doc, season, NET_INCOME) unless consolidation
        consolidation = find_consolidation(doc, season, NET_INCOME_PER_SHARE) unless consolidation
        raise StandardError.new("連結・非連結ともに該当しません。") unless consolidation

        context = context_hash(consolidation, season)

        xbrl = new

        # 証券コード
        xbrl.code = find_securities_code(doc, season)
        # 決算年・決算月
        xbrl.year, xbrl.month = find_year_and_month(doc)
        # 四半期
        xbrl.quarter = to_quarter(season)
        # 連結・非連結
        xbrl.consolidation = to_consolidation(consolidation)

        return xbrl, context
      end

      #
      # 通期・四半期を取得します
      #
      def self.find_season(doc)
        q1 = doc.at_xpath("//ix:nonNumeric[@contextRef='CurrentAccumulatedQ1Instant' and @name='tse-ed-t:SecuritiesCode']")
        q2 = doc.at_xpath("//ix:nonNumeric[@contextRef='CurrentAccumulatedQ2Instant' and @name='tse-ed-t:SecuritiesCode']")
        q3 = doc.at_xpath("//ix:nonNumeric[@contextRef='CurrentAccumulatedQ3Instant' and @name='tse-ed-t:SecuritiesCode']")
        year = doc.at_xpath("//ix:nonNumeric[@contextRef='CurrentYearInstant' and @name='tse-ed-t:SecuritiesCode']")

        if q1
          SEASON_Q1
        elsif q2
          SEASON_Q2
        elsif q3
          SEASON_Q3
        elsif year
          SEASON_Q4
        else
          raise StandardError.new("通期・四半期を取得出来ません。")
        end
      end

      #
      # 連結・非連結を取得します
      #
      def self.find_consolidation(doc, season, item)
        cons_current = find_value_tse_ed_t(doc, item, "Current#{season}Duration_ConsolidatedMember_ResultMember")
        cons_prev = find_value_tse_ed_t(doc, item, "Prior#{season}Duration_ConsolidatedMember_ResultMember")
        non_cons_current = find_value_tse_ed_t(doc, item, "Current#{season}Duration_NonConsolidatedMember_ResultMember")
        non_cons_prev = find_value_tse_ed_t(doc, item, "Prior#{season}Duration_NonConsolidatedMember_ResultMember")

        if cons_current || cons_prev
          "Consolidated"
        elsif non_cons_current || non_cons_prev
          "NonConsolidated"
        end
      end

      #
      # contextを設定します
      #
      def self.context_hash(consolidation, season)
        year_duration = "YearDuration_#{consolidation}Member_ForecastMember"

        {
          context_duration: "Current#{season}Duration_#{consolidation}Member_ResultMember",
          context_prior_duration: "Prior#{season}Duration_#{consolidation}Member_ResultMember",
          context_instant: "Current#{season}Instant",
          context_instant_consolidation: "Current#{season}Instant_#{consolidation}Member_ResultMember",
          context_instant_non_consolidated: "Current#{season}Instant_NonConsolidatedMember_ResultMember",
          context_forecast: ->(quarter) { quarter == 4 ? "Next#{year_duration}" : "Current#{year_duration}"},
        }
      end

      def self.find_data(doc, xbrl, context)
        # 売上高
        xbrl.net_sales = find_value_to_i(doc, NET_SALES, context[:context_duration])
        # 営業利益
        xbrl.operating_income = find_value_to_i(doc, OPERATING_INCOME, context[:context_duration])
        # 経常利益
        xbrl.ordinary_income = find_value_to_i(doc, ORDINARY_INCOME, context[:context_duration])
        # 純利益
        xbrl.net_income = find_value_to_i(doc, NET_INCOME, context[:context_duration])
        # 1株当たり純利益
        xbrl.net_income_per_share = find_value_to_f(doc, NET_INCOME_PER_SHARE, context[:context_duration])

        # 売上高前年比
        xbrl.change_in_net_sales = find_value_percent_to_f(doc, CHANGE_IN_NET_SALES, context[:context_duration])
        # 営業利益前年比
        xbrl.change_in_operating_income = find_value_percent_to_f(doc, CHANGE_IN_OPERATING_INCOME, context[:context_duration])
        # 経常利益前年比
        xbrl.change_in_ordinary_income = find_value_percent_to_f(doc, CHANGE_IN_ORDINARY_INCOME, context[:context_duration])
        # 純利益前年比
        xbrl.change_in_net_income = find_value_percent_to_f(doc, CHANGE_IN_NET_INCOME, context[:context_duration])

        # 前期売上高
        xbrl.prior_net_sales = find_value_to_i(doc, NET_SALES, context[:context_prior_duration])
        # 前期営業利益
        xbrl.prior_operating_income = find_value_to_i(doc, OPERATING_INCOME, context[:context_prior_duration])
        # 前期経常利益
        xbrl.prior_ordinary_income = find_value_to_i(doc, ORDINARY_INCOME, context[:context_prior_duration])
        # 前期純利益
        xbrl.prior_net_income = find_value_to_i(doc, NET_INCOME, context[:context_prior_duration])
        # 前期1株当たり純利益
        xbrl.prior_net_income_per_share = find_value_to_f(doc, NET_INCOME_PER_SHARE, context[:context_prior_duration])

        # 前期売上高前年比
        xbrl.change_in_prior_net_sales = find_value_percent_to_f(doc, CHANGE_IN_NET_SALES, context[:context_prior_duration])
        # 前期営業利益前年比
        xbrl.change_in_prior_operating_income = find_value_percent_to_f(doc, CHANGE_IN_OPERATING_INCOME, context[:context_prior_duration])
        # 前期経常利益前年比
        xbrl.change_in_prior_ordinary_income = find_value_percent_to_f(doc, CHANGE_IN_ORDINARY_INCOME, context[:context_prior_duration])
        # 前期純利益前年比
        xbrl.change_in_prior_net_income = find_value_percent_to_f(doc, CHANGE_IN_NET_INCOME, context[:context_prior_duration])

        # 株主資本
        xbrl.owners_equity = find_value_to_i(doc, OWNERS_EQUITY, context[:context_instant_consolidation])
        # 期末発行済株式数
        xbrl.number_of_shares = find_value_to_i(doc, NUMBER_OF_SHARES, context[:context_instant_non_consolidated])
        # 期末自己株式数
        xbrl.number_of_treasury_stock = find_value_to_i(doc, NUMBER_OF_TREASURY_STOCK, context[:context_instant_non_consolidated])
        # 1株当たり純資産
        xbrl.net_assets_per_share = find_value_to_f(doc, NET_ASSETS_PER_SHARE, context[:context_instant_consolidation])

        # 1株当たり純資産がない場合、以下の計算式で計算する
        # 1株当たり純資産 = 株主資本 / (期末発行済株式数 - 期末自己株式数)
        if xbrl.net_assets_per_share.nil? && xbrl.owners_equity && xbrl.number_of_shares
          xbrl.net_assets_per_share = (
            xbrl.owners_equity.to_f * 1000 * 1000 / (xbrl.number_of_shares - xbrl.number_of_treasury_stock.to_i)
          ).round 2
        end

        # 通期予想売上高
        xbrl.forecast_net_sales = find_value_to_i(doc, NET_SALES, context[:context_forecast].call(xbrl.quarter))
        # 通期予想営業利益
        xbrl.forecast_operating_income = find_value_to_i(doc, OPERATING_INCOME, context[:context_forecast].call(xbrl.quarter))
        # 通期予想経常利益
        xbrl.forecast_ordinary_income = find_value_to_i(doc, ORDINARY_INCOME, context[:context_forecast].call(xbrl.quarter))
        # 通期予想純利益
        xbrl.forecast_net_income = find_value_to_i(doc, NET_INCOME, context[:context_forecast].call(xbrl.quarter))
        # 通期予想1株当たり純利益
        xbrl.forecast_net_income_per_share = find_value_to_f(doc, NET_INCOME_PER_SHARE, context[:context_forecast].call(xbrl.quarter))

        # 通期予想売上高前年比
        xbrl.change_in_forecast_net_sales = find_value_percent_to_f(doc, CHANGE_IN_NET_SALES, context[:context_forecast].call(xbrl.quarter))
        # 通期予想営業利益前年比
        xbrl.change_in_forecast_operating_income = find_value_percent_to_f(doc, CHANGE_IN_OPERATING_INCOME, context[:context_forecast].call(xbrl.quarter))
        # 通期予想経常利益前年比
        xbrl.change_in_forecast_ordinary_income = find_value_percent_to_f(doc, CHANGE_IN_ORDINARY_INCOME, context[:context_forecast].call(xbrl.quarter))
        # 通期予想純利益前年比
        xbrl.change_in_forecast_net_income = find_value_percent_to_f(doc, CHANGE_IN_NET_INCOME, context[:context_forecast].call(xbrl.quarter))

        xbrl
      end

      def self.find_value_to_i(doc, item, context)
        to_i find_value_tse_ed_t(doc, item, context)
      end

      def self.find_value_to_f(doc, item, context)
        to_f find_value_tse_ed_t(doc, item, context)
      end

      def self.find_value_percent_to_f(doc, item, context)
        percent_to_f find_value_tse_ed_t(doc, item, context)
      end

      def self.parse_company(str)
        doc = Nokogiri::XML str
        xbrl, context = find_base_data(doc)

        # 企業名
        xbrl.company_name = find_value_non_numeric(doc, COMPANY_NAME, context[:context_instant])

        xbrl
      end

    end
  end
end