mocktail 1.2.3 → 2.0.0

data/lib/mocktail/sorbet/mocktail/explains_nils.rb

@@ -0,0 +1,41 @@
+# typed: strict
+
+require_relative "share/stringifies_method_name"
+require_relative "share/stringifies_call"
+
+module Mocktail
+  class ExplainsNils
+    extend T::Sig
+
+    sig { void }
+    def initialize
+      @stringifies_method_name = T.let(StringifiesMethodName.new, StringifiesMethodName)
+      @stringifies_call = T.let(StringifiesCall.new, StringifiesCall)
+    end
+
+    sig { returns(T::Array[UnsatisfyingCallExplanation]) }
+    def explain
+      Mocktail.cabinet.unsatisfying_calls.map { |unsatisfying_call|
+        dry_call = unsatisfying_call.call
+        other_stubbings = unsatisfying_call.other_stubbings
+
+        UnsatisfyingCallExplanation.new(unsatisfying_call, <<~MSG)
+          `nil' was returned by a mocked `#{@stringifies_method_name.stringify(dry_call)}' method
+          because none of its configured stubbings were satisfied.
+
+          The actual call:
+
+            #{@stringifies_call.stringify(dry_call, always_parens: true)}
+
+          The call site:
+
+            #{unsatisfying_call.backtrace.first}
+
+          #{@stringifies_call.stringify_multiple(other_stubbings.map(&:recording),
+            nonzero_message: "Stubbings configured prior to this call but not satisfied by it",
+            zero_message: "No stubbings were configured on this method")}
+        MSG
+      }
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/explains_thing.rb

