require 'erb'
require 'fileutils'

require_relative 'keyword'

module RCM
  # Managing files
  class File < Keyword
    attr_reader :path

    def initialize(path)
      super(path)
      @path = path
    end

    def content(text = nil)
      return @content if text.nil?

      @content = text.instance_of?(Array) ? text.join("\n") : text
    end

    def create_parent_directory = @create_parent = true
    def from_sourcefile = @from_sourcefile = true
    def from_template = @from_template = true
    def ensure_line(line) = @ensure_line = line

    def evaluate!
      return evaluate_ensure_line! unless @ensure_line.nil?

      write_content!(real_content)
    end

    private

    def evaluate_ensure_line!
      return write_content!(@ensure_line) unless ::File.file?(@path)
      return if ::File.readlines(@path, chomp: true).include?(@ensure_line)

      ::File.open(@path, 'a') do |fd|
        fd.puts(@ensure_line)
      end
    end

    def write_content!(text)
      create_parent_directory!
      debug text if option :debug
      info "Creating file #{@path}"
      tmp_path = "#{@path}.tmp"
      ::File.write(tmp_path, text)
      ::File.rename(tmp_path, @path)
    end

    def create_parent_directory!
      dirname = ::File.dirname(@path)
      return unless !::File.directory?(dirname) && @create_parent

      info "Creating parent directory #{dirname}"
      FileUtils.mkdir_p(dirname)
    end

    def real_content
      text = @from_sourcefile ? ::File.read(@content) : @content
      @from_template ? ERB.new(text).result : text
    end
  end

  # Add file keyword to the DSL
  class DSL
    def file(path, &block)
      return unless @conds_met

      f = File.new(path)
      f.content(f.instance_eval(&block))
      self << f
      f
    end
  end
end