require_relative 'test_helper'

describe 'Breakpoints' do
  include TestDsl

  describe 'setting breakpoint in the current file' do
    before { enter 'break 10' }
    subject { Byebug.breakpoints.first }

    def check_subject(field, value)
      debug_file('breakpoint1') { subject.send(field).must_equal value }
    end

    it('must have correct pos') { check_subject(:pos, 10) }
    it('must have correct source') {
      check_subject(:source, fullpath('breakpoint1')) }
    it('must have correct expression') { check_subject(:expr, nil) }
    it('must have correct hit count') { check_subject(:hit_count, 0) }
    it('must have correct hit value') { check_subject(:hit_value, 0) }
    it('must be enabled') { check_subject(:enabled?, true) }
    it('must return right response') do
      id = nil
      debug_file('breakpoint1') { id = subject.id }
      check_output_includes \
        "Created breakpoint #{id} at #{fullpath('breakpoint1')}:10"
    end
  end

  describe 'using shortcut for the command' do
    before { enter 'b 10' }
    it 'must set a breakpoint' do
      debug_file('breakpoint1') { Byebug.breakpoints.size.must_equal 1 }
    end
  end

  describe 'setting breakpoint to unexistent line' do
    before { enter 'break 100' }

    it 'must not create a breakpoint' do
      debug_file('breakpoint1') { Byebug.breakpoints.must_be_empty }
    end

    it 'must show an error' do
      debug_file('breakpoint1')
      check_output_includes \
        "There are only #{LineCache.size(fullpath('breakpoint1'))} lines in" \
        " file #{fullpath('breakpoint1')}", interface.error_queue
    end
  end


  describe 'setting breakpoint to incorrect line' do
    before { enter 'break 11' }

    it 'must not create a breakpoint' do
      debug_file('breakpoint1') { Byebug.breakpoints.must_be_empty }
    end

    it 'must show an error' do
      debug_file('breakpoint1')
      check_output_includes \
        "Line 11 is not a stopping point in file #{fullpath('breakpoint1')}",
        interface.error_queue
    end
  end

  describe 'stopping at breakpoint' do
    it 'must stop at the correct line' do
      enter 'break 14', 'cont'
      debug_file('breakpoint1') { state.line.must_equal 14 }
    end

    it 'must stop at the correct file' do
      enter 'break 14', 'cont'
      debug_file('breakpoint1') {
        state.file.must_equal fullpath('breakpoint1') }
    end

    describe 'show a message' do
      it 'must show a message with full filename' do
        enter 'break 14', 'cont'
        debug_file('breakpoint1') { @id = Byebug.breakpoints.first.id }
        check_output_includes \
          "Created breakpoint #{@id} at #{fullpath('breakpoint1')}:14"
      end

      it 'must show a message with basename' do
        enter 'set basename', 'break 14', 'cont'
        debug_file('breakpoint1') { @id = Byebug.breakpoints.first.id }
        check_output_includes "Created breakpoint #{@id} at breakpoint1.rb:14"
      end
    end
  end

  describe 'reloading source on change' do
    it 'must not reload source if autoreload is not set' do
      id = nil
      enter \
        'set noautoreload',
        ->{change_line_in_file(fullpath('breakpoint1'), 14, ''); 'break 14'},
        ->{change_line_in_file(fullpath('breakpoint1'), 14, 'c = a + b');
          'cont'}
      debug_file('breakpoint1') { id = Byebug.breakpoints.first.id }
      check_output_includes \
        "Created breakpoint #{id} at #{fullpath('breakpoint1')}:14"
    end

    it 'must reload source if autoreload is set' do
      enter \
        'set autoreload',
        ->{change_line_in_file(fullpath('breakpoint1'), 14, ''); 'break 14'},
        # Setting second breakpoint just to reload the source code after rolling
        # the file changes back
        ->{change_line_in_file(fullpath('breakpoint1'), 14, 'c = a + b');
          'break 15'},
        'cont'
      debug_file 'breakpoint1'
      check_output_includes \
        "Line 14 is not a stopping point in file #{fullpath('breakpoint1')}",
        interface.error_queue
    end
  end

  describe 'set breakpoint in a file' do
    describe 'successfully' do
      before { enter "break #{fullpath('breakpoint2')}:3", 'cont' }

      it 'must stop at the correct line' do
        debug_file('breakpoint1') { state.line.must_equal 3 }
      end

      it 'must stop at the correct file' do
        debug_file('breakpoint1') {
          state.file.must_equal fullpath('breakpoint2') }
      end
    end

    describe 'when setting breakpoint to unexisted file' do
      before do
        enter 'break asf:324'
        debug_file('breakpoint1')
      end
      it 'must show an error' do
        check_output_includes 'No source file named asf', interface.error_queue
      end

      it 'must ask about setting breakpoint anyway' do
        check_output_includes \
          'Set breakpoint anyway? (y/n)', interface.confirm_queue
      end
    end
  end

  describe 'set breakpoint to a method' do
    describe 'set breakpoint to an instance method' do
      before { enter 'break A#b', 'cont' }

      it 'must stop at the correct line' do
        debug_file('breakpoint1') { state.line.must_equal 5 }
      end

      it 'must stop at the correct file' do
        debug_file('breakpoint1') {
          state.file.must_equal fullpath('breakpoint1') }
      end
    end

    describe 'set breakpoint to a class method' do
      before { enter 'break A.a', 'cont' }

      it 'must stop at the correct line' do
        debug_file('breakpoint1') { state.line.must_equal 2 }
      end

      it 'must stop at the correct file' do
        debug_file('breakpoint1') {
          state.file.must_equal fullpath('breakpoint1') }
      end
    end

    describe 'set breakpoint to unexisted class' do
      it 'must show an error' do
        enter 'break B.a'
        debug_file('breakpoint1')
        check_output_includes 'Unknown class B.', interface.error_queue
      end
    end
  end

  describe 'set breakpoint to an invalid location' do
    before { enter 'break foo' }

    it 'must not create a breakpoint' do
      debug_file('breakpoint1') { Byebug.breakpoints.must_be_empty }
    end

    it 'must show an error' do
      debug_file('breakpoint1')
      check_output_includes \
        'Invalid breakpoint location: foo.', interface.error_queue
    end
  end

  describe 'disabling a breakpoint' do
    describe 'successfully' do
      before { enter 'break 14' }

      describe 'short syntax' do
        before { enter ->{"disable #{Byebug.breakpoints.first.id}"},
                       'break 15' }

        it 'must have a breakpoint with #enabled? returning false' do
          debug_file('breakpoint1') {
            Byebug.breakpoints.first.enabled?.must_equal false }
        end

        it 'must not stop on the disabled breakpoint' do
          enter 'cont'
          debug_file('breakpoint1') { state.line.must_equal 15 }
        end
      end

      describe 'full syntax' do
        before { enter ->{"disable breakpoints #{Byebug.breakpoints.first.id}"},
                       'break 15' }

        it 'must have a breakpoint with #enabled? returning false' do
          debug_file('breakpoint1') {
            Byebug.breakpoints.first.enabled?.must_equal false }
        end
      end
    end

    describe 'errors' do
      it 'must show an error if syntax is incorrect' do
        enter 'disable'
        debug_file('breakpoint1')
        check_output_includes \
          '"disable" must be followed by "display", "breakpoints" or ' \
          'breakpoint numbers.', interface.error_queue

      end

      it 'must show an error if no breakpoints is set' do
        enter 'disable 1'
        debug_file('breakpoint1')
        check_output_includes \
          'No breakpoints have been set.', interface.error_queue
      end

      it 'must show an error if not a number is provided as an argument to ' \
         ' "disable" command' do
        enter 'break 14', 'disable foo'
        debug_file('breakpoint1')
        check_output_includes \
          'Disable breakpoints argument "foo" needs to be a number.'
      end
    end
  end

  describe 'enabling a breakpoint' do

    describe 'successfully' do
      before { enter 'break 14' }

      describe 'short syntax' do
        before { enter ->{"enable #{Byebug.breakpoints.first.id}"}, 'break 15' }

        it 'must have a breakpoint with #enabled? returning true' do
          debug_file('breakpoint1') {
            Byebug.breakpoints.first.enabled?.must_equal true }
        end

        it 'must stop on the enabled breakpoint' do
          enter 'cont'
          debug_file('breakpoint1') { state.line.must_equal 14 }
        end
      end

      describe 'full syntax' do
        before { enter ->{"enable breakpoints #{Byebug.breakpoints.first.id}"},
                       'break 15' }

        it 'must have a breakpoint with #enabled? returning true' do
          debug_file('breakpoint1') {
            Byebug.breakpoints.first.enabled?.must_equal true }
        end
      end
    end

    describe 'errors' do
      it 'must show an error if syntax is incorrect' do
        enter 'enable'
        debug_file('breakpoint1')
        check_output_includes \
          '"enable" must be followed by "display", "breakpoints" or ' \
          'breakpoint numbers.', interface.error_queue
      end
    end
  end

  describe 'deleting a breakpoint' do
    before { enter 'break 14', ->{"delete #{Byebug.breakpoints.first.id}"},
                   'break 15' }

    it 'must have only one breakpoint' do
      debug_file('breakpoint1') { Byebug.breakpoints.size.must_equal 1 }
    end

    it 'must not stop on the disabled breakpoint' do
      enter 'cont'
      debug_file('breakpoint1') { state.line.must_equal 15 }
    end
  end

  describe 'Conditional breakpoints' do
    it 'must stop if the condition is true' do
      enter 'break 14 if b == 5', 'break 15', 'cont'
      debug_file('breakpoint1') { state.line.must_equal 14 }
    end

    it 'must skip if the condition is false' do
      enter 'break 14 if b == 3', 'break 15', 'cont'
      debug_file('breakpoint1') { state.line.must_equal 15 }
    end

    it 'must show an error when conditional syntax is wrong' do
      enter 'break 14 ifa b == 3', 'break 15', 'cont'
      debug_file('breakpoint1') { state.line.must_equal 15 }
      check_output_includes \
        'Expecting "if" in breakpoint condition; got: ifa b == 3.',
        interface.error_queue
    end

    describe 'enabling with wrong conditional syntax' do
      before { enter 'break 14',
                     ->{"disable #{Byebug.breakpoints.first.id}"},
                     ->{"cond #{Byebug.breakpoints.first.id} b -=( 3"},
                     ->{"enable #{Byebug.breakpoints.first.id}"} }

      it 'must not enable a breakpoint' do
        debug_file('breakpoint1') {
          Byebug.breakpoints.first.enabled?.must_equal false }
      end

      it 'must show an error' do
        debug_file('breakpoint1')
        check_output_includes \
          'Expression "b -=( 3" syntactically incorrect; breakpoint remains ' \
          'disabled.', interface.error_queue
      end
    end

    it 'must show an error if no file or line is specified' do
      enter 'break ifa b == 3', 'break 15', 'cont'
      debug_file('breakpoint1') { state.line.must_equal 15 }
      check_output_includes \
        'Invalid breakpoint location: ifa b == 3.', interface.error_queue
    end

    it 'must show an error if expression syntax is invalid' do
      enter 'break if b -=) 3', 'break 15', 'cont'
      debug_file('breakpoint1') { state.line.must_equal 15 }
      check_output_includes \
        'Expression "b -=) 3" syntactically incorrect; breakpoint disabled.',
        interface.error_queue
    end
  end

  describe 'Post Mortem' do
    it 'must be able to set breakpoints in post-mortem mode' do
      enter 'cont', 'break 12', 'cont'
      debug_file('post_mortem') { state.line.must_equal 12 }
    end
  end

end