@@ -0,0 +1,137 @@
+# typed: strict
+
+require_relative "share/stringifies_method_name"
+require_relative "share/stringifies_call"
+
+module Mocktail
+  class ExplainsThing
+    extend T::Sig
+
+    sig { void }
+    def initialize
+      @stringifies_method_name = T.let(StringifiesMethodName.new, StringifiesMethodName)
+      @stringifies_call = T.let(StringifiesCall.new, StringifiesCall)
+    end
+
+    sig { params(thing: Object).returns(Explanation) }
+    def explain(thing)
+      if (double = Mocktail.cabinet.double_for_instance(thing))
+        double_explanation(double)
+      elsif (thing.is_a?(Module) || thing.is_a?(Class)) &&
+          (type_replacement = TopShelf.instance.type_replacement_if_exists_for(thing))
+        replaced_type_explanation(type_replacement)
+      elsif (fake_method_explanation = fake_method_explanation_for(thing))
+        fake_method_explanation
+      else
+        no_explanation(thing)
+      end
+    end
+
+    private
+
+    sig { params(thing: Object).returns(T.nilable(FakeMethodExplanation)) }
+    def fake_method_explanation_for(thing)
+      return unless thing.is_a?(Method)
+      method = thing
+      receiver = thing.receiver
+
+      receiver_data = if (double = Mocktail.cabinet.double_for_instance(receiver))
+        data_for_double(double)
+      elsif (type_replacement = TopShelf.instance.type_replacement_if_exists_for(receiver))
+        data_for_type_replacement(type_replacement)
+      end
+
+      if receiver_data
+        FakeMethodExplanation.new(FakeMethodData.new(
+          receiver: receiver,
+          calls: receiver_data.calls,
+          stubbings: receiver_data.stubbings
+        ), describe_dry_method(receiver_data, method.name))
+      end
+    end
+
+    sig { params(double: Double).returns(DoubleData) }
+    def data_for_double(double)
+      DoubleData.new(
+        type: double.original_type,
+        double: double.dry_instance,
+        calls: Mocktail.cabinet.calls_for_double(double),
+        stubbings: Mocktail.cabinet.stubbings_for_double(double)
+      )
+    end
+
+    sig { params(double: Double).returns(DoubleExplanation) }
+    def double_explanation(double)
+      double_data = data_for_double(double)
+
+      DoubleExplanation.new(double_data, <<~MSG)
+        This is a fake `#{double.original_type.name}' instance.
+
+        It has these mocked methods:
+        #{double.dry_methods.sort.map { |method| "  - #{method}" }.join("\n")}
+
+        #{double.dry_methods.sort.map { |method| describe_dry_method(double_data, method) }.join("\n")}
+      MSG
+    end
+
+    sig { params(type_replacement: TypeReplacement).returns(TypeReplacementData) }
+    def data_for_type_replacement(type_replacement)
+      TypeReplacementData.new(
+        type: type_replacement.type,
+        replaced_method_names: type_replacement.replacement_methods&.map(&:name)&.sort || [],
+        calls: Mocktail.cabinet.calls.select { |call|
+          call.double == type_replacement.type
+        },
+        stubbings: Mocktail.cabinet.stubbings.select { |stubbing|
+          stubbing.recording.double == type_replacement.type
+        }
+      )
+    end
+
+    sig { params(type_replacement: TypeReplacement).returns(ReplacedTypeExplanation) }
+    def replaced_type_explanation(type_replacement)
+      type_replacement_data = data_for_type_replacement(type_replacement)
+
+      ReplacedTypeExplanation.new(type_replacement_data, <<~MSG)
+        `#{type_replacement.type}' is a #{type_replacement.type.class.to_s.downcase} that has had its methods faked.
+
+        It has these mocked methods:
+        #{type_replacement_data.replaced_method_names.map { |method| "  - #{method}" }.join("\n")}
+
+        #{type_replacement_data.replaced_method_names.map { |method| describe_dry_method(type_replacement_data, method) }.join("\n")}
+      MSG
+    end
+
+    sig { params(double_data: T.any(DoubleData, TypeReplacementData), method: Symbol).returns(String) }
+    def describe_dry_method(double_data, method)
+      method_name = @stringifies_method_name.stringify(Call.new(
+        original_type: double_data.type,
+        singleton: double_data.type == double_data.double,
+        method: method
+      ))
+
+      [
+        @stringifies_call.stringify_multiple(
+          double_data.stubbings.map(&:recording).select { |call|
+            call.method == method
+          },
+          nonzero_message: "`#{method_name}' stubbings",
+          zero_message: "`#{method_name}' has no stubbings"
+        ),
+        @stringifies_call.stringify_multiple(
+          double_data.calls.select { |call|
+            call.method == method
+          },
+          nonzero_message: "`#{method_name}' calls",
+          zero_message: "`#{method_name}' has no calls"
+        )
+      ].join("\n")
+    end
+
+    sig { params(thing: Object).returns(NoExplanation) }
+    def no_explanation(thing)
+      NoExplanation.new(NoExplanationData.new(thing: thing),
+        "Unfortunately, Mocktail doesn't know what this thing is: #{thing.inspect}")
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/grabs_original_method_parameters.rb

@@ -0,0 +1,33 @@
+# typed: strict
+
+module Mocktail
+  class GrabsOriginalMethodParameters
+    extend T::Sig
+
+    # Sorbet wraps the original method in a sig wrapper, so we need to unwrap it.
+    # The value returned from `owner.instance_method(method_name)` does not have
+    # the real parameters values available, as they'll have been erased
+    #
+    # If the method isn't wrapped by Sorbet, this will return the #instance_method,
+    # per usual
+    sig { params(method: T.nilable(T.any(UnboundMethod, Method))).returns(T::Array[T::Array[Symbol]]) }
+    def grab(method)
+      return [] unless method
+
+      if (wrapped_method = sorbet_wrapped_method(method))
+        wrapped_method.parameters
+      else
+        method.parameters
+      end
+    end
+
+    private
+
+    sig { params(method: T.any(UnboundMethod, Method)).returns(T.nilable(T::Private::Methods::Signature)) }
+    def sorbet_wrapped_method(method)
+      return unless defined?(::T::Private::Methods)
+
+      T::Private::Methods.signature_for_method(method)
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/handles_dry_call/fulfills_stubbing/describes_unsatisfied_stubbing.rb

