module CategoryBadge

  def self.category_stripe(color, classes)
    style = color ? "style='background-color: ##{color};'" : ''
    "<span class='#{classes}' #{style}></span>"
  end

  def self.inline_category_stripe(color, styles = '', insert_blank = false)
    "<span style='background-color: ##{color};#{styles}'>#{insert_blank ? '&nbsp;' : ''}</span>"
  end

  def self.inline_badge_wrapper_style(category)
    style =
      case (SiteSetting.category_style || :box).to_sym
      when :bar then 'line-height: 1.25; margin-right: 5px;'
      when :box then "background-color:##{category.color}; line-height: 1.5; margin-top: 5px; margin-right: 5px;"
      when :bullet then 'line-height: 1; margin-right: 10px;'
      when :none then ''
      end

    " style='font-size: 0.857em; white-space: nowrap; display: inline-block; position: relative; #{style}'"
  end

  def self.html_for(category, opts = nil)
    opts = opts || {}

    # If there is no category, bail
    return "" if category.blank?

    # By default hide uncategorized
    return "" if category.uncategorized? && !opts[:show_uncategorized]

    extra_classes = "#{opts[:extra_classes]} #{SiteSetting.category_style}"

    result = ''

    # parent span
    unless category.parent_category_id.nil? || opts[:hide_parent]
      parent_category = Category.find_by(id: category.parent_category_id)
      result <<
        if opts[:inline_style]
          case (SiteSetting.category_style || :box).to_sym
          when :bar
            inline_category_stripe(parent_category.color, 'display: inline-block; padding: 1px;', true)
          when :box
            inline_category_stripe(parent_category.color, 'display: inline-block; padding: 0 1px;', true)
          when :bullet
            inline_category_stripe(parent_category.color, 'display: inline-block; width: 5px; height: 10px; line-height: 1;')
          when :none
            ''
          end
        else
          category_stripe(parent_category.color, 'badge-category-parent-bg')
        end
    end

    show_parent = category.parent_category_id && !opts[:hide_parent]

    # sub parent or main category span
    result <<
      if opts[:inline_style]
        case (SiteSetting.category_style || :box).to_sym
        when :bar
          inline_category_stripe(category.color, 'display: inline-block; padding: 1px;', true)
        when :box
          ''
        when :bullet
          inline_category_stripe(category.color, "display: inline-block; width: #{category.parent_category_id.nil? ? 10 : 5}px; height: 10px;")
        when :none
          ''
        end
      else
        category_stripe(category.color, 'badge-category-bg')
      end

    # category name
    class_names = 'badge-category clear-badge'
    description = category.description_text ? "title='#{category.description_text}'" : ''
    category_url = opts[:absolute_url] ? "#{Discourse.base_url_no_prefix}#{category.url}" : category.url

    extra_span_classes =
      if opts[:inline_style]
        case (SiteSetting.category_style || :box).to_sym
        when :bar
          'color: #222222; padding: 3px; vertical-align: text-top; margin-top: -3px; display: inline-block;'
        when :box
          "color: ##{category.text_color}; padding: 0 5px;"
        when :bullet
          'color: #222222; vertical-align: text-top; line-height: 1; margin-left: 4px; padding-left: 2px; display: inline;'
        when :none
          ''
        end + 'max-width: 150px; overflow: hidden; text-overflow: ellipsis;'
      elsif (SiteSetting.category_style).to_sym == :box
        "color: ##{category.text_color}"
      else
        ''
      end
    result << "<span style='#{extra_span_classes}' data-drop-close='true' class='#{class_names}'
                 #{description}>"

    result << ERB::Util.html_escape(category.name) << '</span>'

    result = "<a class='badge-wrapper #{extra_classes}' href='#{category_url}'" + (opts[:inline_style] ? inline_badge_wrapper_style(category) : '') + ">#{result}</a>"

    result.html_safe
  end
end