module Pione
  module Log
    # DomainInfo is a domain log that records domain inputs and parameters.
    class DomainInfo
      # @return [Location::BasicLocation]
      #   domain's location
      attr_reader :domain_location

      # @return [Hash{String => String}]
      #   record table
      attr_reader :record

      # @param handler [RuleHandler::BasicHandler]
      #   rule handler
      def initialize(handler)
        @domain_location = handler.domain_location
        @record = {
          "uname" => `uname -a`.chomp,
          "params" => handler.params.textize,
          "original_params" => handler.original_params.textize,
          "inputs" => inputs_string(handler.inputs),
          "domain" => handler.domain,
          "domain_location" => @domain_location.uri.to_s,
          "task_id" => handler.task_id.to_s,
          "dry_run" => handler.dry_run.to_s
        }
      end

      # Save domain information file.
      #
      # @return [void]
      def save
        text = "== %s\n\n" % Time.now
        text << @record.map{|key, val| "- %s: %s" % [key,val]}.join("\n")
        text << "\n\n"
        (@domain_location + ".domain_info").append(text)
      end

      private

      # Build a record string for inputs.
      #
      # @param inputs [Array<Tuple::DataTuple>]
      #   input tuples
      # @return [String]
      #   a record string
      def inputs_string(inputs)
        "\n%s" % inputs.map.with_index(1) do |input, i|
          if input.kind_of?(Array)
            input.map{|_input| input_data_string(_input, i)}.join("\n")
          else
            input_data_string(input, i)
          end
        end.join("\n")
      end

      # Build a data tuple string.
      #
      # @param input [Tuple::DataTuple]
      #   data tuple
      # @param i [Integer]
      #   index number
      def input_data_string(input, i)
        i = i.to_s
        sp1 = " "*4
        sp2 = " "*(6+i.size)
        args = [sp1, i, input.name, sp2, input.location.uri, sp2, input.timestamp]
        "%s%s. %s,\n%s%s,\n%s%s" % args
      end
    end
  end
end