RSpec.describe Mutant::Context do
  describe '.wrap' do
    subject { described_class.wrap(scope, node) }

    let(:node) { s(:str, 'test') }

    context 'with Module as scope' do
      let(:scope) { Mutant }

      let(:expected) do
        s(:module,
          s(:const, nil, :Mutant),
          s(:str, 'test'))
      end

      it { should eql(expected) }
    end

    context 'with Class as scope' do
      let(:scope) { Mutant::Context }

      let(:expected) do
        s(:class,
          s(:const, nil, :Context),
          nil,
          s(:str, 'test'))
      end

      it { should eql(expected) }
    end
  end

  let(:object)      { described_class.new(scope, source_path) }
  let(:scope_name)  { instance_double(String)                 }
  let(:source_path) { instance_double(Pathname)               }
  let(:scope)       { TestApp::Literal                        }

  describe '#identification' do
    subject { object.identification }

    it { should eql(scope.name) }
  end

  describe '#root' do
    subject { object.root(node) }

    let(:node) { s(:sym, :node) }

    let(:expected_source) do
      generate(parse(<<-RUBY))
        module TestApp
          class Literal
            :node
          end
        end
      RUBY
    end

    let(:generated_source) do
      Unparser.unparse(subject)
    end

    let(:round_tripped_source) do
      Unparser.unparse(parse(expected_source))
    end

    it 'should create correct source' do
      expect(generated_source).to eql(expected_source)
    end
  end

  describe '#unqualified_name' do
    subject { object.unqualified_name }

    let(:path) { instance_double(Pathname) }

    context 'with top level constant name' do
      let(:scope) { TestApp }

      it 'should return the unqualified name' do
        should eql('TestApp')
      end

      it_should_behave_like 'an idempotent method'
    end

    context 'with scoped constant name' do
      it 'should return the unqualified name' do
        should eql('Literal')
      end

      it_should_behave_like 'an idempotent method'
    end
  end

  describe '#match_expressions' do
    subject { object.match_expressions }

    context 'on toplevel scope' do
      let(:scope) { TestApp }

      it { should eql([parse_expression('TestApp*')]) }
    end

    context 'on nested scope' do
      specify do
        should eql(
          [
            parse_expression('TestApp::Literal*'),
            parse_expression('TestApp*')
          ]
        )
      end
    end
  end
end