module Fume
  module Nav
    class NavTag
      attr_accessor :helper, :current, :active_class, :hide_if_empty

      def initialize(attributes = {})
        attributes.each_pair do |name, value|
          send("#{name}=", value)
        end
        @empty = true
      end

      def hide?
        hide_if_empty && @empty
      end

      def li_tag(value, options = {}, &block)
        content_tag(value, :li, options, &block)
      end

      def link_to(value, *args, &block)
        options = args.extract_options!
        apply_active_options(value, options)
        helper.link_to(*args, options, &block)
      end

      def content_tag(value, tag_name, options = {}, &block)
        apply_active_options(value, options)
        helper.content_tag(tag_name, options, &block)
      end

      def apply_active_options(value, options)
        apply(value) do |cls|
          if options[:class]
            options[:class] += " #{cls}"
          else
            options[:class] = "#{cls}"
          end
        end

        @empty = false
      end

      def match?(source, target)
        case source
        when Array
          source.each_with_index.all? { |value, index| match?(value, target[index]) }
        when Regexp
          source.match(target)
        else
          source.to_s == target.to_s
        end
      end

      def apply(value, &block)
        result = match?(value, current)
        block.call(result ? active_class : nil)
      end

      def apply_content(value, &block)
        @empty = false

        apply(value) do |cls|
          helper.capture(cls, &block)
        end
      end
    end
  end
end