@@ -0,0 +1,27 @@
+# typed: strict
+
+require_relative "../../share/cleans_backtrace"
+require_relative "../../share/bind"
+
+module Mocktail
+  class DescribesUnsatisfiedStubbing
+    extend T::Sig
+
+    sig { void }
+    def initialize
+      @cleans_backtrace = T.let(CleansBacktrace.new, Mocktail::CleansBacktrace)
+    end
+
+    sig { params(dry_call: Mocktail::Call).returns(Mocktail::UnsatisfyingCall) }
+    def describe(dry_call)
+      UnsatisfyingCall.new(
+        call: dry_call,
+        other_stubbings: Mocktail.cabinet.stubbings.select { |stubbing|
+          Bind.call(dry_call.double, :==, stubbing.recording.double) &&
+            dry_call.method == stubbing.recording.method
+        },
+        backtrace: @cleans_backtrace.clean(Error.new).backtrace || []
+      )
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/handles_dry_call/fulfills_stubbing/finds_satisfaction.rb

@@ -0,0 +1,24 @@
+# typed: strict
+
+require_relative "../../share/determines_matching_calls"
+
+module Mocktail
+  class FindsSatisfaction
+    extend T::Sig
+
+    sig { void }
+    def initialize
+      @determines_matching_calls = T.let(DeterminesMatchingCalls.new, Mocktail::DeterminesMatchingCalls)
+    end
+
+    sig { params(dry_call: Call).returns(T.nilable(Stubbing[T.anything])) }
+    def find(dry_call)
+      Mocktail.cabinet.stubbings.reverse.find { |stubbing|
+        demo_config_times = stubbing.demo_config.times
+
+        @determines_matching_calls.determine(dry_call, stubbing.recording, stubbing.demo_config) &&
+          (demo_config_times.nil? || demo_config_times > stubbing.satisfaction_count)
+      }
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/handles_dry_call/fulfills_stubbing.rb

@@ -0,0 +1,45 @@
+# typed: strict
+
+require_relative "fulfills_stubbing/finds_satisfaction"
+require_relative "fulfills_stubbing/describes_unsatisfied_stubbing"
+
+module Mocktail
+  class FulfillsStubbing
+    extend T::Sig
+
+    sig { void }
+    def initialize
+      @finds_satisfaction = T.let(FindsSatisfaction.new, Mocktail::FindsSatisfaction)
+      @describes_unsatisfied_stubbing = T.let(DescribesUnsatisfiedStubbing.new, Mocktail::DescribesUnsatisfiedStubbing)
+    end
+
+    sig { params(dry_call: Call).returns(T.anything) }
+    def fulfill(dry_call)
+      if (stubbing = satisfaction(dry_call))
+        stubbing.satisfied!
+        stubbing.effect&.call(dry_call)
+      else
+        store_unsatisfying_call!(dry_call)
+        nil
+      end
+    end
+
+    sig { params(dry_call: Call).returns(T.nilable(Stubbing[T.anything])) }
+    def satisfaction(dry_call)
+      return if Mocktail.cabinet.demonstration_in_progress?
+
+      @finds_satisfaction.find(dry_call)
+    end
+
+    private
+
+    sig { params(dry_call: Call).void }
+    def store_unsatisfying_call!(dry_call)
+      return if Mocktail.cabinet.demonstration_in_progress?
+
+      Mocktail.cabinet.store_unsatisfying_call(
+        @describes_unsatisfied_stubbing.describe(dry_call)
+      )
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/handles_dry_call/logs_call.rb

@@ -0,0 +1,12 @@
+# typed: strict
+
+module Mocktail
+  class LogsCall
+    extend T::Sig
+
+    sig { params(dry_call: Call).void }
+    def log(dry_call)
+      Mocktail.cabinet.store_call(dry_call)
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/handles_dry_call/validates_arguments.rb

