require 'ripper'
require_relative '../../../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 "#next_should_be_at" do
    it "returns @proper[:next_line]" do
      subject.instance_variable_set(:@proper, { next_line: 123 })
      subject.next_should_be_at.should == 123
    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 "#increase_next_line" do
    context "#started? is true" do
      before { subject.stub(:started?).and_return true }

      it "increases @proper[:next_line] by @spaces" do
        expect { subject.increase_next_line }.to change{subject.next_should_be_at}.
          by(spaces)
      end
    end

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

      it "does not increases @proper[:next_line]" do
        expect { subject.increase_next_line }.to_not change{subject.next_should_be_at}.
          by(spaces)
      end
    end
  end

  describe "#decrease_next_line" do
    let!(:spaces) { 27 }

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

      it "decrements @proper[:next_line] by @spaces" do
        expect { subject.decrease_next_line }.to change{subject.next_should_be_at}.
          by(-spaces)
      end
    end

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

      it "decrements @proper[:next_line] by @spaces" do
        expect { subject.decrease_next_line }.to_not change{subject.next_should_be_at}.
          by(-spaces)
      end
    end
  end

  describe "#set_up_line_transition" do
    context "@amount_to_change_next > 0" do
      before { subject.instance_variable_set(:@amount_to_change_next, 1) }

      it "should call #increase_next_line" do
        subject.should_receive(:increase_next_line)
        subject.set_up_line_transition
      end
    end

    context "@amount_to_change_next < 0" do
      before { subject.instance_variable_set(:@amount_to_change_next, -1) }

      it "should call #increase_next_line" do
        subject.should_receive(:decrease_next_line)
        subject.set_up_line_transition
      end
    end

    context "@amount_to_change_this < 0" do
      before { subject.instance_variable_set(:@amount_to_change_this, -1) }

      it "should call #decrease_this_line" do
        subject.should_receive(:decrease_this_line)
        subject.set_up_line_transition
      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(subject.next_should_be_at)
      end
    end

    context "#started? is true" 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}.
          from(subject.should_be_at).to(subject.next_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 doesn't end with an op, comma, or period" do
      before do
        lexed_line.stub(ends_with_op?: false)
        lexed_line.stub(ends_with_comma?: false)
        lexed_line.stub(ends_with_period?: false)
      end

      specify { subject.line_ends_with_single_token_indenter?(lexed_line).should be_false }
    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)
      end

      specify { subject.line_ends_with_single_token_indenter?(lexed_line).should be_true }
    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)
      end

      specify { subject.line_ends_with_single_token_indenter?(lexed_line).should be_true }
    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)
      end

      specify { subject.line_ends_with_single_token_indenter?(lexed_line).should be_true }
    end
  end

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

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

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

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

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

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

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

      it "returns false" do
        subject.line_ends_with_same_as_last(last_single_token).should be_true
      end
    end
  end

  describe "#comma_is_part_of_enclosed_statement?" do
    context "lexed_line does not end with a comma" do
      before { lexed_line.stub(ends_with_comma?: false) }

      it "returns false" do
        subject.comma_is_part_of_enclosed_statement?(lexed_line, 1).
          should be_false
      end
    end

    context "lexed_line ends with a comma" do
      before { lexed_line.stub(ends_with_comma?: true) }

      context "continuing_enclosed_statement? is true" do
        before { subject.stub(continuing_enclosed_statement?: true) }

        it "returns true" do
          subject.comma_is_part_of_enclosed_statement?(lexed_line, 1).
            should be_true
        end
      end

      context "continuing_enclosed_statement? is true" do
        before { subject.stub(continuing_enclosed_statement?: false) }

        it "returns false" do
          subject.comma_is_part_of_enclosed_statement?(lexed_line, 1).
            should be_false
        end
      end
    end
  end

  describe "#keyword_and_single_token_line?" do
    context "no @double_tokens on this line" do
      before do
        d_tokens = [{ lineno: 12345 }]
        subject.instance_variable_set(:@double_tokens, d_tokens)
      end

      it "returns false" do
        subject.keyword_and_single_token_line?(1).should be_false
      end
    end

    context "@double_tokens exist on this line" do
      context "no kw tokens on this line" do
        before do
          d_tokens = [{ token: '{', lineno: 1 }]
          subject.instance_variable_set(:@double_tokens, d_tokens)
        end

        it "returns false" do
          subject.keyword_and_single_token_line?(1).should be_false
        end
      end

      context "kw tokens on this line" do
        before do
          d_tokens = [{ token: 'class', lineno: 1 }]
          subject.instance_variable_set(:@double_tokens, d_tokens)
        end

        context "no @single_tokens on this line" do
          it "returns false" do
            subject.keyword_and_single_token_line?(1).should be_false
          end
        end

        context "@single_tokens exist on this line" do
          before do
            s_tokens = [{ token: '[', lineno: 1 }]
            subject.instance_variable_set(:@single_tokens, s_tokens)
          end

          it "returns true" do
            subject.keyword_and_single_token_line?(1).should be_true
          end
        end
      end
    end
  end

  describe "#multi_line_braces?" do
    pending
  end

  describe "#multi_line_brackets?" do
    pending
  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(:@double_tokens, 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(:@double_tokens, 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(:@double_tokens, d_tokens)
      end

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

  describe "#in_tstring?" do
    pending
  end
end