jro_apps/redmine Commit - r12405:1c0c22de170e

use :order_column option instead of :order for acts_as_nested_set...

Toshi MARUYAMA -

r12405:1c0c22de170e

parent child

Context file:

r12405:1c0c22de170e

Collapse all files

app/models/project.rb +1 -1

              # Redmine - project management software
              # Copyright (C) 2006-2013  Jean-Philippe Lang
              #
              # 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.
              class Project < ActiveRecord::Base
                include Redmine::SafeAttributes
                # Project statuses
                STATUS_ACTIVE     = 1
                STATUS_CLOSED     = 5
                STATUS_ARCHIVED   = 9
                # Maximum length for project identifiers
                IDENTIFIER_MAX_LENGTH = 100
                # Specific overidden Activities
                has_many :time_entry_activities
                has_many :members, :include => [:principal, :roles], :conditions => "#{Principal.table_name}.type='User' AND #{Principal.table_name}.status=#{Principal::STATUS_ACTIVE}"
                has_many :memberships, :class_name => 'Member'
                has_many :member_principals, :class_name => 'Member',
                                             :include => :principal,
                                             :conditions => "#{Principal.table_name}.type='Group' OR (#{Principal.table_name}.type='User' AND #{Principal.table_name}.status=#{Principal::STATUS_ACTIVE})"
                has_many :enabled_modules, :dependent => :delete_all
                has_and_belongs_to_many :trackers, :order => "#{Tracker.table_name}.position"
                has_many :issues, :dependent => :destroy, :include => [:status, :tracker]
                has_many :issue_changes, :through => :issues, :source => :journals
                has_many :versions, :dependent => :destroy, :order => "#{Version.table_name}.effective_date DESC, #{Version.table_name}.name DESC"
                has_many :time_entries, :dependent => :destroy
                has_many :queries, :class_name => 'IssueQuery', :dependent => :delete_all
                has_many :documents, :dependent => :destroy
                has_many :news, :dependent => :destroy, :include => :author
                has_many :issue_categories, :dependent => :delete_all, :order => "#{IssueCategory.table_name}.name"
                has_many :boards, :dependent => :destroy, :order => "position ASC"
                has_one :repository, :conditions => ["is_default = ?", true]
                has_many :repositories, :dependent => :destroy
                has_many :changesets, :through => :repository
                has_one :wiki, :dependent => :destroy
                # Custom field for the project issues
                has_and_belongs_to_many :issue_custom_fields,
                                        :class_name => 'IssueCustomField',
                                        :order => "#{CustomField.table_name}.position",
                                        :join_table => "#{table_name_prefix}custom_fields_projects#{table_name_suffix}",
                                        :association_foreign_key => 'custom_field_id'