@@ -0,0 +1,45 @@
+# typed: strict
+
+module Mocktail
+  class ValidatesArguments
+    extend T::Sig
+    sig { void }
+    def self.disable!
+      Thread.current[:mocktail_arity_validation_disabled] = true
+    end
+
+    sig { void }
+    def self.enable!
+      Thread.current[:mocktail_arity_validation_disabled] = false
+    end
+
+    sig { returns(T::Boolean) }
+    def self.disabled?
+      !!Thread.current[:mocktail_arity_validation_disabled]
+    end
+
+    sig { params(disable: T.nilable(T::Boolean), blk: T.proc.returns(T.anything)).void }
+    def self.optional(disable, &blk)
+      return blk.call unless disable
+
+      disable!
+      ret = blk.call
+      enable!
+      ret
+    end
+
+    sig { void }
+    def initialize
+      @simulates_argument_error = T.let(SimulatesArgumentError.new, Mocktail::SimulatesArgumentError)
+    end
+
+    sig { params(dry_call: Call).returns(NilClass) }
+    def validate(dry_call)
+      return if self.class.disabled?
+
+      if (error = @simulates_argument_error.simulate(dry_call))
+        raise error
+      end
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/handles_dry_call.rb

@@ -0,0 +1,25 @@
+# typed: strict
+
+require_relative "handles_dry_call/fulfills_stubbing"
+require_relative "handles_dry_call/logs_call"
+require_relative "handles_dry_call/validates_arguments"
+
+module Mocktail
+  class HandlesDryCall
+    extend T::Sig
+
+    sig { void }
+    def initialize
+      @validates_arguments = T.let(ValidatesArguments.new, ValidatesArguments)
+      @logs_call = T.let(LogsCall.new, LogsCall)
+      @fulfills_stubbing = T.let(FulfillsStubbing.new, FulfillsStubbing)
+    end
+
+    sig { params(dry_call: Call).returns(T.anything) }
+    def handle(dry_call)
+      @validates_arguments.validate(dry_call)
+      @logs_call.log(dry_call)
+      @fulfills_stubbing.fulfill(dry_call)
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/handles_dry_new_call.rb

@@ -0,0 +1,42 @@
+# typed: strict
+
+module Mocktail
+  class HandlesDryNewCall
+    extend T::Sig
+
+    sig { void }
+    def initialize
+      @validates_arguments = T.let(ValidatesArguments.new, ValidatesArguments)
+      @logs_call = T.let(LogsCall.new, LogsCall)
+      @fulfills_stubbing = T.let(FulfillsStubbing.new, FulfillsStubbing)
+      @imitates_type = T.let(ImitatesType.new, ImitatesType)
+    end
+
+    sig { params(type: T::Class[T.all(T, Object)], args: T::Array[T.anything], kwargs: T::Hash[Symbol, T.anything], block: T.nilable(Proc)).returns(T.anything) }
+    def handle(type, args, kwargs, block)
+      @validates_arguments.validate(Call.new(
+        original_method: type.instance_method(:initialize),
+        args: args,
+        kwargs: kwargs,
+        block: block
+      ))
+
+      new_call = Call.new(
+        singleton: true,
+        double: type,
+        original_type: type,
+        dry_type: type,
+        method: :new,
+        args: args,
+        kwargs: kwargs,
+        block: block
+      )
+      @logs_call.log(new_call)
+      if @fulfills_stubbing.satisfaction(new_call)
+        @fulfills_stubbing.fulfill(new_call)
+      else
+        @imitates_type.imitate(type)
+      end
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/imitates_type/ensures_imitation_support.rb

@@ -0,0 +1,16 @@
+# typed: strict
+
+module Mocktail
+  class EnsuresImitationSupport
+    extend T::Sig
+
+    sig { params(type: T.any(T::Class[T.anything], Module)).void }
+    def ensure(type)
+      unless type.is_a?(Class) || type.is_a?(Module)
+        raise UnsupportedMocktail.new <<~MSG.tr("\n", " ")
+          Mocktail.of() can only mix mocktail instances of modules and classes.
+        MSG
+      end
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/imitates_type/makes_double/declares_dry_class/reconstructs_call.rb

