#-- encoding: UTF-8
#-- copyright
# OpenProject is a project management system.
# Copyright (C) 2012-2015 the OpenProject Foundation (OPF)
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License version 3.
#
# OpenProject is a fork of ChiliProject, which is a fork of Redmine. The copyright follows:
# Copyright (C) 2006-2013 Jean-Philippe Lang
# Copyright (C) 2010-2013 the ChiliProject Team
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
#
# See doc/COPYRIGHT.rdoc for more details.
#++

module Redmine::MenuManager::MenuHelper
  include ::Redmine::MenuManager::TopMenuHelper
  include AccessibilityHelper

  # Returns the current menu item name
  def current_menu_item
    controller.current_menu_item
  end

  # Renders the application main menu
  def render_main_menu(project)
    if project
      build_wiki_menus(project)
      build_work_packages_menu(project)
    end
    render_menu((project && !project.new_record?) ? :project_menu : :application_menu, project)
  end

  def build_wiki_menus(project)
    return unless project.enabled_module_names.include? 'wiki'
    project_wiki = project.wiki

    MenuItems::WikiMenuItem.main_items(project_wiki).each do |main_item|
      Redmine::MenuManager.loose :project_menu do |menu|
        menu.push "#{main_item.item_class}".to_sym,
                  { controller: '/wiki', action: 'show', id: CGI.escape(main_item.title) },
                  param: :project_id,
                  caption: main_item.name,
                  after: :repository,
                  html: { class: 'icon2 icon-wiki' }

        main_item.children.each do |child|
          menu.push "#{child.item_class}".to_sym,
                    { controller: '/wiki', action: 'show', id: CGI.escape(child.title) },
                    param: :project_id,
                    caption: child.name,
                    html:    { class: 'icon2 icon-wiki2' },
                    parent: "#{main_item.item_class}".to_sym
        end
        # FIXME using wiki_menu_item#title to reference the wiki page and wiki_menu_item#name as the menu item representation feels wrong
      end
    end
  end

  def build_work_packages_menu(_project)
    query_menu_items = visible_queries
                       .includes(:query_menu_item)
                       .map(&:query_menu_item)
                       .compact

    Redmine::MenuManager.loose :project_menu do |menu|
      query_menu_items.each do |query_menu_item|
        # url = project_work_packages_path(project, query_id: query_menu_item.navigatable_id) does not work because the authorization check fails
        url = { controller: '/work_packages', action: 'index', params: { query_id: query_menu_item.navigatable_id } }
        menu.push query_menu_item.unique_name,
                  url,
                  param: :project_id,
                  caption: query_menu_item.title,
                  parent: :work_packages,
                  html:    {
                    class: 'icon2 icon-pin query-menu-item',
                    'data-ui-route' => '',
                    'query-menu-item' => 'query-menu-item',
                    'object-id' => query_menu_item.navigatable_id
                  }
      end
    end
  end

  def display_main_menu?(project)
    menu_name = project && !project.new_record? ? :project_menu : :application_menu
    Redmine::MenuManager.items(menu_name).size > 1 # 1 element is the root
  end

  def render_menu(menu, project = nil)
    links = []
    menu_items_for(menu, project) do |node|
      links << render_menu_node(node, project)
    end
    links.empty? ? nil : content_tag('ul', links.join("\n").html_safe, class: 'menu_root')
  end

  def render_drop_down_menu_node(label, items_or_options_with_block = nil, html_options = {}, &_block)
    items, options = if block_given?
                       [[], items_or_options_with_block || {}]
                     else
                       [items_or_options_with_block, html_options]
                     end

    return '' if items.empty? && !block_given?

    options.reverse_merge!(class: 'drop-down')

    content_tag :li, options do
      label + if block_given?
                yield
              else
                content_tag :ul, style: 'display:none' do
                  items.map { |item|
                    render_menu_node(item)
                  }.join(' ').html_safe
                end
              end
    end
  end

  def render_menu_node(node, project = nil)
    return '' if project and not allowed_node?(node, User.current, project)
    if node.has_children? || !node.child_menus.nil?
      render_menu_node_with_children(node, project)
    else
      caption, url, selected = extract_node_details(node, project)
      content_tag('li', render_single_menu_node(node, caption, url, selected))
    end
  end

  def render_menu_node_with_children(node, project = nil)
    caption, url, selected = extract_node_details(node, project)

    content_tag :li do
      # Standard children
      standard_children_list = node.children.map { |child|
        render_menu_node(child, project)
      }.join.html_safe

      # Unattached children
      unattached_children_list = render_unattached_children_menu(node, project)

      # Parent
      node = [render_single_menu_node(node, caption, url, selected)]

      # add children
      node << content_tag(:ul, standard_children_list, class: 'menu-children') unless standard_children_list.empty?
      node << content_tag(:ul, unattached_children_list, class: 'menu-children unattached') unless unattached_children_list.blank?

      node.join("\n").html_safe
    end
  end

  # Returns a list of unattached children menu items
  def render_unattached_children_menu(node, project)
    return nil unless node.child_menus

    ''.tap do |child_html|
      unattached_children = node.child_menus.call(project)
      # Tree nodes support #each so we need to do object detection
      if unattached_children.is_a? Array
        unattached_children.each do |child|
          child_html << content_tag(:li, render_unattached_menu_item(child, project))
        end
      else
        raise Redmine::MenuManager::MenuError, ':child_menus must be an array of MenuItems'
      end
    end.html_safe
  end

  def render_single_menu_node(item, caption, url, selected)
    link_text    = you_are_here_info(selected) + caption
    html_options = item.html_options(selected: selected)
    html_options[:title] ||= caption

    html_options[:lang] = menu_item_locale(item)
    link_to link_text, url, html_options
  end

  def render_unattached_menu_item(menu_item, project)
    raise Redmine::MenuManager::MenuError, ':child_menus must be an array of MenuItems' unless menu_item.is_a? Redmine::MenuManager::MenuItem

    if User.current.allowed_to?(menu_item.url, project)
      link_to(menu_item.caption,
              menu_item.url,
              menu_item.html_options)
    end
  end

  def menu_items_for(menu, project = nil)
    items = []
    Redmine::MenuManager.items(menu).root.children.each do |node|
      if allowed_node?(node, User.current, project) && visible_node?(menu, node)
        if block_given?
          yield node
        else
          items << node  # TODO: not used?
        end
      end
    end
    block_given? ? nil : items
  end

  def extract_node_details(node, project = nil)
    item = node
    url = case item.url
    when Hash
      project.nil? ? item.url : { item.param => project }.merge(item.url)
    when Symbol
      send(item.url)
    else
      item.url
    end
    caption = item.caption(project)

    selected = current_menu_item == item.name

    [caption, url, selected]
  end

  # Checks if a user is allowed to access the menu item by:
  #
  # * Checking the conditions of the item
  # * Checking the url target (project only)
  def allowed_node?(node, user, project)
    if node.condition && !node.condition.call(project)
      # Condition that doesn't pass
      return false
    end

    if project
      return user && user.allowed_to?(node.url, project)
    else
      # outside a project, all menu items allowed
      return true
    end
  end

  def visible_node?(menu, node)
    @hidden_menu_items ||= OpenProject::Configuration.hidden_menu_items
    if @hidden_menu_items.length > 0
      hidden_nodes = @hidden_menu_items[menu.to_s] || []
      !hidden_nodes.include? node.name.to_s
    else
      true
    end
  end
end