-               acts_as_nested_set :order => 'name', :dependent => :destroy
+               acts_as_nested_set :order_column => 'name', :dependent => :destroy
                acts_as_attachable :view_permission => :view_files,
                                   :delete_permission => :manage_files
                acts_as_customizable
                acts_as_searchable :columns => ['name', 'identifier', 'description'], :project_key => 'id', :permission => nil
                acts_as_event :title => Proc.new {|o| "#{l(:label_project)}: #{o.name}"},
                              :url => Proc.new {|o| {:controller => 'projects', :action => 'show', :id => o}},
                              :author => nil
                attr_protected :status
                validates_presence_of :name, :identifier
                validates_uniqueness_of :identifier
                validates_associated :repository, :wiki
                validates_length_of :name, :maximum => 255
                validates_length_of :homepage, :maximum => 255
                validates_length_of :identifier, :in => 1..IDENTIFIER_MAX_LENGTH
                # donwcase letters, digits, dashes but not digits only
                validates_format_of :identifier, :with => /\A(?!\d+$)[a-z0-9\-_]*\z/, :if => Proc.new { |p| p.identifier_changed? }
                # reserved words
                validates_exclusion_of :identifier, :in => %w( new )
                after_save :update_position_under_parent, :if => Proc.new {|project| project.name_changed?}
                after_save :update_inherited_members, :if => Proc.new {|project| project.inherit_members_changed?}
                before_destroy :delete_all_members
                scope :has_module, lambda {|mod|
                  where("#{Project.table_name}.id IN (SELECT em.project_id FROM #{EnabledModule.table_name} em WHERE em.name=?)", mod.to_s)
                }
                scope :active, lambda { where(:status => STATUS_ACTIVE) }
                scope :status, lambda {|arg| where(arg.blank? ? nil : {:status => arg.to_i}) }
                scope :all_public, lambda { where(:is_public => true) }
                scope :visible, lambda {|*args| where(Project.visible_condition(args.shift || User.current, *args)) }
                scope :allowed_to, lambda {|*args|
                  user = User.current
                  permission = nil
                  if args.first.is_a?(Symbol)
                    permission = args.shift
                  else
                    user = args.shift
                    permission = args.shift
                  end
                  where(Project.allowed_to_condition(user, permission, *args))
                }
                scope :like, lambda {|arg|
                  if arg.blank?
                    where(nil)
                  else
                    pattern = "%#{arg.to_s.strip.downcase}%"
                    where("LOWER(identifier) LIKE :p OR LOWER(name) LIKE :p", :p => pattern)
                  end
                }
                def initialize(attributes=nil, *args)
                  super
                  initialized = (attributes || {}).stringify_keys
                  if !initialized.key?('identifier') && Setting.sequential_project_identifiers?
                    self.identifier = Project.next_identifier
                  end
                  if !initialized.key?('is_public')
                    self.is_public = Setting.default_projects_public?
                  end
                  if !initialized.key?('enabled_module_names')
                    self.enabled_module_names = Setting.default_projects_modules
                  end
                  if !initialized.key?('trackers') && !initialized.key?('tracker_ids')
                    default = Setting.default_projects_tracker_ids
                    if default.is_a?(Array)
                      self.trackers = Tracker.where(:id => default.map(&:to_i)).sorted.all
                    else
                      self.trackers = Tracker.sorted.all
                    end
                  end
                end
                def identifier=(identifier)
                  super unless identifier_frozen?
                end
                def identifier_frozen?
                  errors[:identifier].blank? && !(new_record? || identifier.blank?)
                end
                # returns latest created projects
                # non public projects will be returned only if user is a member of those
                def self.latest(user=nil, count=5)
                  visible(user).limit(count).order("created_on DESC").all
                end
                # Returns true if the project is visible to +user+ or to the current user.
                def visible?(user=User.current)
                  user.allowed_to?(:view_project, self)
                end
                # Returns a SQL conditions string used to find all projects visible by the specified user.
                #
                # Examples:
                #   Project.visible_condition(admin)        => "projects.status = 1"
                #   Project.visible_condition(normal_user)  => "((projects.status = 1) AND (projects.is_public = 1 OR projects.id IN (1,3,4)))"
                #   Project.visible_condition(anonymous)    => "((projects.status = 1) AND (projects.is_public = 1))"
                def self.visible_condition(user, options={})
                  allowed_to_condition(user, :view_project, options)
                end
                # Returns a SQL conditions string used to find all projects for which +user+ has the given +permission+
                #
                # Valid options:
                # * :project => limit the condition to project
                # * :with_subprojects => limit the condition to project and its subprojects
                # * :member => limit the condition to the user projects
                def self.allowed_to_condition(user, permission, options={})
                  perm = Redmine::AccessControl.permission(permission)
                  base_statement = (perm && perm.read? ? "#{Project.table_name}.status <> #{Project::STATUS_ARCHIVED}" : "#{Project.table_name}.status = #{Project::STATUS_ACTIVE}")
                  if perm && perm.project_module
                    # If the permission belongs to a project module, make sure the module is enabled
                    base_statement << " AND #{Project.table_name}.id IN (SELECT em.project_id FROM #{EnabledModule.table_name} em WHERE em.name='#{perm.project_module}')"
                  end
                  if options[:project]
                    project_statement = "#{Project.table_name}.id = #{options[:project].id}"
                    project_statement << " OR (#{Project.table_name}.lft > #{options[:project].lft} AND #{Project.table_name}.rgt < #{options[:project].rgt})" if options[:with_subprojects]
                    base_statement = "(#{project_statement}) AND (#{base_statement})"
                  end
                  if user.admin?
                    base_statement
                  else
                    statement_by_role = {}
                    unless options[:member]
                      role = user.builtin_role
                      if role.allowed_to?(permission)
                        statement_by_role[role] = "#{Project.table_name}.is_public = #{connection.quoted_true}"
                      end
                    end
                    if user.logged?
                      user.projects_by_role.each do |role, projects|
                        if role.allowed_to?(permission) && projects.any?
                          statement_by_role[role] = "#{Project.table_name}.id IN (#{projects.collect(&:id).join(',')})"
                        end
                      end
                    end
                    if statement_by_role.empty?
                      "1=0"
                    else
                      if block_given?
                        statement_by_role.each do |role, statement|
                          if s = yield(role, user)
                            statement_by_role[role] = "(#{statement} AND (#{s}))"
                          end
                        end
                      end
                      "((#{base_statement}) AND (#{statement_by_role.values.join(' OR ')}))"
                    end
                  end
                end
                def principals
                  @principals ||= Principal.active.joins(:members).where("#{Member.table_name}.project_id = ?", id).uniq
                end
                def users
                  @users ||= User.active.joins(:members).where("#{Member.table_name}.project_id = ?", id).uniq
                end
                # Returns the Systemwide and project specific activities
                def activities(include_inactive=false)
                  if include_inactive
                    return all_activities
                  else
                    return active_activities
                  end
                end
                # Will create a new Project specific Activity or update an existing one
                #
                # This will raise a ActiveRecord::Rollback if the TimeEntryActivity
                # does not successfully save.
                def update_or_create_time_entry_activity(id, activity_hash)
                  if activity_hash.respond_to?(:has_key?) && activity_hash.has_key?('parent_id')
                    self.create_time_entry_activity_if_needed(activity_hash)
                  else
                    activity = project.time_entry_activities.find_by_id(id.to_i)
                    activity.update_attributes(activity_hash) if activity
                  end
                end
                # Create a new TimeEntryActivity if it overrides a system TimeEntryActivity
                #
                # This will raise a ActiveRecord::Rollback if the TimeEntryActivity
                # does not successfully save.
                def create_time_entry_activity_if_needed(activity)
                  if activity['parent_id']
                    parent_activity = TimeEntryActivity.find(activity['parent_id'])
                    activity['name'] = parent_activity.name
                    activity['position'] = parent_activity.position
                    if Enumeration.overridding_change?(activity, parent_activity)
                      project_activity = self.time_entry_activities.create(activity)
                      if project_activity.new_record?
                        raise ActiveRecord::Rollback, "Overridding TimeEntryActivity was not successfully saved"
                      else
                        self.time_entries.
                          where(["activity_id = ?", parent_activity.id]).
                          update_all("activity_id = #{project_activity.id}")
                      end
                    end
                  end
                end
                # Returns a :conditions SQL string that can be used to find the issues associated with this project.
                #
                # Examples:
                #   project.project_condition(true)  => "(projects.id = 1 OR (projects.lft > 1 AND projects.rgt < 10))"
                #   project.project_condition(false) => "projects.id = 1"
                def project_condition(with_subprojects)
                  cond = "#{Project.table_name}.id = #{id}"
                  cond = "(#{cond} OR (#{Project.table_name}.lft > #{lft} AND #{Project.table_name}.rgt < #{rgt}))" if with_subprojects
                  cond
                end
                def self.find(*args)
                  if args.first && args.first.is_a?(String) && !args.first.match(/^\d*$/)
                    project = find_by_identifier(*args)
                    raise ActiveRecord::RecordNotFound, "Couldn't find Project with identifier=#{args.first}" if project.nil?
                    project
                  else
                    super
                  end
                end
                def self.find_by_param(*args)
                  self.find(*args)
                end
                alias :base_reload :reload
                def reload(*args)
                  @principals = nil
                  @users = nil
                  @shared_versions = nil
                  @rolled_up_versions = nil
                  @rolled_up_trackers = nil
                  @all_issue_custom_fields = nil
                  @all_time_entry_custom_fields = nil
                  @to_param = nil
                  @allowed_parents = nil
                  @allowed_permissions = nil
                  @actions_allowed = nil
                  @start_date = nil
                  @due_date = nil
                  base_reload(*args)
                end
                def to_param
                  # id is used for projects with a numeric identifier (compatibility)
                  @to_param ||= (identifier.to_s =~ %r{^\d*$} ? id.to_s : identifier)
                end
                def active?
                  self.status == STATUS_ACTIVE
                end
                def archived?
                  self.status == STATUS_ARCHIVED
                end
                # Archives the project and its descendants
                def archive
                  # Check that there is no issue of a non descendant project that is assigned
                  # to one of the project or descendant versions
                  v_ids = self_and_descendants.collect {|p| p.version_ids}.flatten
                  if v_ids.any? &&
                    Issue.
                      includes(:project).
                      where("#{Project.table_name}.lft < ? OR #{Project.table_name}.rgt > ?", lft, rgt).
                      where("#{Issue.table_name}.fixed_version_id IN (?)", v_ids).
                      exists?
                    return false
                  end
                  Project.transaction do
                    archive!
                  end
                  true
                end
                # Unarchives the project
                # All its ancestors must be active
                def unarchive
                  return false if ancestors.detect {|a| !a.active?}
                  update_attribute :status, STATUS_ACTIVE
                end
                def close
                  self_and_descendants.status(STATUS_ACTIVE).update_all :status => STATUS_CLOSED
                end
                def reopen
                  self_and_descendants.status(STATUS_CLOSED).update_all :status => STATUS_ACTIVE
                end
                # Returns an array of projects the project can be moved to
                # by the current user
                def allowed_parents
                  return @allowed_parents if @allowed_parents
                  @allowed_parents = Project.where(Project.allowed_to_condition(User.current, :add_subprojects)).all
                  @allowed_parents = @allowed_parents - self_and_descendants
                  if User.current.allowed_to?(:add_project, nil, :global => true) || (!new_record? && parent.nil?)
                    @allowed_parents << nil
                  end
                  unless parent.nil? || @allowed_parents.empty? || @allowed_parents.include?(parent)
                    @allowed_parents << parent
                  end
                  @allowed_parents
                end
                # Sets the parent of the project with authorization check
                def set_allowed_parent!(p)
                  unless p.nil? || p.is_a?(Project)
                    if p.to_s.blank?
                      p = nil
                    else
                      p = Project.find_by_id(p)
                      return false unless p
                    end
                  end
                  if p.nil?
                    if !new_record? && allowed_parents.empty?
                      return false
                    end
                  elsif !allowed_parents.include?(p)
                    return false
                  end
                  set_parent!(p)
                end
                # Sets the parent of the project
                # Argument can be either a Project, a String, a Fixnum or nil
                def set_parent!(p)
                  unless p.nil? || p.is_a?(Project)
                    if p.to_s.blank?
                      p = nil
                    else
                      p = Project.find_by_id(p)
                      return false unless p
                    end
                  end
                  if p == parent && !p.nil?
                    # Nothing to do
                    true
                  elsif p.nil? || (p.active? && move_possible?(p))
                    set_or_update_position_under(p)
                    Issue.update_versions_from_hierarchy_change(self)
                    true
                  else
                    # Can not move to the given target
                    false
                  end
                end
                # Recalculates all lft and rgt values based on project names
                # Unlike Project.rebuild!, these values are recalculated even if the tree "looks" valid
                # Used in BuildProjectsTree migration
                def self.rebuild_tree!
                  transaction do
                    update_all "lft = NULL, rgt = NULL"
                    rebuild!(false)
                  end
                end
                # Returns an array of the trackers used by the project and its active sub projects
                def rolled_up_trackers
                  @rolled_up_trackers ||=
                    Tracker.
                      joins(:projects).
                      joins("JOIN #{EnabledModule.table_name} ON #{EnabledModule.table_name}.project_id = #{Project.table_name}.id AND #{EnabledModule.table_name}.name = 'issue_tracking'").
                      select("DISTINCT #{Tracker.table_name}.*").
                      where("#{Project.table_name}.lft >= ? AND #{Project.table_name}.rgt <= ? AND #{Project.table_name}.status <> #{STATUS_ARCHIVED}", lft, rgt).
                      sorted.
                      all
                end
                # Closes open and locked project versions that are completed
                def close_completed_versions
                  Version.transaction do
                    versions.where(:status => %w(open locked)).all.each do |version|
                      if version.completed?
                        version.update_attribute(:status, 'closed')
                      end
                    end
                  end
                end
                # Returns a scope of the Versions on subprojects
                def rolled_up_versions
                  @rolled_up_versions ||=
                    Version.
                      includes(:project).
                      where("#{Project.table_name}.lft >= ? AND #{Project.table_name}.rgt <= ? AND #{Project.table_name}.status <> ?", lft, rgt, STATUS_ARCHIVED)
                end
                # Returns a scope of the Versions used by the project
                def shared_versions
                  if new_record?
                    Version.
                      includes(:project).
                      where("#{Project.table_name}.status <> ? AND #{Version.table_name}.sharing = 'system'", STATUS_ARCHIVED)
                  else
                    @shared_versions ||= begin
                      r = root? ? self : root
                      Version.
                        includes(:project).
                        where("#{Project.table_name}.id = #{id}" +
                                " OR (#{Project.table_name}.status <> #{Project::STATUS_ARCHIVED} AND (" +
                                  " #{Version.table_name}.sharing = 'system'" +
                                  " OR (#{Project.table_name}.lft >= #{r.lft} AND #{Project.table_name}.rgt <= #{r.rgt} AND #{Version.table_name}.sharing = 'tree')" +
                                  " OR (#{Project.table_name}.lft < #{lft} AND #{Project.table_name}.rgt > #{rgt} AND #{Version.table_name}.sharing IN ('hierarchy', 'descendants'))" +
                                  " OR (#{Project.table_name}.lft > #{lft} AND #{Project.table_name}.rgt < #{rgt} AND #{Version.table_name}.sharing = 'hierarchy')" +
                                "))")
                    end
                  end
                end
                # Returns a hash of project users grouped by role
                def users_by_role
                  members.includes(:user, :roles).all.inject({}) do |h, m|
                    m.roles.each do |r|
                      h[r] ||= []
                      h[r] << m.user
                    end
                    h
                  end
                end
                # Deletes all project's members
                def delete_all_members
                  me, mr = Member.table_name, MemberRole.table_name
                  connection.delete("DELETE FROM #{mr} WHERE #{mr}.member_id IN (SELECT #{me}.id FROM #{me} WHERE #{me}.project_id = #{id})")
                  Member.delete_all(['project_id = ?', id])
                end
                # Users/groups issues can be assigned to
                def assignable_users
                  assignable = Setting.issue_group_assignment? ? member_principals : members
                  assignable.select {|m| m.roles.detect {|role| role.assignable?}}.collect {|m| m.principal}.sort
                end
                # Returns the mail adresses of users that should be always notified on project events
                def recipients
                  notified_users.collect {|user| user.mail}
                end
                # Returns the users that should be notified on project events
                def notified_users
                  # TODO: User part should be extracted to User#notify_about?
                  members.select {|m| m.principal.present? && (m.mail_notification? || m.principal.mail_notification == 'all')}.collect {|m| m.principal}
                end
                # Returns a scope of all custom fields enabled for project issues
                # (explictly associated custom fields and custom fields enabled for all projects)
                def all_issue_custom_fields
                  @all_issue_custom_fields ||= IssueCustomField.
                    sorted.
                    where("is_for_all = ? OR id IN (SELECT DISTINCT cfp.custom_field_id" +
                      " FROM #{table_name_prefix}custom_fields_projects#{table_name_suffix} cfp" +
                      " WHERE cfp.project_id = ?)", true, id)
                end
                # Returns an array of all custom fields enabled for project time entries
                # (explictly associated custom fields and custom fields enabled for all projects)
                def all_time_entry_custom_fields
                  @all_time_entry_custom_fields ||= (TimeEntryCustomField.for_all + time_entry_custom_fields).uniq.sort
                end
                def project
                  self
                end
                def <=>(project)
                  name.downcase <=> project.name.downcase
                end
                def to_s
                  name
                end
                # Returns a short description of the projects (first lines)
                def short_description(length = 255)
                  description.gsub(/^(.{#{length}}[^\n\r]*).*$/m, '\1...').strip if description
                end
                def css_classes
                  s = 'project'
                  s << ' root' if root?
                  s << ' child' if child?
                  s << (leaf? ? ' leaf' : ' parent')
                  unless active?
                    if archived?
                      s << ' archived'
                    else
                      s << ' closed'
                    end
                  end
                  s
                end
                # The earliest start date of a project, based on it's issues and versions
                def start_date
                  @start_date ||= [
                   issues.minimum('start_date'),
                   shared_versions.minimum('effective_date'),
                   Issue.fixed_version(shared_versions).minimum('start_date')
                  ].compact.min
                end
                # The latest due date of an issue or version
                def due_date
                  @due_date ||= [
                   issues.maximum('due_date'),
                   shared_versions.maximum('effective_date'),
                   Issue.fixed_version(shared_versions).maximum('due_date')
                  ].compact.max
                end
                def overdue?
                  active? && !due_date.nil? && (due_date < Date.today)
                end
                # Returns the percent completed for this project, based on the
                # progress on it's versions.
                def completed_percent(options={:include_subprojects => false})
                  if options.delete(:include_subprojects)
                    total = self_and_descendants.collect(&:completed_percent).sum
                    total / self_and_descendants.count
                  else
                    if versions.count > 0
                      total = versions.collect(&:completed_percent).sum
                      total / versions.count
                    else
 
                    end
                  end
                end
                # Return true if this project allows to do the specified action.
                # action can be:
                # * a parameter-like Hash (eg. :controller => 'projects', :action => 'edit')
                # * a permission Symbol (eg. :edit_project)
                def allows_to?(action)
                  if archived?
                    # No action allowed on archived projects
                    return false
                  end
                  unless active? || Redmine::AccessControl.read_action?(action)
                    # No write action allowed on closed projects
                    return false
                  end
                  # No action allowed on disabled modules
                  if action.is_a? Hash
                    allowed_actions.include? "#{action[:controller]}/#{action[:action]}"
                  else
                    allowed_permissions.include? action
                  end
                end
                def module_enabled?(module_name)
                  module_name = module_name.to_s
                  enabled_modules.detect {|m| m.name == module_name}
                end
                def enabled_module_names=(module_names)
                  if module_names && module_names.is_a?(Array)
                    module_names = module_names.collect(&:to_s).reject(&:blank?)
                    self.enabled_modules = module_names.collect {|name| enabled_modules.detect {|mod| mod.name == name} || EnabledModule.new(:name => name)}
                  else
                    enabled_modules.clear
                  end
                end
                # Returns an array of the enabled modules names
                def enabled_module_names
                  enabled_modules.collect(&:name)
                end
                # Enable a specific module
                #
                # Examples:
                #   project.enable_module!(:issue_tracking)
                #   project.enable_module!("issue_tracking")
                def enable_module!(name)
                  enabled_modules << EnabledModule.new(:name => name.to_s) unless module_enabled?(name)
                end
                # Disable a module if it exists
                #
                # Examples:
                #   project.disable_module!(:issue_tracking)
                #   project.disable_module!("issue_tracking")
                #   project.disable_module!(project.enabled_modules.first)
                def disable_module!(target)
                  target = enabled_modules.detect{|mod| target.to_s == mod.name} unless enabled_modules.include?(target)
                  target.destroy unless target.blank?
                end
                safe_attributes 'name',
                  'description',
                  'homepage',
                  'is_public',
                  'identifier',
                  'custom_field_values',
                  'custom_fields',
                  'tracker_ids',
                  'issue_custom_field_ids'
                safe_attributes 'enabled_module_names',
                  :if => lambda {|project, user| project.new_record? || user.allowed_to?(:select_project_modules, project) }
                safe_attributes 'inherit_members',
                  :if => lambda {|project, user| project.parent.nil? || project.parent.visible?(user)}
                # Returns an array of projects that are in this project's hierarchy
                #
                # Example: parents, children, siblings
                def hierarchy
                  parents = project.self_and_ancestors || []
                  descendants = project.descendants || []
                  project_hierarchy = parents | descendants # Set union
                end
                # Returns an auto-generated project identifier based on the last identifier used
                def self.next_identifier
                  p = Project.order('id DESC').first
                  p.nil? ? nil : p.identifier.to_s.succ
                end
                # Copies and saves the Project instance based on the +project+.
                # Duplicates the source project's:
                # * Wiki
                # * Versions
                # * Categories
                # * Issues
                # * Members
                # * Queries
                #
                # Accepts an +options+ argument to specify what to copy
                #
                # Examples:
                #   project.copy(1)                                    # => copies everything
                #   project.copy(1, :only => 'members')                # => copies members only
                #   project.copy(1, :only => ['members', 'versions'])  # => copies members and versions
                def copy(project, options={})
                  project = project.is_a?(Project) ? project : Project.find(project)
                  to_be_copied = %w(wiki versions issue_categories issues members queries boards)
                  to_be_copied = to_be_copied & options[:only].to_a unless options[:only].nil?
                  Project.transaction do
                    if save
                      reload
                      to_be_copied.each do |name|
                        send "copy_#{name}", project
                      end
                      Redmine::Hook.call_hook(:model_project_copy_before_save, :source_project => project, :destination_project => self)
                      save
                    end
                  end
                end
                # Returns a new unsaved Project instance with attributes copied from +project+
                def self.copy_from(project)
                  project = project.is_a?(Project) ? project : Project.find(project)
                  # clear unique attributes
                  attributes = project.attributes.dup.except('id', 'name', 'identifier', 'status', 'parent_id', 'lft', 'rgt')
                  copy = Project.new(attributes)
                  copy.enabled_modules = project.enabled_modules
                  copy.trackers = project.trackers
                  copy.custom_values = project.custom_values.collect {|v| v.clone}
                  copy.issue_custom_fields = project.issue_custom_fields
                  copy
                end
                # Yields the given block for each project with its level in the tree
                def self.project_tree(projects, &block)
                  ancestors = []
                  projects.sort_by(&:lft).each do |project|
                    while (ancestors.any? && !project.is_descendant_of?(ancestors.last))
                      ancestors.pop
                    end
                    yield project, ancestors.size
                    ancestors << project
                  end
                end
                private
                def after_parent_changed(parent_was)
                  remove_inherited_member_roles
                  add_inherited_member_roles
                end
                def update_inherited_members
                  if parent
                    if inherit_members? && !inherit_members_was
                      remove_inherited_member_roles
                      add_inherited_member_roles
                    elsif !inherit_members? && inherit_members_was
                      remove_inherited_member_roles
                    end
                  end
                end
                def remove_inherited_member_roles
                  member_roles = memberships.map(&:member_roles).flatten
                  member_role_ids = member_roles.map(&:id)
                  member_roles.each do |member_role|
                    if member_role.inherited_from && !member_role_ids.include?(member_role.inherited_from)
                      member_role.destroy
                    end
                  end
                end
                def add_inherited_member_roles
                  if inherit_members? && parent
                    parent.memberships.each do |parent_member|
                      member = Member.find_or_new(self.id, parent_member.user_id)
                      parent_member.member_roles.each do |parent_member_role|
                        member.member_roles << MemberRole.new(:role => parent_member_role.role, :inherited_from => parent_member_role.id)
                      end
                      member.save!
                    end
                  end
                end
                # Copies wiki from +project+
                def copy_wiki(project)
                  # Check that the source project has a wiki first
                  unless project.wiki.nil?
                    wiki = self.wiki || Wiki.new
                    wiki.attributes = project.wiki.attributes.dup.except("id", "project_id")
                    wiki_pages_map = {}
                    project.wiki.pages.each do |page|
                      # Skip pages without content
                      next if page.content.nil?
                      new_wiki_content = WikiContent.new(page.content.attributes.dup.except("id", "page_id", "updated_on"))
                      new_wiki_page = WikiPage.new(page.attributes.dup.except("id", "wiki_id", "created_on", "parent_id"))
                      new_wiki_page.content = new_wiki_content
                      wiki.pages << new_wiki_page
                      wiki_pages_map[page.id] = new_wiki_page
                    end
                    self.wiki = wiki
                    wiki.save
                    # Reproduce page hierarchy
                    project.wiki.pages.each do |page|
                      if page.parent_id && wiki_pages_map[page.id]
                        wiki_pages_map[page.id].parent = wiki_pages_map[page.parent_id]
                        wiki_pages_map[page.id].save
                      end
                    end
                  end
                end
                # Copies versions from +project+
                def copy_versions(project)
                  project.versions.each do |version|
                    new_version = Version.new
                    new_version.attributes = version.attributes.dup.except("id", "project_id", "created_on", "updated_on")
                    self.versions << new_version
                  end
                end
                # Copies issue categories from +project+
                def copy_issue_categories(project)
                  project.issue_categories.each do |issue_category|
                    new_issue_category = IssueCategory.new
                    new_issue_category.attributes = issue_category.attributes.dup.except("id", "project_id")
                    self.issue_categories << new_issue_category
                  end
                end
                # Copies issues from +project+
                def copy_issues(project)
                  # Stores the source issue id as a key and the copied issues as the
                  # value.  Used to map the two togeather for issue relations.
                  issues_map = {}
                  # Store status and reopen locked/closed versions
                  version_statuses = versions.reject(&:open?).map {|version| [version, version.status]}
                  version_statuses.each do |version, status|
                    version.update_attribute :status, 'open'
                  end
                  # Get issues sorted by root_id, lft so that parent issues
                  # get copied before their children
                  project.issues.reorder('root_id, lft').each do |issue|
                    new_issue = Issue.new
                    new_issue.copy_from(issue, :subtasks => false, :link => false)
                    new_issue.project = self
                    # Changing project resets the custom field values
                    # TODO: handle this in Issue#project=
                    new_issue.custom_field_values = issue.custom_field_values.inject({}) {|h,v| h[v.custom_field_id] = v.value; h}
                    # Reassign fixed_versions by name, since names are unique per project
                    if issue.fixed_version && issue.fixed_version.project == project
                      new_issue.fixed_version = self.versions.detect {|v| v.name == issue.fixed_version.name}
                    end
                    # Reassign the category by name, since names are unique per project
                    if issue.category
                      new_issue.category = self.issue_categories.detect {|c| c.name == issue.category.name}
                    end
                    # Parent issue
                    if issue.parent_id
                      if copied_parent = issues_map[issue.parent_id]
                        new_issue.parent_issue_id = copied_parent.id
                      end
                    end
                    self.issues << new_issue
                    if new_issue.new_record?
                      logger.info "Project#copy_issues: issue ##{issue.id} could not be copied: #{new_issue.errors.full_messages}" if logger && logger.info
                    else
                      issues_map[issue.id] = new_issue unless new_issue.new_record?
                    end
                  end
                  # Restore locked/closed version statuses
                  version_statuses.each do |version, status|
                    version.update_attribute :status, status
                  end
                  # Relations after in case issues related each other
                  project.issues.each do |issue|
                    new_issue = issues_map[issue.id]
                    unless new_issue
                      # Issue was not copied
                      next
                    end
                    # Relations
                    issue.relations_from.each do |source_relation|
                      new_issue_relation = IssueRelation.new
                      new_issue_relation.attributes = source_relation.attributes.dup.except("id", "issue_from_id", "issue_to_id")
                      new_issue_relation.issue_to = issues_map[source_relation.issue_to_id]
                      if new_issue_relation.issue_to.nil? && Setting.cross_project_issue_relations?
                        new_issue_relation.issue_to = source_relation.issue_to
                      end
                      new_issue.relations_from << new_issue_relation
                    end
                    issue.relations_to.each do |source_relation|
                      new_issue_relation = IssueRelation.new
                      new_issue_relation.attributes = source_relation.attributes.dup.except("id", "issue_from_id", "issue_to_id")
                      new_issue_relation.issue_from = issues_map[source_relation.issue_from_id]
                      if new_issue_relation.issue_from.nil? && Setting.cross_project_issue_relations?
                        new_issue_relation.issue_from = source_relation.issue_from
                      end
                      new_issue.relations_to << new_issue_relation
                    end
                  end
                end
                # Copies members from +project+
                def copy_members(project)
                  # Copy users first, then groups to handle members with inherited and given roles
                  members_to_copy = []
                  members_to_copy += project.memberships.select {|m| m.principal.is_a?(User)}
                  members_to_copy += project.memberships.select {|m| !m.principal.is_a?(User)}
                  members_to_copy.each do |member|
                    new_member = Member.new
                    new_member.attributes = member.attributes.dup.except("id", "project_id", "created_on")
                    # only copy non inherited roles
                    # inherited roles will be added when copying the group membership
                    role_ids = member.member_roles.reject(&:inherited?).collect(&:role_id)
                    next if role_ids.empty?
                    new_member.role_ids = role_ids
                    new_member.project = self
                    self.members << new_member
                  end
                end
                # Copies queries from +project+
                def copy_queries(project)
                  project.queries.each do |query|
                    new_query = IssueQuery.new
                    new_query.attributes = query.attributes.dup.except("id", "project_id", "sort_criteria")
                    new_query.sort_criteria = query.sort_criteria if query.sort_criteria
                    new_query.project = self
                    new_query.user_id = query.user_id
                    self.queries << new_query
                  end
                end
                # Copies boards from +project+
                def copy_boards(project)
                  project.boards.each do |board|
                    new_board = Board.new
                    new_board.attributes = board.attributes.dup.except("id", "project_id", "topics_count", "messages_count", "last_message_id")
                    new_board.project = self
                    self.boards << new_board
                  end
                end
                def allowed_permissions
                  @allowed_permissions ||= begin
                    module_names = enabled_modules.loaded? ? enabled_modules.map(&:name) : enabled_modules.pluck(:name)
                    Redmine::AccessControl.modules_permissions(module_names).collect {|p| p.name}
                  end
                end
                def allowed_actions
                  @actions_allowed ||= allowed_permissions.inject([]) { |actions, permission| actions += Redmine::AccessControl.allowed_actions(permission) }.flatten
                end
                # Returns all the active Systemwide and project specific activities
                def active_activities
                  overridden_activity_ids = self.time_entry_activities.collect(&:parent_id)
                  if overridden_activity_ids.empty?
                    return TimeEntryActivity.shared.active
                  else
                    return system_activities_and_project_overrides
                  end
                end
                # Returns all the Systemwide and project specific activities
                # (inactive and active)
                def all_activities
                  overridden_activity_ids = self.time_entry_activities.collect(&:parent_id)
                  if overridden_activity_ids.empty?
                    return TimeEntryActivity.shared
                  else
                    return system_activities_and_project_overrides(true)
                  end
                end
                # Returns the systemwide active activities merged with the project specific overrides
                def system_activities_and_project_overrides(include_inactive=false)
                  if include_inactive
                    return TimeEntryActivity.shared.
                      where("id NOT IN (?)", self.time_entry_activities.collect(&:parent_id)).all +
                      self.time_entry_activities
                  else
                    return TimeEntryActivity.shared.active.
                      where("id NOT IN (?)", self.time_entry_activities.collect(&:parent_id)).all +
                      self.time_entry_activities.active
                  end
                end
                # Archives subprojects recursively
                def archive!
                  children.each do |subproject|
                    subproject.send :archive!
                  end
                  update_attribute :status, STATUS_ARCHIVED
                end
                def update_position_under_parent
                  set_or_update_position_under(parent)
                end
                # Inserts/moves the project so that target's children or root projects stay alphabetically sorted
                def set_or_update_position_under(target_parent)
                  parent_was = parent
                  sibs = (target_parent.nil? ? self.class.roots : target_parent.children)
                  to_be_inserted_before = sibs.sort_by {|c| c.name.to_s.downcase}.detect {|c| c.name.to_s.downcase > name.to_s.downcase }
                  if to_be_inserted_before
                    move_to_left_of(to_be_inserted_before)
                  elsif target_parent.nil?
                    if sibs.empty?
                      # move_to_root adds the project in first (ie. left) position
                      move_to_root
                    else
                      move_to_right_of(sibs.last) unless self == sibs.last
                    end
                  else
                    # move_to_child_of adds the project in last (ie.right) position
                    move_to_child_of(target_parent)
                  end
                  if parent_was != target_parent
                    after_parent_changed(parent_was)
                  end
                end
              end

lib/plugins/awesome_nested_set/lib/awesome_nested_set/awesome_nested_set.rb +4 -5

              module CollectiveIdea #:nodoc:
                module Acts #:nodoc:
                  module NestedSet #:nodoc:
                    # This acts provides Nested Set functionality. Nested Set is a smart way to implement
                    # an _ordered_ tree, with the added feature that you can select the children and all of their
                    # descendants with a single query. The drawback is that insertion or move need some complex
                    # sql queries. But everything is done here by this module!
                    #
                    # Nested sets are appropriate each time you want either an orderd tree (menus,
                    # commercial categories) or an efficient way of querying big trees (threaded posts).
                    #
                    # == API
                    #
                    # Methods names are aligned with acts_as_tree as much as possible to make replacment from one
                    # by another easier.
                    #
                    #   item.children.create(:name => "child1")
                    #
                    # Configuration options are:
                    #
                    # * +:parent_column+ - specifies the column name to use for keeping the position integer (default: parent_id)
                    # * +:left_column+ - column name for left boundry data, default "lft"
                    # * +:right_column+ - column name for right boundry data, default "rgt"
                    # * +:depth_column+ - column name for the depth data, default "depth"
                    # * +:scope+ - restricts what is to be considered a list. Given a symbol, it'll attach "_id"
                    #   (if it hasn't been already) and use that as the foreign key restriction. You
                    #   can also pass an array to scope by multiple attributes.
                    #   Example: <tt>acts_as_nested_set :scope => [:notable_id, :notable_type]</tt>
                    # * +:dependent+ - behavior for cascading destroy. If set to :destroy, all the
                    #   child objects are destroyed alongside this object by calling their destroy
                    #   method. If set to :delete_all (default), all the child objects are deleted
                    #   without calling their destroy method.
                    # * +:counter_cache+ adds a counter cache for the number of children.
                    #   defaults to false.
                    #   Example: <tt>acts_as_nested_set :counter_cache => :children_count</tt>
                    # * +:order_column+ on which column to do sorting, by default it is the left_column_name
                    #   Example: <tt>acts_as_nested_set :order_column => :position</tt>
                    #
                    # See CollectiveIdea::Acts::NestedSet::Model::ClassMethods for a list of class methods and
                    # CollectiveIdea::Acts::NestedSet::Model for a list of instance methods added
                    # to acts_as_nested_set models
                    def acts_as_nested_set(options = {})
                      options = {
                        :parent_column => 'parent_id',
                        :left_column => 'lft',
                        :right_column => 'rgt',
                        :depth_column => 'depth',
                        :dependent => :delete_all, # or :destroy
                        :polymorphic => false,
                        :counter_cache => false
                      }.merge(options)
                      if options[:scope].is_a?(Symbol) && options[:scope].to_s !~ /_id$/
                        options[:scope] = "#{options[:scope]}_id".intern
                      end
                      class_attribute :acts_as_nested_set_options
                      self.acts_as_nested_set_options = options
                      include CollectiveIdea::Acts::NestedSet::Model
                      include Columns
                      extend Columns
                      belongs_to :parent, :class_name => self.base_class.to_s,
                                          :foreign_key => parent_column_name,
                                          :counter_cache => options[:counter_cache],
                                          :inverse_of => (:children unless options[:polymorphic]),
                                          :polymorphic => options[:polymorphic]
                      has_many_children_options = {
                        :class_name => self.base_class.to_s,
                        :foreign_key => parent_column_name,
                        :order => order_column,
                        :inverse_of => (:parent unless options[:polymorphic]),
                      }
                      # Add callbacks, if they were supplied.. otherwise, we don't want them.
                      [:before_add, :after_add, :before_remove, :after_remove].each do |ar_callback|
                        has_many_children_options.update(ar_callback => options[ar_callback]) if options[ar_callback]
                      end
                      has_many :children, has_many_children_options
                      attr_accessor :skip_before_destroy
                      before_create  :set_default_left_and_right
                      before_save    :store_new_parent
                      after_save     :move_to_new_parent, :set_depth!
                      before_destroy :destroy_descendants
                      # no assignment to structure fields
                      [left_column_name, right_column_name, depth_column_name].each do |column|
                        module_eval <<-"end_eval", __FILE__, __LINE__
                          def #{column}=(x)
                            raise ActiveRecord::ActiveRecordError, "Unauthorized assignment to #{column}: it's an internal field handled by acts_as_nested_set code, use move_to_* methods instead."
                          end
                        end_eval
                      end
                      define_model_callbacks :move
                    end
                    module Model
                      extend ActiveSupport::Concern
                      included do
                        delegate :quoted_table_name, :to => self
                      end
                      module ClassMethods
                        # Returns the first root
                        def root
                          roots.first
                        end
                        def roots
                          where(parent_column_name => nil).order(quoted_left_column_full_name)
                        end
                        def leaves
                          where("#{quoted_right_column_full_name} - #{quoted_left_column_full_name} = 1").order(quoted_left_column_full_name)
                        end
                        def valid?
                          left_and_rights_valid? && no_duplicates_for_columns? && all_roots_valid?
                        end
                        def left_and_rights_valid?
                          ## AS clause not supported in Oracle in FROM clause for aliasing table name
                          joins("LEFT OUTER JOIN #{quoted_table_name}" +
                              (connection.adapter_name.match(/Oracle/).nil? ?  " AS " : " ") +
                              "parent ON " +
                              "#{quoted_parent_column_full_name} = parent.#{primary_key}").
                          where(
                              "#{quoted_left_column_full_name} IS NULL OR " +
                              "#{quoted_right_column_full_name} IS NULL OR " +
                              "#{quoted_left_column_full_name} >= " +
                                "#{quoted_right_column_full_name} OR " +
                              "(#{quoted_parent_column_full_name} IS NOT NULL AND " +
                                "(#{quoted_left_column_full_name} <= parent.#{quoted_left_column_name} OR " +
                                "#{quoted_right_column_full_name} >= parent.#{quoted_right_column_name}))"
                          ).count == 0
                        end
                        def no_duplicates_for_columns?
                          scope_string = Array(acts_as_nested_set_options[:scope]).map do |c|
                            connection.quote_column_name(c)
                          end.push(nil).join(", ")
                          [quoted_left_column_full_name, quoted_right_column_full_name].all? do |column|
                            # No duplicates
                            select("#{scope_string}#{column}, COUNT(#{column})").
                                group("#{scope_string}#{column}").
                                having("COUNT(#{column}) > 1").
                                first.nil?
                          end
                        end
                        # Wrapper for each_root_valid? that can deal with scope.
                        def all_roots_valid?
                          if acts_as_nested_set_options[:scope]
                            roots.group_by {|record| scope_column_names.collect {|col| record.send(col.to_sym) } }.all? do |scope, grouped_roots|
                              each_root_valid?(grouped_roots)
                            end
                          else
                            each_root_valid?(roots)
                          end
                        end
                        def each_root_valid?(roots_to_validate)
                          left = right = 0
                          roots_to_validate.all? do |root|
                            (root.left > left && root.right > right).tap do
                              left = root.left
                              right = root.right
                            end
                          end
                        end
                        # Rebuilds the left & rights if unset or invalid.
                        # Also very useful for converting from acts_as_tree.
                        def rebuild!(validate_nodes = true)
                          # Don't rebuild a valid tree.
                          return true if valid?
                          scope = lambda{|node|}
                          if acts_as_nested_set_options[:scope]
                            scope = lambda{|node|
                              scope_column_names.inject(""){|str, column_name|
                                str << "AND #{connection.quote_column_name(column_name)} = #{connection.quote(node.send(column_name.to_sym))} "
                              }
                            }
                          end
                          indices = {}
                          set_left_and_rights = lambda do |node|
                            # set left
                            node[left_column_name] = indices[scope.call(node)] += 1
                            # find
-                           where(["#{quoted_parent_column_name} = ? #{scope.call(node)}", node]).
-                             order(acts_as_nested_set_options[:order]).
-                             each{|n| set_left_and_rights.call(n) }
+                           where(["#{quoted_parent_column_full_name} = ? #{scope.call(node)}", node]).order("#{quoted_left_column_full_name}, #{quoted_right_column_full_name}, id").each{|n| set_left_and_rights.call(n) }
                            # set right
                            node[right_column_name] = indices[scope.call(node)] += 1
                            node.save!(:validate => validate_nodes)
                          end
                          # Find root node(s)
-                         root_nodes = where("#{quoted_parent_column_name} IS NULL").
-                           order(acts_as_nested_set_options[:order]).each do |root_node|
+                         root_nodes = where("#{quoted_parent_column_full_name} IS NULL").
+                             order(acts_as_nested_set_options[:order_column]).
+                             each do |root_node|
                            # setup index for this scope
                            indices[scope.call(root_node)] ||= 0
                            set_left_and_rights.call(root_node)
                          end
                        end
                        # Iterates over tree elements and determines the current level in the tree.
                        # Only accepts default ordering, odering by an other column than lft
                        # does not work. This method is much more efficent than calling level
                        # because it doesn't require any additional database queries.
                        #
                        # Example:
                        #    Category.each_with_level(Category.root.self_and_descendants) do |o, level|
                        #
                        def each_with_level(objects)
                          path = [nil]
                          objects.each do |o|
                            if o.parent_id != path.last
                              # we are on a new level, did we descend or ascend?
                              if path.include?(o.parent_id)
                                # remove wrong wrong tailing paths elements
                                path.pop while path.last != o.parent_id
                              else
                                path << o.parent_id
                              end
                            end
                            yield(o, path.length - 1)
                          end
                        end
                        # Same as each_with_level - Accepts a string as a second argument to sort the list
                        # Example:
                        #    Category.each_with_level(Category.root.self_and_descendants, :sort_by_this_column) do |o, level|
                        def sorted_each_with_level(objects, order)
                          path = [nil]
                          children = []
                            objects.each do |o|
                            children << o if o.leaf?
                            if o.parent_id != path.last
                              if !children.empty? && !o.leaf?
                                children.sort_by! &order
                                children.each { |c| yield(c, path.length-1) }
                                children = []
                              end
                              # we are on a new level, did we decent or ascent?
                              if path.include?(o.parent_id)
                                # remove wrong wrong tailing paths elements
                                path.pop while path.last != o.parent_id
                              else
                                path << o.parent_id
                              end
                            end
                            yield(o,path.length-1) if !o.leaf?
                          end
                          if !children.empty?
                            children.sort_by! &order
                            children.each { |c| yield(c, path.length-1) }
                          end
                        end
                        def associate_parents(objects)
                          if objects.all?{|o| o.respond_to?(:association)}
                            id_indexed = objects.index_by(&:id)
                            objects.each do |object|
                              if !(association = object.association(:parent)).loaded? && (parent = id_indexed[object.parent_id])
                                association.target = parent
                                association.set_inverse_instance(parent)
                              end
                            end
                          else
                            objects
                          end
                        end
                      end
                      # Any instance method that returns a collection makes use of Rails 2.1's named_scope (which is bundled for Rails 2.0), so it can be treated as a finder.
                      #
                      #   category.self_and_descendants.count
                      #   category.ancestors.find(:all, :conditions => "name like '%foo%'")
                      # Value of the parent column
                      def parent_id
                        self[parent_column_name]
                      end
                      # Value of the left column
                      def left
                        self[left_column_name]
                      end
                      # Value of the right column
                      def right
                        self[right_column_name]
                      end
                      # Returns true if this is a root node.
                      def root?
                        parent_id.nil?
                      end
                      # Returns true if this is the end of a branch.
                      def leaf?
                        new_record? || (persisted? && right.to_i - left.to_i == 1)
                      end
                      # Returns true is this is a child node
                      def child?
                        !root?
                      end
                      # Returns root
                      def root
                        if persisted?
                          self_and_ancestors.where(parent_column_name => nil).first
                        else
                          if parent_id && current_parent = nested_set_scope.find(parent_id)
                            current_parent.root
                          else
                            self
                          end
                        end
                      end
                      # Returns the array of all parents and self
                      def self_and_ancestors
                        nested_set_scope.where([
                          "#{quoted_left_column_full_name} <= ? AND #{quoted_right_column_full_name} >= ?", left, right
                        ])
                      end
                      # Returns an array of all parents
                      def ancestors
                        without_self self_and_ancestors
                      end
                      # Returns the array of all children of the parent, including self
                      def self_and_siblings
                        nested_set_scope.where(parent_column_name => parent_id)
                      end
                      # Returns the array of all children of the parent, except self
                      def siblings
                        without_self self_and_siblings
                      end
                      # Returns a set of all of its nested children which do not have children
                      def leaves
                        descendants.where("#{quoted_right_column_full_name} - #{quoted_left_column_full_name} = 1")
                      end
                      # Returns the level of this object in the tree
                      # root level is 0
                      def level
                        parent_id.nil? ? 0 : compute_level
                      end
                      # Returns a set of itself and all of its nested children
                      def self_and_descendants
                        nested_set_scope.where([
                          "#{quoted_left_column_full_name} >= ? AND #{quoted_left_column_full_name} < ?", left, right
                          # using _left_ for both sides here lets us benefit from an index on that column if one exists
                        ])
                      end
                      # Returns a set of all of its children and nested children
                      def descendants
                        without_self self_and_descendants
                      end
                      def is_descendant_of?(other)
                        other.left < self.left && self.left < other.right && same_scope?(other)
                      end
                      def is_or_is_descendant_of?(other)
                        other.left <= self.left && self.left < other.right && same_scope?(other)
                      end
                      def is_ancestor_of?(other)
                        self.left < other.left && other.left < self.right && same_scope?(other)
                      end
                      def is_or_is_ancestor_of?(other)
                        self.left <= other.left && other.left < self.right && same_scope?(other)
                      end
                      # Check if other model is in the same scope
                      def same_scope?(other)
                        Array(acts_as_nested_set_options[:scope]).all? do |attr|
                          self.send(attr) == other.send(attr)
                        end
                      end
                      # Find the first sibling to the left
                      def left_sibling
                        siblings.where(["#{quoted_left_column_full_name} < ?", left]).
                                order("#{quoted_left_column_full_name} DESC").last
                      end
                      # Find the first sibling to the right
                      def right_sibling
                        siblings.where(["#{quoted_left_column_full_name} > ?", left]).first
                      end
                      # Shorthand method for finding the left sibling and moving to the left of it.
                      def move_left
                        move_to_left_of left_sibling
                      end
                      # Shorthand method for finding the right sibling and moving to the right of it.
                      def move_right
                        move_to_right_of right_sibling
                      end
                      # Move the node to the left of another node (you can pass id only)
                      def move_to_left_of(node)
                        move_to node, :left
                      end
                      # Move the node to the left of another node (you can pass id only)
                      def move_to_right_of(node)
                        move_to node, :right
                      end
                      # Move the node to the child of another node (you can pass id only)
                      def move_to_child_of(node)
                        move_to node, :child
                      end
                      # Move the node to the child of another node with specify index (you can pass id only)
                      def move_to_child_with_index(node, index)
                        if node.children.empty?
                          move_to_child_of(node)
                        elsif node.children.count == index
                          move_to_right_of(node.children.last)
                        else
                          move_to_left_of(node.children[index])
                        end
                      end
                      # Move the node to root nodes
                      def move_to_root
                        move_to nil, :root
                      end
                      # Order children in a nested set by an attribute
                      # Can order by any attribute class that uses the Comparable mixin, for example a string or integer
                      # Usage example when sorting categories alphabetically: @new_category.move_to_ordered_child_of(@root, "name")
                      def move_to_ordered_child_of(parent, order_attribute, ascending = true)
                        self.move_to_root and return unless parent
                        left = nil # This is needed, at least for the tests.
                        parent.children.each do |n| # Find the node immediately to the left of this node.
                          if ascending
                            left = n if n.send(order_attribute) < self.send(order_attribute)
                          else
                            left = n if n.send(order_attribute) > self.send(order_attribute)
                          end
                        end
                        self.move_to_child_of(parent)
                        return unless parent.children.count > 1 # Only need to order if there are multiple children.
                        if left # Self has a left neighbor.
                          self.move_to_right_of(left)
                        else # Self is the left most node.
                          self.move_to_left_of(parent.children[0])
                        end
                      end
                      def move_possible?(target)
                        self != target && # Can't target self
                        same_scope?(target) && # can't be in different scopes
                        # !(left..right).include?(target.left..target.right) # this needs tested more
                        # detect impossible move
                        !((left <= target.left && right >= target.left) or (left <= target.right && right >= target.right))
                      end
                      def to_text
                        self_and_descendants.map do |node|
                          "#{'*'*(node.level+1)} #{node.id} #{node.to_s} (#{node.parent_id}, #{node.left}, #{node.right})"
                        end.join("\n")
                      end
                    protected
                      def compute_level
                        node, nesting = self, 0
                        while (association = node.association(:parent)).loaded? && association.target
                          nesting += 1
                          node = node.parent
                        end if node.respond_to? :association
                        node == self ? ancestors.count : node.level + nesting
                      end
                      def without_self(scope)
                        scope.where(["#{self.class.quoted_table_name}.#{self.class.primary_key} != ?", self])
                      end
                      # All nested set queries should use this nested_set_scope, which performs finds on
                      # the base ActiveRecord class, using the :scope declared in the acts_as_nested_set
                      # declaration.
                      def nested_set_scope(options = {})
                        options = {:order => quoted_left_column_full_name}.merge(options)
                        scopes = Array(acts_as_nested_set_options[:scope])
                        options[:conditions] = scopes.inject({}) do |conditions,attr|
                          conditions.merge attr => self[attr]
                        end unless scopes.empty?
                        self.class.base_class.unscoped.scoped options
                      end
                      def store_new_parent
                        @move_to_new_parent_id = send("#{parent_column_name}_changed?") ? parent_id : false
                        true # force callback to return true
                      end
                      def move_to_new_parent
                        if @move_to_new_parent_id.nil?
                          move_to_root
                        elsif @move_to_new_parent_id
                          move_to_child_of(@move_to_new_parent_id)
                        end
                      end
                      def set_depth!
                        if nested_set_scope.column_names.map(&:to_s).include?(depth_column_name.to_s)
                          in_tenacious_transaction do
                            reload
                            nested_set_scope.where(:id => id).update_all(["#{quoted_depth_column_name} = ?", level])
                          end
                          self[depth_column_name.to_sym] = self.level
                        end
                      end
                      # on creation, set automatically lft and rgt to the end of the tree
                      def set_default_left_and_right
                        highest_right_row = nested_set_scope(:order => "#{quoted_right_column_full_name} desc").limit(1).lock(true).first
                        maxright = highest_right_row ? (highest_right_row[right_column_name] || 0) : 0
                        # adds the new node to the right of all existing nodes
                        self[left_column_name] = maxright + 1
                        self[right_column_name] = maxright + 2
                      end
                      def in_tenacious_transaction(&block)
                        retry_count = 0
                        begin
                          transaction(&block)
                        rescue ActiveRecord::StatementInvalid => error
                          raise unless connection.open_transactions.zero?
                          raise unless error.message =~ /Deadlock found when trying to get lock|Lock wait timeout exceeded/
                          raise unless retry_count < 10
                          retry_count += 1
                          logger.info "Deadlock detected on retry #{retry_count}, restarting transaction"
                          sleep(rand(retry_count)*0.1) # Aloha protocol
                          retry
                        end
                      end
                      # Prunes a branch off of the tree, shifting all of the elements on the right
                      # back to the left so the counts still work.
                      def destroy_descendants
                        return if right.nil? || left.nil? || skip_before_destroy
                        in_tenacious_transaction do
                          reload_nested_set
                          # select the rows in the model that extend past the deletion point and apply a lock
                          nested_set_scope.where(["#{quoted_left_column_full_name} >= ?", left]).
                                                select(id).lock(true)
                          if acts_as_nested_set_options[:dependent] == :destroy
                            descendants.each do |model|
                              model.skip_before_destroy = true
                              model.destroy
                            end
                          else
                            nested_set_scope.where(["#{quoted_left_column_name} > ? AND #{quoted_right_column_name} < ?", left, right]).
                                             delete_all
                          end
                          # update lefts and rights for remaining nodes
                          diff = right - left + 1
                          nested_set_scope.where(["#{quoted_left_column_full_name} > ?", right]).update_all(
                            ["#{quoted_left_column_name} = (#{quoted_left_column_name} - ?)", diff]
                          )
                          nested_set_scope.where(["#{quoted_right_column_full_name} > ?", right]).update_all(
                            ["#{quoted_right_column_name} = (#{quoted_right_column_name} - ?)", diff]
                          )
                          reload
                          # Don't allow multiple calls to destroy to corrupt the set
                          self.skip_before_destroy = true
                        end
                      end
                      # reload left, right, and parent
                      def reload_nested_set
                        reload(
                          :select => "#{quoted_left_column_full_name}, #{quoted_right_column_full_name}, #{quoted_parent_column_full_name}",
                          :lock => true
                        )
                      end
                      def move_to(target, position)
                        raise ActiveRecord::ActiveRecordError, "You cannot move a new node" if self.new_record?
                        run_callbacks :move do
                          in_tenacious_transaction do
                            if target.is_a? self.class.base_class
                              target.reload_nested_set
                            elsif position != :root
                              # load object if node is not an object
                              target = nested_set_scope.find(target)
                            end
                            self.reload_nested_set
                            unless position == :root || move_possible?(target)
                              raise ActiveRecord::ActiveRecordError, "Impossible move, target node cannot be inside moved tree."
                            end
                            bound = case position
                              when :child;  target[right_column_name]
                              when :left;   target[left_column_name]
                              when :right;  target[right_column_name] + 1
                              when :root;   1
                              else raise ActiveRecord::ActiveRecordError, "Position should be :child, :left, :right or :root ('#{position}' received)."
                            end
                            if bound > self[right_column_name]
                              bound = bound - 1
                              other_bound = self[right_column_name] + 1
                            else
                              other_bound = self[left_column_name] - 1
                            end
                            # there would be no change
                            return if bound == self[right_column_name] || bound == self[left_column_name]
                            # we have defined the boundaries of two non-overlapping intervals,
                            # so sorting puts both the intervals and their boundaries in order
                            a, b, c, d = [self[left_column_name], self[right_column_name], bound, other_bound].sort
                            # select the rows in the model between a and d, and apply a lock
                            self.class.base_class.select('id').lock(true).where(
                              ["#{quoted_left_column_full_name} >= :a and #{quoted_right_column_full_name} <= :d", {:a => a, :d => d}]
                            )
                            new_parent = case position
                              when :child;  target.id
                              when :root;   nil
                              else          target[parent_column_name]
                            end
                            self.nested_set_scope.update_all([
                              "#{quoted_left_column_name} = CASE " +
                                "WHEN #{quoted_left_column_name} BETWEEN :a AND :b " +
                                  "THEN #{quoted_left_column_name} + :d - :b " +
                                "WHEN #{quoted_left_column_name} BETWEEN :c AND :d " +
                                  "THEN #{quoted_left_column_name} + :a - :c " +
                                "ELSE #{quoted_left_column_name} END, " +
                              "#{quoted_right_column_name} = CASE " +
                                "WHEN #{quoted_right_column_name} BETWEEN :a AND :b " +
                                  "THEN #{quoted_right_column_name} + :d - :b " +
                                "WHEN #{quoted_right_column_name} BETWEEN :c AND :d " +
                                  "THEN #{quoted_right_column_name} + :a - :c " +
                                "ELSE #{quoted_right_column_name} END, " +
                              "#{quoted_parent_column_name} = CASE " +
                                "WHEN #{self.class.base_class.primary_key} = :id THEN :new_parent " +
                                "ELSE #{quoted_parent_column_name} END",
                              {:a => a, :b => b, :c => c, :d => d, :id => self.id, :new_parent => new_parent}
                            ])
                          end
                          target.reload_nested_set if target
                          self.set_depth!
                          self.descendants.each(&:save)
                          self.reload_nested_set
                        end
                      end
                    end
                    # Mixed into both classes and instances to provide easy access to the column names
                    module Columns
                      def left_column_name
                        acts_as_nested_set_options[:left_column]
                      end
                      def right_column_name
                        acts_as_nested_set_options[:right_column]
                      end
                      def depth_column_name
                        acts_as_nested_set_options[:depth_column]
                      end
                      def parent_column_name
                        acts_as_nested_set_options[:parent_column]
                      end
                      def order_column
                        acts_as_nested_set_options[:order_column] || left_column_name
                      end
                      def scope_column_names
                        Array(acts_as_nested_set_options[:scope])
                      end
                      def quoted_left_column_name
                        connection.quote_column_name(left_column_name)
                      end
                      def quoted_right_column_name
                        connection.quote_column_name(right_column_name)
                      end
                      def quoted_depth_column_name
                        connection.quote_column_name(depth_column_name)
                      end
                      def quoted_parent_column_name
                        connection.quote_column_name(parent_column_name)
                      end
                      def quoted_scope_column_names
                        scope_column_names.collect {|column_name| connection.quote_column_name(column_name) }
                      end
                      def quoted_left_column_full_name
                        "#{quoted_table_name}.#{quoted_left_column_name}"
                      end
                      def quoted_right_column_full_name
                        "#{quoted_table_name}.#{quoted_right_column_name}"
                      end
                      def quoted_parent_column_full_name
                        "#{quoted_table_name}.#{quoted_parent_column_name}"
                      end
                    end
                  end
                end
              end

General Comments 0

Write
Preview

You need to be logged in to leave comments. Login now

No TODOs yet

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages