require 'test_helper'

module Vedeu

  module Groups

    describe DSL do

      let(:described)  { Vedeu::Groups::DSL }
      let(:instance)   { described.new(model, client) }
      let(:model)      { Vedeu::Groups::Group.new }
      let(:client)     {}
      let(:_name)      { :main_screen }

      describe '.group' do
        subject {
          described.group(_name) do
            # ...
          end
        }

        context 'when the name is not given' do
          let(:_name) {}

          it { proc { subject }.must_raise(Vedeu::Error::MissingRequired) }
        end

        context 'when the name is given' do
          context 'when the block is not given' do
            subject { described.group(_name) }

            it { proc { subject }.must_raise(Vedeu::Error::RequiresBlock) }
          end

          context 'when the block is given' do
            it { subject.must_be_instance_of(Vedeu::Groups::Group) }
          end
        end
      end

      describe '#add' do
        subject {
          described.group(_name) do
            add('editor_interface')
          end
        }

        it { subject.must_be_instance_of(Vedeu::Groups::Group) }

        it { subject.members.must_equal(Set['editor_interface']) }
      end

      describe '#members' do
        let(:expected) {
          Set['editor_interface', 'some_interface', 'other_interface']
        }

        subject {
          described.group(_name) do
            members('editor_interface', 'some_interface', 'other_interface')
          end
        }

        it { subject.must_be_instance_of(Vedeu::Groups::Group) }

        it { subject.members.must_equal(expected) }
      end

    end # Group

    describe 'integration' do

      context 'it does not work without a name' do
        subject {
          Vedeu.group('') do
            add('main_interface')
          end
        }

        it { proc { subject }.must_raise(Vedeu::Error::MissingRequired) }
      end

      context 'it adds interface names to the group' do
        subject {
          Vedeu.group('my_group') do
            add('main_interface')
            add('status_interface')
            add('command_interface')
          end
        }

        it { subject.members.size.must_equal(3) }

        it { subject.members.must_equal(
          Set['main_interface', 'status_interface', 'command_interface']
        ) }
      end

      context 'it does not add duplicate names to the group' do
        subject {
          Vedeu.group('my_group') do
            add('main_interface')
            add('status_interface')
            add('main_interface')
          end
        }

        it { subject.members.size.must_equal(2) }

        it do
          subject.members.must_equal(Set['main_interface', 'status_interface'])
        end
      end

    end # DSL

  end # Groups

end # Vedeu