#-- copyright
# OpenProject is a project management system.
# Copyright (C) 2012-2017 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-2017 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 CustomValue::UserStrategy do
  let(:instance) { described_class.new(custom_value) }
  let(:custom_value) do
    double('CustomValue',
           value: value,
           custom_field: custom_field,
           customized: customized)
  end
  let(:customized) { double('customized') }
  let(:custom_field) { FactoryGirl.build(:custom_field) }
  let(:user) { FactoryGirl.build_stubbed(:user) }

  describe '#parse_value/#typed_value' do
    subject { instance }

    context 'with a user' do
      let(:value) { user }

      it 'returns the user and sets it for later retrieval' do
        expect(User)
          .to_not receive(:find_by)

        expect(subject.parse_value(value)).to eql user.id.to_s

        expect(subject.typed_value).to eql value
      end
    end

    context 'with an id string' do
      let(:value) { user.id.to_s }

      it 'returns the string and has to later find the user' do
        allow(User)
          .to receive(:find_by)
          .with(id: user.id.to_s)
          .and_return(user)

        expect(subject.parse_value(value)).to eql value

        expect(subject.typed_value).to eql user
      end
    end

    context 'value is blank' do
      let(:value) { '' }

      it 'is nil and does not look for the user' do
        expect(User)
          .to_not receive(:find_by)

        expect(subject.parse_value(value)).to be_nil

        expect(subject.typed_value).to be_nil
      end
    end

    context 'value is nil' do
      let(:value) { nil }

      it 'is nil and does not look for the user' do
        expect(User)
          .to_not receive(:find_by)

        expect(subject.parse_value(value)).to be_nil

        expect(subject.typed_value).to be_nil
      end
    end
  end

  describe '#formatted_value' do
    subject { instance.formatted_value }

    context 'with a User' do
      let(:value) { user }

      it 'is the user to_s (without db access)' do
        instance.parse_value(value)

        expect(User)
          .to_not receive(:find_by)

        expect(subject).to eql value.to_s
      end
    end

    context 'with an id string' do
      let(:value) { user.id.to_s }

      it 'is the user to_s (with db access)' do
        allow(User)
          .to receive(:find_by)
          .with(id: user.id.to_s)
          .and_return(user)

        expect(subject).to eql user.to_s
      end
    end

    context 'value is blank' do
      let(:value) { '' }

      it 'is blank and does not look for the user' do
        expect(subject).to eql ''
      end
    end

    context 'value is nil' do
      let(:value) { nil }

      it 'is blank and does not look for the user' do
        expect(subject).to eql ''
      end
    end
  end

  describe '#validate_type_of_value' do
    subject { instance.validate_type_of_value }
    let(:allowed_ids) { %w(12 13) }

    before do
      allow(custom_field).to receive(:possible_values).with(customized).and_return(allowed_ids)
    end

    context 'value is id of included element' do
      let(:value) { '12' }
      it 'accepts' do
        is_expected.to be_nil
      end
    end

    context 'value is id of non included element' do
      let(:value) { '10' }
      it 'rejects' do
        is_expected.to eql(:inclusion)
      end
    end
  end
end