decko-commons/decko

require "cardio/mod/dirs"

module Cardio
  class Mod
    # class methods for Cardio::Mod
    module ClassMethods
      def load
        return if ENV["CARD_MODS"] == "none"

        if Card.take
          Loader.load_mods
        else
          Rails.logger.warn "empty database"
        end
      end

      # @return an array of Rails::Path objects
      def dirs
        @dirs ||= Mod::Dirs.new Cardio.paths["mod"].existent
      end

      def fetch mod_name
        dirs.fetch_mod mod_name
      end

      def normalize_name name
        name.to_s.sub(/^card-mod-/, "")
      end

      def leftover
        Card.search(type: :mod).reject { |mod_card| fetch mod_card.modname }
      end

      def ensure_uninstalled
        leftover.each do |mod_card|
          Card::Auth.as_bot do
            delete_auto_installed_cards mod_card
          end
        end
      end

      def ensure_installed
        Card::Auth.as_bot do
          Card::Cache.reset_all
          puts "installing card mods".green
          ensure_asset_lists do |hash|
            puts "ensuring mod and asset cards"
            Cardio.mods.each { |mod| ensure_asset_cards mod.ensure_card, hash }
          end
        end
      end

      def dependencies name, nickname=true
        return unless (spec = gem_spec name, nickname)

        deps = spec&.dependencies || []
        dep_names = deps.map { |dep| dependencies dep.name, false }
        (dep_names << spec).flatten.compact.uniq
      end

      # @return [Hash] in the form{ modname(String) => Gem::Specification }
      def gem_specs
        Bundler.definition.specs.each_with_object({}) do |gem_spec, h|
          h[gem_spec.name] = gem_spec if gem_spec? gem_spec
        end
      end

      private

      def ensure_asset_cards modcard, hash
        %i[script style].each do |asset_type|
          hash[asset_type] << modcard.ensure_mod_asset_card(asset_type)
        end
      end

      def ensure_asset_lists
        hash = { script: [], style: [] }
        yield hash
        # puts "updating asset lists"
        Card[:all, :script].update! content: hash[:script].compact
        Card[:style_mods].update! content: hash[:style].compact
        # puts "refreshing assets"
        Card::Assets.refresh force: true
      end

      # it would be nice if this were easier...
      def delete_auto_installed_cards mod_card
        auto_installed_cards(mod_card).each do |card|
          card.codename = nil
          card.delete!
        end
      end

      def auto_installed_cards mod_card
        [mod_card].tap do |cards|
          mod_card.each_descendant do |card|
            cards.unshift card
          end
        end
      end

      def gem_spec name, nickname=true
        name = "card-mod-#{name}" if nickname && !name.match?(/^card-mod/)
        spec = Gem::Specification.stubs_for(name)&.first
        gem_spec?(spec) ? spec : nil
      end

      # @return [True/False]
      def gem_spec? spec
        return unless spec

        spec.name.match?(/^card-mod-/) || spec.metadata["card-mod"].present?
      end
    end
  end
end