docbrown/app/services/site_configs/upsert.rb

module SiteConfigs
  class Upsert
    EMOJI_ONLY_FIELDS = %w[community_emoji].freeze
    IMAGE_FIELDS =
      %w[
        main_social_image
        logo_png
        secondary_logo_url
        campaign_sidebar_image
        mascot_image_url
        mascot_footer_image_url
        onboarding_logo_image
        onboarding_background_image
        onboarding_taskcard_image
      ].freeze

    VALID_URL = %r{\A(http|https)://([/|.\w\s-])*.[a-z]{2,5}(:[0-9]{1,5})?(/.*)?\z}.freeze

    VALID_DOMAIN = /^[a-zA-Z0-9]{1,61}[a-zA-Z0-9](?:\.[a-zA-Z]{2,})+$/.freeze

    PARAMS_TO_BE_CLEANED = %i[sidebar_tags suggested_tags suggested_users].freeze

    attr_reader :errors

    def self.call(configs)
      new(configs).call
    end

    def initialize(configs)
      @configs = configs
      @success = false
    end

    def call
      @errors = []
      clean_up_params
      validate_inputs
      validate_emoji
      validate_image_urls

      return self if @errors.flatten.any?

      @success = true
      upsert_configs
      after_upsert_tasks
      self
    end

    def success?
      @success
    end

    def upsert_configs
      @configs.each do |key, value|
        if key == "auth_providers_to_enable"
          update_enabled_auth_providers(value) unless value.class.name != "String"
        elsif value.is_a?(Array)
          SiteConfig.public_send("#{key}=", value.reject(&:blank?)) unless value.empty?
        elsif value.respond_to?(:to_h)
          SiteConfig.public_send("#{key}=", value.to_h) unless value.empty?
        else
          SiteConfig.public_send("#{key}=", value.strip) unless value.nil?
        end
      end
    end

    def after_upsert_tasks
      create_tags_if_not_created
    end

    def clean_up_params
      PARAMS_TO_BE_CLEANED.each do |param|
        @configs[param] = @configs[param]&.downcase&.delete(" ") if @configs[param]
      end
      @configs[:credit_prices_in_cents]&.transform_values!(&:to_i)
    end

    def validate_inputs
      @errors << "Brand color must be darker for accessibility." if brand_contrast_too_low
      @errors << "Brand color must be be a 6 character hex (starting with #)." if brand_color_not_hex
      @errors << "Allowed emails must be list of domains." if allowed_domains_include_improper_format
    end

    def validate_emoji
      emoji_params = @configs.slice(*EMOJI_ONLY_FIELDS).to_h
      @errors << emoji_params.filter_map do |field, value|
        non_emoji_characters = value.downcase.gsub(EmojiRegex::RGIEmoji, "")
        "#{field} contains invalid emoji" if non_emoji_characters.present?
      end
    end

    def validate_image_urls
      image_params = @configs.slice(*IMAGE_FIELDS).to_h
      @errors << image_params.filter_map do |field, url|
        "#{field} must be a valid URL" unless url.blank? || valid_image_url(url)
      end
    end

    def update_enabled_auth_providers(value)
      enabled_providers = value.split(",").filter_map do |entry|
        entry unless invalid_provider_entry(entry)
      end
      SiteConfig.public_send("authentication_providers=", enabled_providers) unless
        email_login_disabled_with_one_or_less_auth_providers(enabled_providers)
    end

    def email_login_disabled_with_one_or_less_auth_providers(enabled_providers)
      !SiteConfig.allow_email_password_login && enabled_providers.count <= 1
    end

    def invalid_provider_entry(entry)
      entry.blank? || Authentication::Providers.available.map(&:to_s).exclude?(entry) ||
        provider_keys_missing(entry)
    end

    def provider_keys_missing(entry)
      SiteConfig.public_send("#{entry}_key").blank? || SiteConfig.public_send("#{entry}_secret").blank?
    end

    def create_tags_if_not_created
      # Bulk create tags if they should exist.
      # This is an acts-as-taggable-on as used on saving of an Article, etc.
      return unless (@configs.keys & %w[suggested_tags sidebar_tags]).any?

      Tag.find_or_create_all_with_like_by_name(SiteConfig.suggested_tags + SiteConfig.sidebar_tags)
    end

    # Validations
    def brand_contrast_too_low
      hex = @configs[:primary_brand_color_hex]
      hex.present? && Color::Accessibility.new(hex).low_contrast?
    end

    def brand_color_not_hex
      hex = @configs[:primary_brand_color_hex]
      hex.present? && !hex.match?(/\A#(\h{6}|\h{3})\z/)
    end

    def allowed_domains_include_improper_format
      domains = @configs[:allowed_registration_email_domains]
      return unless domains

      domains_array = domains.delete(" ").split(",")
      valid_domains = domains_array
        .select { |d| d.match?(VALID_DOMAIN) }
      valid_domains.size != domains_array.size
    end

    def valid_image_url(url)
      url.match?(VALID_URL)
    end
  end
end