@@ -0,0 +1,73 @@
+# typed: strict
+
+module Mocktail
+  class ReconstructsCall
+    extend T::Sig
+
+    sig {
+      params(
+        double: Object,
+        call_binding: Binding,
+        default_args: T.nilable(T::Hash[Symbol, T.anything]),
+        dry_class: T::Class[Object],
+        type: T.any(Module, T::Class[T.anything]),
+        method: Symbol,
+        original_method: T.any(UnboundMethod, Method),
+        signature: Signature
+      ).returns(Call)
+    }
+    def reconstruct(double:, call_binding:, default_args:, dry_class:, type:, method:, original_method:, signature:)
+      Call.new(
+        singleton: false,
+        double: double,
+        original_type: type,
+        dry_type: dry_class,
+        method: method,
+        original_method: original_method,
+        args: args_for(signature, call_binding, default_args),
+        kwargs: kwargs_for(signature, call_binding, default_args),
+        block: call_binding.local_variable_get(signature.block_param || ::Mocktail::Signature::DEFAULT_BLOCK_PARAM)
+      )
+    end
+
+    private
+
+    sig {
+      params(signature: Signature, call_binding: Binding, default_args: T.nilable(T::Hash[Symbol, T.anything]))
+        .returns(T::Array[T.anything])
+    }
+    def args_for(signature, call_binding, default_args)
+      arg_names, rest_name = non_default_args(signature.positional_params, default_args)
+
+      arg_values = arg_names.map { |p| call_binding.local_variable_get(p) }
+      rest_value = call_binding.local_variable_get(rest_name) if rest_name
+
+      arg_values + (rest_value || [])
+    end
+
+    sig {
+      params(signature: Signature, call_binding: Binding, default_args: T.nilable(T::Hash[Symbol, T.anything]))
+        .returns(T::Hash[Symbol, T.anything])
+    }
+    def kwargs_for(signature, call_binding, default_args)
+      kwarg_names, kwrest_name = non_default_args(signature.keyword_params, default_args)
+
+      kwarg_values = kwarg_names.to_h { |p| [p, call_binding.local_variable_get(p)] }
+      kwrest_value = call_binding.local_variable_get(kwrest_name) if kwrest_name
+
+      kwarg_values.merge(kwrest_value || {})
+    end
+
+    sig { params(params: Params, default_args: T.nilable(T::Hash[Symbol, T.anything])).returns([T::Array[Symbol], T.nilable(Symbol)]) }
+    def non_default_args(params, default_args)
+      named_args = params.allowed
+        .reject { |p| default_args&.key?(p) }
+      rest_param = params.rest
+      rest_arg = if rest_param && !default_args&.key?(rest_param)
+        params.rest
+      end
+
+      [named_args, rest_arg]
+    end
+  end
+end

data/lib/mocktail/sorbet/mocktail/imitates_type/makes_double/declares_dry_class.rb

