require 'ripper'
require 'spec_helper'
require 'tailor/rulers/indentation_spaces_ruler/indentation_manager'


describe Tailor::Rulers::IndentationSpacesRuler::IndentationManager do
  let!(:spaces) { 5 }
  let!(:lexed_line) { double 'LexedLine' }

  before do
    Tailor::Logger.stub(:log)
    subject.instance_variable_set(:@spaces, spaces)
  end

  subject do
    Tailor::Rulers::IndentationSpacesRuler::IndentationManager.new spaces
  end

  describe '#should_be_at' do
    it 'returns @proper[:this_line]' do
      subject.instance_variable_set(:@proper, { this_line: 321 })
      subject.should_be_at.should == 321
    end
  end

  describe '#decrease_this_line' do
    let!(:spaces) { 27 }

    context '#started? is true' do
      before { subject.stub(:started?).and_return true }

      context '@proper[:this_line] gets decremented < 0' do
        it 'sets @proper[:this_line] to 0' do
          subject.instance_variable_set(:@proper, {
            this_line: 0, next_line: 0
          })

          subject.decrease_this_line
          proper_indentation = subject.instance_variable_get(:@proper)
          proper_indentation[:this_line].should == 0
        end
      end

      context '@proper[:this_line] NOT decremented < 0' do
        it 'decrements @proper[:this_line] by @spaces' do
          subject.instance_variable_set(:@proper, {
            this_line: 28, next_line: 28
          })
          subject.decrease_this_line

          proper_indentation = subject.instance_variable_get(:@proper)
          proper_indentation[:this_line].should == 1
        end
      end
    end

    context '#started? is false' do
      before { subject.stub(:started?).and_return false }

      it 'does not decrement @proper[:this_line]' do
        subject.instance_variable_set(:@proper, {
          this_line: 28, next_line: 28
        })
        subject.decrease_this_line

        proper_indentation = subject.instance_variable_get(:@proper)
        proper_indentation[:this_line].should == 28
      end
    end
  end

  describe '#transition_lines' do
    context '#started? is true' do
      before { subject.stub(:started?).and_return true }

      it 'sets @proper[:this_line] to @proper[:next_line]' do
        subject.instance_variable_set(:@proper, { next_line: 33 })

        expect { subject.transition_lines }.to change{subject.should_be_at}.
          from(subject.should_be_at).to(33)
      end
    end

    context '#started? is false' do
      before { subject.stub(:started?).and_return false }

      it 'sets @proper[:this_line] to @proper[:next_line]' do
        subject.instance_variable_set(:@proper, { next_line: 33 })
        expect { subject.transition_lines }.to_not change{subject.should_be_at}
      end
    end
  end

  describe '#start' do
    it 'sets @do_measurement to true' do
      subject.instance_variable_set(:@do_measurement, false)
      subject.start
      subject.instance_variable_get(:@do_measurement).should be_true
    end
  end

  describe '#stop' do
    it 'sets @do_measurement to false' do
      subject.instance_variable_set(:@do_measurement, true)
      subject.stop
      subject.instance_variable_get(:@do_measurement).should be_false
    end
  end

  describe '#started?' do
    context '@do_measurement is true' do
      before { subject.instance_variable_set(:@do_measurement, true) }
      specify { subject.started?.should be_true }
    end

    context '@do_measurement is false' do
      before { subject.instance_variable_set(:@do_measurement, false) }
      specify { subject.started?.should be_false }
    end
  end

  describe '#update_actual_indentation' do
    context 'lexed_line_output.end_of_multi_line_string? is true' do
      before do
        lexed_line.stub(:end_of_multi_line_string?).and_return true
      end

      it 'returns without updating @actual_indentation' do
        lexed_line.should_not_receive(:first_non_space_element)
        subject.update_actual_indentation(lexed_line)
      end
    end

    context 'lexed_line_output.end_of_multi_line_string? is false' do
      before do
        lexed_line.stub(:end_of_multi_line_string?).and_return false
        lexed_line.stub(:first_non_space_element).
          and_return first_non_space_element
      end

      context 'when indented' do
        let(:first_non_space_element) do
          [[1, 5], :on_comma, ',']
        end

        it 'returns the column value of that element' do
          subject.update_actual_indentation(lexed_line)
          subject.instance_variable_get(:@actual_indentation).should == 5
        end
      end

      context 'when not indented' do
        let(:first_non_space_element) do
          [[1, 0], :on_kw, 'class']
        end

        it 'returns the column value of that element' do
          subject.update_actual_indentation(lexed_line)
          subject.instance_variable_get(:@actual_indentation).should == 0
        end
      end
    end
  end

  describe '#line_ends_with_single_token_indenter?' do
    context 'lexed_line does not end with an op, comma, period, label, or kw' do
      before do
        lexed_line.stub(ends_with_op?: false)
        lexed_line.stub(ends_with_comma?: false)
        lexed_line.stub(ends_with_period?: false)
        lexed_line.stub(ends_with_label?: false)
        lexed_line.stub(ends_with_modifier_kw?: false)
      end

      specify do
        subject.line_ends_with_single_token_indenter?(lexed_line).
          should be_false
      end
    end

    context 'lexed_line ends with an op' do
      before do
        lexed_line.stub(ends_with_op?: true)
        lexed_line.stub(ends_with_comma?: false)
        lexed_line.stub(ends_with_period?: false)
        lexed_line.stub(ends_with_label?: false)
        lexed_line.stub(ends_with_modifier_kw?: false)
      end

      specify do
        subject.line_ends_with_single_token_indenter?(lexed_line).should be_true
      end
    end

    context 'lexed_line ends with a comma' do
      before do
        lexed_line.stub(ends_with_op?: false)
        lexed_line.stub(ends_with_comma?: true)
        lexed_line.stub(ends_with_period?: false)
        lexed_line.stub(ends_with_label?: false)
        lexed_line.stub(ends_with_modifier_kw?: false)
      end

      specify do
        subject.line_ends_with_single_token_indenter?(lexed_line).should be_true
      end
    end

    context 'lexed_line ends with a period' do
      before do
        lexed_line.stub(ends_with_op?: false)
        lexed_line.stub(ends_with_comma?: false)
        lexed_line.stub(ends_with_period?: true)
        lexed_line.stub(ends_with_label?: false)
        lexed_line.stub(ends_with_modifier_kw?: false)
      end

      specify do
        subject.line_ends_with_single_token_indenter?(lexed_line).should be_true
      end
    end

    context 'lexed_line ends with a label' do
      before do
        lexed_line.stub(ends_with_op?: false)
        lexed_line.stub(ends_with_comma?: false)
        lexed_line.stub(ends_with_period?: false)
        lexed_line.stub(ends_with_label?: true)
        lexed_line.stub(ends_with_modifier_kw?: false)
      end

      specify do
        subject.line_ends_with_single_token_indenter?(lexed_line).should be_true
      end
    end

    context 'lexed_line ends with a modified kw' do
      before do
        lexed_line.stub(ends_with_op?: false)
        lexed_line.stub(ends_with_comma?: false)
        lexed_line.stub(ends_with_period?: false)
        lexed_line.stub(ends_with_label?: false)
        lexed_line.stub(ends_with_modifier_kw?: true)
      end

      specify do
        subject.line_ends_with_single_token_indenter?(lexed_line).should be_true
      end
    end
  end

  describe '#line_ends_with_same_as_last' do
    context '@indent_reasons is empty' do
      before do
        subject.instance_variable_set(:@indent_reasons, [])
      end

      it 'returns false' do
        subject.line_ends_with_same_as_last([]).should be_false
      end
    end

    context '@indent_reasons.last[:token] != token_event.last' do
      let(:last_single_token) { [[1, 2], :on_comma, ','] }

      before do
        subject.instance_variable_set(:@indent_reasons,
          [{ event_type: :on_op }])
      end

      it 'returns false' do
        subject.line_ends_with_same_as_last(last_single_token).should be_false
      end
    end

    context '@indent_reasons.last[:token] == token_event.last' do
      let(:last_single_token) { [[1, 2], :on_comma, ','] }

      before do
        subject.instance_variable_set(:@indent_reasons,
          [{ event_type: :on_comma }])
      end

      it 'returns true' do
        subject.line_ends_with_same_as_last(last_single_token).should be_true
      end
    end
  end

  describe '#multi_line_parens?' do
    context 'an unclosed ( exists on the previous line' do
      context 'an unclosed ( does not exist on the current line' do
        before do
          d_tokens = [{ token: '(', lineno: 1 }]
          subject.instance_variable_set(:@indent_reasons, d_tokens)
        end

        it 'returns true' do
          subject.multi_line_parens?(2).should be_true
        end
      end

      context 'an unclosed ( exists on the current line' do
        before do
          d_tokens = [{ token: '(', lineno: 1 }, { token: '(', lineno: 2 }]
          subject.instance_variable_set(:@indent_reasons, d_tokens)
        end

        it 'returns true' do
          subject.multi_line_parens?(2).should be_false
        end
      end
    end

    context 'an unclosed ( does not exist on the previous line' do
      before do
        d_tokens = [{ token: '(', lineno: 1 }]
        subject.instance_variable_set(:@indent_reasons, d_tokens)
      end

      it 'returns true' do
        subject.multi_line_parens?(1).should be_false
      end
    end
  end

  describe '#last_opening_event' do
    context '@indent_reasons is empty' do
      before { subject.instance_variable_set(:@indent_reasons, []) }
      specify { subject.last_opening_event(nil).should be_nil }
    end

    context '@indent_reasons contains the corresponding opening event' do
      let(:indent_reasons) do
        [{ event_type: :on_lparen }, { event_type: :on_lbrace }]
      end

      before { subject.instance_variable_set(:@indent_reasons, indent_reasons) }

      context 'the corresponding opening event is last' do
        it 'returns the matching opening event' do
          subject.last_opening_event(:on_rbrace).should == indent_reasons.last
        end
      end

      context 'the corresponding opening event is not last' do
        it 'returns the matching opening event' do
          subject.last_opening_event(:on_rparen).should == indent_reasons.first
        end
      end
    end
  end

  describe '#remove_continuation_keywords' do
    before do
      subject.instance_variable_set(:@indent_reasons, indent_reasons)
    end

    context '@indent_reasons is empty' do
      let(:indent_reasons) do
        i = double '@indent_reasons'
        i.stub_chain(:last, :[]).and_return []
        i.stub(:empty?).and_return true

        i
      end

      specify { subject.remove_continuation_keywords.should be_nil }
    end

    context '@indent_reasons does not contain CONTINUATION_KEYWORDS' do
      let(:indent_reasons) do
        i = double '@indent_reasons'
        i.stub_chain(:last, :[]).and_return [{ token: 'if' }]
        i.stub(:empty?).and_return false

        i
      end

      it 'should not call #pop on @indent_reasons' do
        indent_reasons.should_not_receive(:pop)
        subject.remove_continuation_keywords
      end
    end

    context '@indent_reasons contains CONTINUATION_KEYWORDS' do
      let(:indent_reasons) do
        [{ token: 'if' }, { token: 'elsif' }]
      end

      it 'should call #pop on @indent_reasons one time' do
        subject.instance_variable_set(:@indent_reasons, indent_reasons)
        subject.remove_continuation_keywords
        subject.instance_variable_get(:@indent_reasons).should ==
          [{ token: 'if' }]
      end
    end
  end
end