class Thor::Shell::Basic

def ask(statement, color=nil)
  say("#{statement} ", color)
  $stdin.gets.strip
end

def error(statement)
  $stderr.puts statement
end

def file_collision(destination)
  return true if @always_force
  options = block_given? ? "[Ynaqdh]" : "[Ynaqh]"
  while true
    answer = ask %[Overwrite #{destination}? (enter "h" for help) #{options}]
    case answer
      when is?(:yes), is?(:force)
        return true
      when is?(:no), is?(:skip)
        return false
      when is?(:always)
        return @always_force = true
      when is?(:quit)
        say 'Aborting...'
        raise SystemExit
      when is?(:diff)
        show_diff(destination, yield) if block_given?
        say 'Retrying...'
      else
        say file_collision_help
    end
  end
end

def file_collision_help #:nodoc:
 overwrite
do not overwrite
 overwrite this and all others
, abort
, show the differences between the old and the new
, show this help
end

def initialize #:nodoc:
  @base, @padding = nil, 0
end

def is?(value) #:nodoc:
  value = value.to_s
  if value.size == 1
    /\A#{value}\z/i
  else
    /\A(#{value}|#{value[0,1]})\z/i
  end
end

def no?(statement, color=nil)
  !yes?(statement, color)
end

def padding=(value)
  @padding = [0, value].max
end

def print_list(list, options={})
  return if list.empty?
  ident   = " " * (options[:ident] || 0)
  content = case options[:mode]
    when :inline
      last = list.pop
      "#{list.join(", ")}, and #{last}"
    else # rows
      ident + list.join("\n#{ident}")
  end
  $stdout.puts content
end

def print_table(table, options={})
  return if table.empty?
  formats = []
  0.upto(table.first.length - 2) do |i|
    maxima = table.max{ |a,b| a[i].size <=> b[i].size }[i].size
    formats << "%-#{maxima + 2}s"
  end
  formats[0] = formats[0].insert(0, " " * options[:ident]) if options[:ident]
  formats << "%s"
  table.each do |row|
    row.each_with_index do |column, i|
      $stdout.print formats[i] % column.to_s
    end
    $stdout.puts
  end
end

def quiet? #:nodoc:
  base && base.options[:quiet]
end

def say(message="", color=nil, force_new_line=(message.to_s !~ /( |\t)$/))
  message  = message.to_s
  message  = set_color(message, color) if color
  if force_new_line
    $stdout.puts(message)
  else
    $stdout.print(message)
    $stdout.flush
  end
end

def say_status(status, message, log_status=true)
  return if quiet? || log_status == false
  spaces = "  " * (padding + 1)
  color  = log_status.is_a?(Symbol) ? log_status : :green
  status = status.to_s.rjust(12)
  status = set_color status, color, true if color
  say "#{status}#{spaces}#{message}", nil, true
end

def set_color(string, color, bold=false) #:nodoc:
  string
end

def show_diff(destination, content) #:nodoc:
  diff_cmd = ENV['THOR_DIFF'] || ENV['RAILS_DIFF'] || 'diff -u'
  Tempfile.open(File.basename(destination), File.dirname(destination)) do |temp|
    temp.write content
    temp.rewind
    system %(#{diff_cmd} "#{destination}" "#{temp.path}")
  end
end

def yes?(statement, color=nil)
  ask(statement, color) =~ is?(:yes)
end