# frozen_string_literal: true

require 'pundit'

module GraphQL
  module Pundit
    module Instrumenters
      # Base instrumenter for `before_scope` and `after_scope`
      class Scope
        # Applies the scoping to the passed object
        class ScopeResolver
          attr_reader :current_user, :scope, :old_resolver, :field

          def initialize(current_user, scope, old_resolver, field)
            @current_user = current_user
            @old_resolver = old_resolver
            @field = field

            raise ArgumentError, 'Invalid value passed to `scope`' unless valid_value?(scope)

            @scope = scope
          end

          private

          def new_scope(scope)
            return scope if proc?(scope)

            lambda do |root, _arguments, context|
              scope = find_scope(root, scope)
              scope.new(context[current_user], root).resolve
            end
          end

          def find_scope(root, scope)
            if inferred?(scope)
              # Special case for Sequel datasets that do not respond to
              # ActiveModel's model_name
              infer_from = if root.respond_to?(:model)
                             root.model
                           else
                             root
                           end
              ::Pundit::PolicyFinder.new(infer_from).scope!
            else
              scope::Scope
            end
          end

          def valid_value?(value)
            value.is_a?(Class) || inferred?(value) || proc?(value)
          end

          def proc?(value)
            value.respond_to?(:call)
          end

          def inferred?(value)
            value == :infer_scope
          end
        end

        attr_reader :current_user

        def initialize(current_user = :current_user)
          @current_user = current_user
        end

        # rubocop:disable Metrics/MethodLength
        def instrument(_type, field)
          # rubocop:enable Metrics/MethodLength
          scope_metadata = field.metadata[self.class::SCOPE_KEY]
          return field unless scope_metadata

          scope = scope_metadata[:proc]

          old_resolver = field.resolve_proc
          resolver = self.class::ScopeResolver.new(current_user,
                                                   scope,
                                                   old_resolver,
                                                   field)

          field.redefine do
            resolve resolver
          end
        end
      end
    end
  end
end