require 'thor'
require 'eucalypt/errors'
require 'eucalypt/helpers'
require 'eucalypt/eucalypt-blog/helpers'

module Eucalypt
  class BlogArticleEdit < Thor
    include Thor::Actions
    include Eucalypt::Helpers
    include Eucalypt::Helpers::Messages
    include Eucalypt::Blog::Helpers
    using Colorize

    desc "datetime [URLTITLE]", "Edits the datetime of a blog post".colorize(:grey)
    def datetime(urltitle = nil)
      directory = File.expand_path('.')
      if Eucalypt.app? directory
        return unless Gemfile.check(%w[front_matter_parser rdiscount], 'eucalypt blog setup', directory)

        article_base = File.join directory, 'app', 'views', 'blog', 'markdown'
        article_asset_base = File.join directory, 'app', 'assets', 'blog'
        articles = Dir[File.join article_base, '**','*.md']

        if articles.empty?
          Eucalypt::Error.no_articles
          return
        end

        if urltitle
          if articles.any? {|a| File.basename(a, '.md') == urltitle}
            articles = articles.select {|a| File.basename(a, '.md') == urltitle}
          else
            Eucalypt::Error.no_articles
            return
          end
        end

        articles_hash = Eucalypt::Blog::Helpers.send :build_article_hash, articles, article_base
        article_number = ask("Enter the number of the article to edit:", limited_to: articles_hash.keys.map(&:to_s))
        article = articles_hash[article_number.to_sym]

        current_datetime = article[:front_matter]['time']
        puts "\n\tCurrent datetime: #{current_datetime.colorize(:bold)}"

        new_datetime = ''
        loop do
          new_datetime = ask "\nEnter the new datetime (format YYYY-MM-DD HH:MM:SS):"
          valid = false
          begin
            DateTime.strptime(new_datetime, "%Y-%m-%d %H:%M:%S").tap do |output|
              valid = output.strftime("%Y-%m-%d %H:%M:%S") == new_datetime
            end
          rescue ArgumentError
            Out.error 'Incorrect datetime format.'
          end
          break if valid
        end

        new_date, new_time = new_datetime.split
        current_date, current_time = current_datetime.split

        update = ask Out.warning_message("Change datetime from #{current_datetime.colorize(:bold)} to #{new_datetime.colorize(:bold)}?"), limited_to: %w[y Y Yes YES n N No NO]
        return unless %w[y Y Yes YES].include? update

        gsub_file(
          article[:path],
          /time\:.*\n/,
          "time: \"#{new_datetime}\"\n"
        )

        gsub_file(
          article[:path],
          "/assets/#{current_date.gsub(?-,?/)}/#{article[:front_matter]['urltitle']}",
          "/assets/#{new_date.gsub(?-,?/)}/#{article[:front_matter]['urltitle']}"
        )

        Dir.chdir(article_asset_base) do
          relative_from_urltitle = File.join
          asset_files = Dir[File.join article[:identifier], '**', '*']
          asset_files.each do |file|
            next unless File.file? file
            path_to_urltitle = File.join article_asset_base, article[:identifier]
            full_file_path = File.join article_asset_base, file
            relative_to_urltitle = full_file_path.split(path_to_urltitle.gsub(/\/$/,'')<<?/).last
            destination_date = File.join article_asset_base, new_date.gsub(?-,?/)
            destination = File.join destination_date, article[:front_matter]['urltitle'], relative_to_urltitle

            reset = Eucalypt::Blog::Article::Edit.source_root
            Eucalypt::Blog::Article::Edit.source_root(article_asset_base)
            copy_file file, destination
            Eucalypt::Blog::Article::Edit.source_root(reset)
            remove_file(full_file_path)
          end
          FileUtils.mkdir_p File.join(new_date.gsub(?-,?/), File.basename(article[:base_name], '.md'))
          FileUtils.rm_rf article[:identifier]
        end

        Eucalypt::Blog::Helpers.send :clean_directory, article_asset_base

        Dir.chdir(article_base) do
          destination_directory = File.join new_date.gsub(?-,?/)
          FileUtils.mkdir_p(destination_directory)
          FileUtils.mv(article[:identifier] << '.md', destination_directory)
        end

        Eucalypt::Blog::Helpers.send :clean_directory, article_base

      else
        Eucalypt::Error.wrong_directory
      end
    end
  end
end