# frozen_string_literal: true

module ActiveDryForm
  class Form < BaseForm

    include Dry::Monads[:result]
    Dry::Schema.load_extensions(:json_schema)
    ResultError = Class.new(StandardError)

    cattr_accessor :contract_klass, instance_accessor: false, default: ::ActiveDryForm::BaseContract

    def self.fields(namespace, i18n_key: nil, &block)
      const_set :CURRENT_CONTRACT, Class.new(contract_klass, &block).new
      const_set :FIELDS_INFO, self::CURRENT_CONTRACT.schema.json_schema(loose: true)

      const_set :NAMESPACE, ActiveModel::Name.new(nil, nil, namespace.name.capitalize)
      const_get(:NAMESPACE).i18n_key = i18n_key if i18n_key

      define_methods
    end

    def self.action(method)
      alias_method :"__#{method}", method

      class_eval <<~RUBY, __FILE__, __LINE__ + 1 # rubocop:disable Style/DocumentDynamicEvalDefinition
        def #{method}(...)
          validate
          return Failure(:invalid_form) unless valid?

          result = __#{method}(...)

          case result
          when ::Dry::Monads::Result::Failure
            @base_errors = Array.wrap(result.failure)
          when ::Dry::Monads::Result::Success
          else
            raise ResultError, 'method `#{method}` must return `monad`'
          end

          result
        end
      RUBY
    end

  end
end