@@ -0,0 +1,136 @@
+# typed: strict
+
+require_relative "declares_dry_class/reconstructs_call"
+
+module Mocktail
+  class DeclaresDryClass
+    extend T::Sig
+
+    DEFAULT_ANCESTORS = T.let(T.must(Class.new(Object).ancestors[1..]), T::Array[T.any(T::Class[T.anything], Module)])
+
+    sig { void }
+    def initialize
+      @raises_neato_no_method_error = T.let(RaisesNeatoNoMethodError.new, RaisesNeatoNoMethodError)
+      @transforms_params = T.let(TransformsParams.new, TransformsParams)
+      @stringifies_method_signature = T.let(StringifiesMethodSignature.new, StringifiesMethodSignature)
+      @grabs_original_method_parameters = T.let(GrabsOriginalMethodParameters.new, GrabsOriginalMethodParameters)
+    end
+
+    sig {
+      type_parameters(:T)
+        .params(type: T.all(T.type_parameter(:T), T::Class[Object]), instance_methods: T::Array[Symbol]).returns(T.type_parameter(:T))
+    }
+    def declare(type, instance_methods)
+      dry_class = Class.new(Object) {
+        include type if T.unsafe(type).is_a?(Module) && !T.unsafe(type).is_a?(Class)
+
+        define_method :initialize do |*args, **kwargs, &blk|
+        end
+
+        [:is_a?, :kind_of?].each do |method_name|
+          define_method method_name, ->(thing) {
+            # Mocktails extend from Object, so share the same ancestors, plus the passed type
+            [type, *DEFAULT_ANCESTORS].include?(thing)
+          }
+        end
+
+        if T.unsafe(type).is_a?(Class)
+          define_method :instance_of?, ->(thing) {
+            type == thing
+          }
+        end
+      }
+
+      add_more_methods!(dry_class, type, instance_methods)
+
+      T.unsafe(dry_class) # This is all fake! That's the whole point—it's not a real Foo, it's just some new class that quacks like a Foo
+    end
+
+    private
+
+    # These have special implementations, but if the user defines
+    # any of them on the object itself, then they'll be replaced with normal
+    # mocked methods. YMMV
+    sig { params(dry_class: T::Class[Object], type: T.any(T::Class[T.anything], Module), instance_methods: T::Array[Symbol]).void }
+    def add_more_methods!(dry_class, type, instance_methods)
+      add_stringify_methods!(dry_class, :to_s, type, instance_methods)
+      add_stringify_methods!(dry_class, :inspect, type, instance_methods)
+      define_method_missing_errors!(dry_class, type, instance_methods)
+
+      define_double_methods!(dry_class, type, instance_methods)
+    end
+
+    sig { params(dry_class: T::Class[Object], type: T.any(T::Class[T.anything], Module), instance_methods: T::Array[Symbol]).void }
+    def define_double_methods!(dry_class, type, instance_methods)
+      instance_methods.each do |method_name|
+        dry_class.undef_method(method_name) if dry_class.method_defined?(method_name)
+        parameters = @grabs_original_method_parameters.grab(type.instance_method(method_name))
+        signature = @transforms_params.transform(Call.new, params: parameters)
+        method_signature = @stringifies_method_signature.stringify(signature)
+        __mocktail_closure = {
+          dry_class: dry_class,
+          type: type,
+          method: method_name,
+          original_method: type.instance_method(method_name),
+          signature: signature
+        }
+
+        dry_class.define_method method_name,
+          eval(<<-RUBBY, binding, __FILE__, __LINE__ + 1) # standard:disable Security/Eval
+            ->#{method_signature} do
+              ::Mocktail::Debug.guard_against_mocktail_accidentally_calling_mocks_if_debugging!
+              ::Mocktail::HandlesDryCall.new.handle(::Mocktail::ReconstructsCall.new.reconstruct(
+                double: self,
+                call_binding: __send__(:binding),
+                default_args: (__send__(:binding).local_variable_defined?(:__mocktail_default_args) ? __send__(:binding).local_variable_get(:__mocktail_default_args) : {}),
+                **__mocktail_closure
+              ))
+            end
+          RUBBY
+      end
+    end
+
+    sig { params(dry_class: T::Class[Object], method_name: Symbol, type: T.any(T::Class[T.anything], Module), instance_methods: T::Array[Symbol]).void }
+    def add_stringify_methods!(dry_class, method_name, type, instance_methods)
+      dry_class.define_singleton_method method_name, -> {
+        if (id_matches = super().match(/:([0-9a-fx]+)>$/))
+          "#<Class #{"including module " if type.instance_of?(Module)}for mocktail of #{type.name}:#{id_matches[1]}>"
+        else
+          super()
+        end
+      }
+
+      unless instance_methods.include?(method_name)
+        dry_class.define_method method_name, -> {
+          if (id_matches = super().match(/:([0-9a-fx]+)>$/))
+            "#<Mocktail of #{type.name}:#{id_matches[1]}>"
+          else
+            super()
+          end
+        }
+      end
+    end
+
+    sig { params(dry_class: T::Class[Object], type: T.any(T::Class[T.anything], Module), instance_methods: T::Array[Symbol]).void }
+    def define_method_missing_errors!(dry_class, type, instance_methods)
+      return if instance_methods.include?(:method_missing)
+
+      raises_neato_no_method_error = @raises_neato_no_method_error
+      dry_class.define_method :method_missing, ->(name, *args, **kwargs, &block) {
+        raises_neato_no_method_error.call(
+          Call.new(
+            singleton: false,
+            double: self,
+            original_type: type,
+            dry_type: self.class,
+            method: name,
+            original_method: nil,
+            args: args,
+            kwargs: kwargs,
+            block: block
+          )
+        )
+      }
+    end
+  end
+end