truemail-rb/truemail-rspec

# frozen_string_literal: true

module Truemail
  module RSpec
    module ValidatorHelper
      VALIDATION_LIST_TYPE_REGEX_PATTERN = /(emails|domains)(_list)/.freeze

      def create_servers_list(size = nil)
        ::Array.new(size || ::Random.rand(1..4)) { ::FFaker::Internet.ip_v4_address }
      end

      def create_validator( # rubocop:disable Metrics/ParameterLists
        validation_type = nil,
        email = ::FFaker::Internet.email,
        mail_servers = create_servers_list,
        rcptto_error: 'user not found',
        success: true,
        configuration: create_configuration
      )
        set_expected_result(validation_type, email, mail_servers, success, configuration, rcptto_error)
        stub_validation_layers
        validator_instance = ValidatorFactory.call(validation_type, success, email, mail_servers, configuration)
        unstub_validation_layers
        validator_instance
      end

      private

      attr_reader :validation_type, :email, :success, :configuration, :mail_servers, :rcptto_error

      def set_expected_result(validation_type, email, mail_servers, success, configuration, rcptto_error) # rubocop:disable Metrics/ParameterLists
        @validation_type = validation_type
        @email = email
        @mail_servers = mail_servers
        @success = success
        @configuration = configuration
        @rcptto_error = rcptto_error
      end

      def stub_validation_layers
        case validation_type
        when :regex then regex_layer
        when :mx then mx_layer
        when :mx_blacklist then mx_blacklist_layer
        else smtp_layer
        end
      end

      def unstub_validation_layers # rubocop:disable Metrics/AbcSize
        allow_any_instance_of(Truemail::Validate::Regex).to receive(:match_regex_pattern?).and_call_original
        allow(Truemail::Validate::Regex).to receive(:check).and_call_original
        allow_any_instance_of(Truemail::Validate::Mx).to receive(:mx_records).and_call_original
        allow_any_instance_of(Truemail::Validate::Mx).to receive(:domain_not_include_null_mx).and_call_original
        allow_any_instance_of(Truemail::Validate::Smtp).to receive(:establish_smtp_connection).and_call_original
        allow_any_instance_of(Truemail::Validate::Smtp).to receive(:success_response?).and_call_original
        allow_any_instance_of(Truemail::Validate::Smtp).to receive(:smtp_results).and_call_original
      end

      def regex_layer
        allow_any_instance_of(Truemail::Validate::Regex).to receive(:match_regex_pattern?).and_return(success)
      end

      def mx_layer
        allow(Truemail::Validate::Regex).to receive(:check).and_return(true)
        allow_any_instance_of(Truemail::Validate::Mx).to receive(:mx_records).and_return(mail_servers)
        allow_any_instance_of(Truemail::Validate::Mx).to receive(:domain_not_include_null_mx).and_return(success)
      end

      def mx_blacklist_layer # rubocop:disable Metrics/AbcSize
        allow(Truemail::Validate::Regex).to receive(:check).and_return(true)
        allow_any_instance_of(Truemail::Validate::Mx).to receive(:mx_records).and_return(mail_servers)
        allow_any_instance_of(Truemail::Validate::Mx).to receive(:domain_not_include_null_mx).and_return(true)
        allow_any_instance_of(Truemail::Validate::MxBlacklist).to receive(:not_blacklisted_mail_servers?).and_return(success)
      end

      def request_instance
        request = Truemail::Validate::Smtp::Request.new(
          host: mail_servers.first,
          email: email,
          configuration: configuration
        )

        request.response.tap do |response|
          response.port_opened = true
          response.connection = true
          response.helo = true
          response.mailfrom = true
          response.rcptto = false
          response.errors[:rcptto] = rcptto_error
        end

        request
      end

      def smtp_layer # rubocop:disable Metrics/AbcSize
        allow(Truemail::Validate::Regex).to receive(:check).and_return(true)
        allow_any_instance_of(Truemail::Validate::Mx).to receive(:mx_records).and_return(mail_servers)
        allow_any_instance_of(Truemail::Validate::Mx).to receive(:domain_not_include_null_mx).and_return(true)
        allow_any_instance_of(Truemail::Validate::Smtp).to receive(:establish_smtp_connection).and_return(true)
        return allow_any_instance_of(Truemail::Validate::Smtp).to receive(:success_response?).and_return(true) if success
        allow_any_instance_of(Truemail::Validate::Smtp).to receive(:smtp_results).and_return([request_instance])
      end

      class ValidatorFactory
        def self.call(validation_type, success, email, mail_servers, configuration)
          new(validation_type, success, email, mail_servers, configuration).build
        end

        def initialize(validation_type, success, email, mail_servers, configuration)
          @validation_type = validation_type
          @success = success
          @email = email
          @mail_servers = mail_servers
          @configuration = configuration
        end

        def build
          process_validator_params
          Truemail::Validator.new(email, with: validation_type, configuration: configuration).run
        end

        private

        attr_reader :success, :email, :mail_servers, :configuration
        attr_accessor :validation_type

        def process_validator_params # rubocop:disable Metrics/AbcSize
          case validation_type
          when Truemail::RSpec::ValidatorHelper::VALIDATION_LIST_TYPE_REGEX_PATTERN
            list_type = validation_type[Truemail::RSpec::ValidatorHelper::VALIDATION_LIST_TYPE_REGEX_PATTERN, 1]
            self.validation_type = nil
            method = success ? :"whitelisted_#{list_type}" : :"blacklisted_#{list_type}"
            configuration.tap do |config|
              config.public_send(method) << (list_type.eql?('emails') ? email : email[Truemail::RegexConstant::REGEX_EMAIL_PATTERN, 3])
            end
          when :mx_blacklist
            configuration.blacklisted_mx_ip_addresses.push(*mail_servers) unless success
          end
        end
      end
    end
  end
end