#-- copyright
# OpenProject is a project management system.
# Copyright (C) 2012-2013 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.
#++

require 'spec_helper'

describe Principal do
  let(:user) { FactoryGirl.build(:user) }
  let(:group) { FactoryGirl.build(:group) }

  def self.should_return_groups_and_users_if_active(method, *params)
    it "should return a user" do
      user.save!

      Principal.send(method, *params).should == [user]
    end

    it "should return a group" do
      group.save!

      Principal.send(method, *params).should == [group]
    end

    it "should not return the anonymous user" do
      User.anonymous

      Principal.send(method, *params).should == []
    end

    it "should not return an inactive user" do
      user.status = User::STATUSES[:locked]

      user.save!

      Principal.send(method, *params).should == []
    end
  end

  describe "active" do
    should_return_groups_and_users_if_active(:active_or_registered)

    it "should not return a registerd user" do
      user.status = User::STATUSES[:registered]

      user.save!

      Principal.active.should == []
    end
  end

  describe "active_or_registered" do
    should_return_groups_and_users_if_active(:active_or_registered)

    it "should return a registerd user" do
      user.status = User::STATUSES[:registered]

      user.save!

      Principal.active_or_registered.should == [user]
    end
  end

  describe "active_or_registered_like" do
    def self.search
      "blubs"
    end

    let(:search) { self.class.search }

    before do
      user.lastname = search
      group.lastname = search
    end

    should_return_groups_and_users_if_active(:active_or_registered_like, search)

    it "should return a registerd user" do
      user.status = User::STATUSES[:registered]

      user.save!

      Principal.active_or_registered_like(search).should == [user]
    end

    it "should not return a user if the name does not match" do
      user.save!

      Principal.active_or_registered_like(user.lastname + "123").should == []
    end

    it "should return a group if the name does match partially" do
      user.save!

      Principal.active_or_registered_like(user.lastname[0, -1]).should == [user]
    end

  end

  describe "visible_by" do
    let(:project) { FactoryGirl.create(:project_with_types) }
    let(:role) { FactoryGirl.create(:role) }
    let(:user2) { FactoryGirl.create(:user) }
    let(:group2) { FactoryGirl.create(:group) }
    let(:non_member_user) { FactoryGirl.create(:user) }
    let(:non_member_group) { FactoryGirl.create(:group) }
    let(:admin) { FactoryGirl.create(:user, :admin => true) }

    before do
      [user, group].each { |p| p.save! }
      [user, user2, group, group2].each { |p| project.add_member!(p, role) }
    end

    it "should return only users when called on User model" do
      ((visible = User.visible_by(user)) & [user, user2]).size.should == visible.size
      ((visible = User.visible_by(group)) & [user, user2]).size.should == visible.size
    end

    it "should return only groups when called on Group model" do
      ((visible = Group.visible_by(user)) & [group, group2]).size.should == visible.size
      ((visible = Group.visible_by(group)) & [group, group2]).size.should == visible.size
    end

    it "should return both groups and users when called on Principal model" do
      ((visible = Principal.visible_by(group)) & [user, user2, group, group2]).
        size.should == visible.size
      ((visible = Principal.visible_by(group)) & [user, user2, group, group2]).
        size.should == visible.size
    end

    it "should be empty for groups that have no common projects with other Principals" do
      Principal.visible_by(non_member_user).size.should == 0
      Principal.visible_by(non_member_group).size.should == 0
    end

    it "should return all users for admins when called on User model" do
      ((visible = User.visible_by(admin)) & [user, user2, non_member_user, admin]).
        size.should == visible.size
    end

    it "should return all groups for admins when called on Group model" do
      ((visible = Group.visible_by(admin)) & [group, group2, non_member_group]).
        size.should == visible.size
    end

    it "should return all principals for admins when called on Principals model" do
      ((visible = Principal.visible_by(admin)) &
        [user, user2, non_member_user, admin, group, group2, non_member_group]).
        size.should == visible.size
    end
  end
end