# require "arxutils_sqlite3"
require "ykutils"
require "fileutils"
# require "active_support"
require "active_record"
require "active_record/migration"
require "pp"

# ActiveRecord用ユーティリティモジュール
module Arxutils_Sqlite3
  ##
  # migrateに必要なファイルをテンプレートから作成し、migarteを実行する
  class Migrate
    attr_reader :migrate_dir

    # migrate用スクリプトファイル名の先頭の番号の間隔
    FILENAME_COUNTER_STEP = 10
    # DB接続までの初期化を行うDbinitクラスのインスタンス
    # attr_reader :dbinit

    # migrate用のスクリプトの生成、migrateの実行を行うmigratexの生成
    def initialize(
      config,
      dbconfig_dest_path,
      dbconfig_src_fname,
      db_scheme_ary,
      acrecord_config,
      migrate_dir
    )
      # アプリ構成情報
      @config = config
      # DB格納ディレクトリ名
      @db_dir = config.get_db_dir
      # DB構成ファイルの出力先ディレクトリ
      @dest_config_dir = config.get_config_dir
      # 生成するDB構成情報ファイルパス
      @dbconfig_dest_path = dbconfig_dest_path
      # 参照用DB構成情報ファイル名
      @dbconfig_src_fname = dbconfig_src_fname

      # テンプレートファイル格納ディレクトリ名
      @src_path = config.get_template_acrecord_dir
      # 構成ファイル格納ディレクトリ
      @src_config_path = config.get_template_config_dir
      #      @src_config_path = Arxutils_Sqlite3::TEMPLATE_CONFIG_DIR
      # データベーススキーマ定義配列
      @db_scheme_ary = db_scheme_ary
      # リレーション指定
      @acrecord_config = acrecord_config
      @migrate_dir = migrate_dir

      FileUtils.mkdir_p(@db_dir) if @db_dir
      FileUtils.mkdir_p(@migrate_dir) if @migrate_dir
      FileUtils.mkdir_p(@dest_config_dir)
    end

    # マイグレート用スクリプト、DB構成情報ファイル、DBファイルの削除
    def delete_migrate_and_config_and_db
      #    def delete_migrate_and_config
      delete_migrate
      Dir.glob(File.join(@dest_config_dir, "*")).each do |x|
        basename = File.basename(x)
        ret = !@config.exclude_file?(basename)
        ret_file = File.file?(x)
        FileUtils.rm(x) if ret_file && ret
      end
      delete_db
    end

    # マイグレート用スクリプト、DBファイルの削除
    def delete_migrate_and_db
      delete_migrate
      delete_db
    end

    # マイグレート用スクリプトの削除
    def delete_migrate
      return unless @migrate_dir

      Dir.glob(File.join(@migrate_dir, "*")).each do |x|
        FileUtils.rm(x) if File.file?(x)
      end
    end

    # DBファイルの削除
    def delete_db
      Dir.glob(File.join(@db_dir, "*")).each do |x|
        # puts x
        FileUtils.rm(x) if File.file?(x)
      end
    end

    # マイグレーション用スクリプトの生成、acrecordのクラス定義ファイルの生成
    def output
      # migrationのスクリプトをファイル出力する
      output_all_script

      # acrecordを表すクラス定義のファイルの内容を生成
      content_array = make_content_array
      # p "content_array=#{content_array}"
      # 複数形のクラス名を集める
      count_class_plurals = content_array.reject do |x|
        x[:need_count_class_plural].nil?
      end
      need_count_class_plural = count_class_plurals.map { |x| x[:need_count_class_plural] }
      # acrecordのmigrateが必要であれば、それをテンプレートファイルから作成して、スクリプトの内容として追加する
      if content_array.find { |x| !x.nil? }
        # p "####### 1"
        data_count = {
          count_classname: "Count",
          need_count_class_plural: need_count_class_plural
        }
        # p "data_count=#{data_count}"
        ary = content_array.collect { |x| x[:content] }.flatten
        count_content = convert_count_class_acrecord(data_count, "acrecord_count.tmpl")
        ary.unshift(count_content)
        content_array = ary
      end
      # acrecordのスクリプトを作成
      output_acrecord_script(content_array, @acrecord_config)
    end

    # migrationのスクリプトをファイル出力する
    def output_all_script
      # スキーマ設定配列から、migrate用のスクリプトを作成する
      @db_scheme_ary.map { |x| make_script_group(x) }.flatten(1).each_with_index do |data, index|
        idy = (index + 1) * FILENAME_COUNTER_STEP
        output_script(idy, *data)
      end
    end

    # acrecordを表すクラス定義のファイルの内容を生成
    def make_content_array
      # スキーマ設定配列から、acrecordのmigrate用のスクリプトの内容(ハッシュ形式)の配列を作成する
      acrecords = @db_scheme_ary.map do |x|
        make_acrecord(x, "count")
      end
      acrecords.select { |x| x.size.positive? }
    end

    # Countクラス用のacrecordのスクリプトの内容に変換
    def convert_count_class_acrecord(data, src_fname)
      convert(data, @src_path, src_fname)
    end

    # テンプレートファイルからスクリプトの内容に変換
    def convert(data, src_dir, src_fname)
      arx = Arx.new(data, File.join(src_dir, src_fname))
      # 指定テンプレートファイルからスクリプトの内容に作成
      arx.create
    end

    # データベース構成ファイルをテンプレートから生成する
    def make_dbconfig(data)
      content = convert(data, @src_config_path, @dbconfig_src_fname)
      File.open(
        @dbconfig_dest_path, "w:utf-8"
      ) do |f|
        f.puts(content)
      end
    end

    # 英子文字で表現したクラス名が、countを表していなければ、acrecordを
    # 英子文字で表現したクラス名が、countを表していれが、空のハッシュを返す
    # スキーマでbase, noitem以外のフィールドが指定されていれば、そのフィールドに対するacrecordの設定の内容を返す
    def make_acrecord(data, count_classname_downcase)
      if data[:classname_downcase] == count_classname_downcase
        {}
      else
        # 指定フィールドのフィールド名に対応したテンプレートファイルを用いて、acrecord設定を作成
        data[:flist].each_with_object({ content: [], need_count_class: nil }) do |field_name, s|
          case field_name
          when "base", "noitem"
            name_base = "acrecord"
            # data[:acrecord]がnilに設定されていたら改めて空の配列を設定
            data[:acrecord] = [] unless data[:acrecord]
          else
            data[:count_classname_downcase] = count_classname_downcase
            name_base = "acrecord_#{field_name}"
            s[:need_count_class_plural] ||= data[:plural]
          end
          # テンプレートファイルからスクリプトの内容を作成
          content = convert(data, @src_path, "#{name_base}.tmpl")
          s[:content] << content
        end
      end
    end

    # スキーマ設定からmigarte用スクリプトの内容を生成
    def make_script_group(data)
      # p data
      data[:flist].map do |kind|
        [kind,
         convert(data, @src_path, "#{kind}.tmpl"),
         data[:classname_downcase]]
      end
    end

    # migrationのスクリプトをファイル出力する
    def output_script(idy, kind, content, classname_downcase)
      additional = case kind
                   when "base", "noitem"
                     ""
                   else
                     kind
                   end
      fname = File.join(@migrate_dir, format("%03d_create_%s%s.rb", idy, additional, classname_downcase))
      File.open(fname, "w", **{ encoding: Encoding::UTF_8 }) do |f|
        f.puts(content)
      end
    end

    # acrecordのスクリプトをファイル出力する
    def output_acrecord_script(content_array, acrecord_config)
      dir = acrecord_config[:dir]
      fname = acrecord_config[:filename]
      fpath = File.join(dir, fname)
      File.open(fpath, "w") do |file|
        acrecord_config[:module].map { |mod| file.puts("module #{mod}") }
        content_array.map do |x|
          file.puts x
          file.puts ""
        end
        acrecord_config[:module].map { |_mod| file.puts("end") }
      end
    end
  end
end