# frozen_string_literal: true

class Sinclair
  class MethodDefinition
    # @api private
    # @author darthjee
    #
    # @abstract
    #
    # Define an instance method from string
    class StringDefinition < MethodDefinition
      # @param name    [String,Symbol] name of the method
      # @param code    [String] code to be evaluated as method
      # @param options [Hash] Options of construction
      # @option options cached [Boolean] Flag telling to create
      #   a method with cache
      def initialize(name, code = nil, **options)
        @code = code
        super(name, **options)
      end

      # Adds the method to given klass
      #
      # @param klass [Class] class which will receive the new method
      #
      # @see MethodDefinition#build
      #
      # @return [Symbol] name of the created method
      #
      # @example Using instance string method with no options
      #   class MyModel
      #   end
      #
      #   instance = MyModel.new
      #
      #   method_definition = Sinclair::MethodDefinition::InstanceStringDefinition.new(
      #     :sequence, '@x = @x.to_i ** 2 + 1'
      #   )
      #
      #   method_definition.build(MyModel)    # adds instance_method :sequence to
      #                                       # MyModel instances
      #
      #   instance.instance_variable_get(:@x) # returns nil
      #
      #   instance.sequence                   # returns 1
      #   instance.sequence                   # returns 2
      #   instance.sequence                   # returns 5
      #
      #   instance.instance_variable_get(:@x) # returns 5
      #
      # @example Using class string method with cache options
      #   class MyModel
      #   end
      #
      #   method_definition = Sinclair::MethodDefinition::ClassStringDefinition.new(
      #     :sequence,
      #     '@x = @x.to_i ** 2 + 1',
      #     cached: true
      #   )
      #
      #   method_definition.build(MyModel) # adds instance_method :sequence to
      #                                    # MyModel instances
      #
      #   MyModel.instance_variable_get(:@sequence) # returns nil
      #   MyModel.instance_variable_get(:@x)        # returns nil
      #
      #   MyModel.sequence               # returns 1
      #   MyModel.sequence               # returns 1 (cached value)
      #
      #   MyModel.instance_variable_get(:@sequence) # returns 1
      #   MyModel.instance_variable_get(:@x)        # returns 1
      def build(klass)
        klass.module_eval(code_definition, __FILE__, __LINE__ + 1)
      end

      private

      # @method code
      # @private
      #
      # Code to be evaluated as method
      #
      # @return [String]
      attr_reader :code

      # @private
      #
      # Builds full code of method
      #
      # @return [String]
      def code_definition
        code_line = cached? ? code_with_cache : code

        <<-CODE
          def #{method_name}
            #{code_line}
          end
        CODE
      end

      # @private
      #
      # Returns string code when {#cached?}
      #
      # @return [String]
      def code_with_cache
        case cached
        when :full
          "defined?(@#{name}) ? @#{name} : (@#{name} = #{code})"
        else
          "@#{name} ||= #{code}"
        end
      end
    end
  end
end