merrol 0.0.2

data/spec/controllers/file_controller_spec.rb

@@ -0,0 +1,209 @@
+require 'spec_helper'
+
+describe FileController do
+  before(:each) do
+    @mock_commands = mock Commands, :register => nil
+    @mock_main = mock Gtk::Window
+    @mock_image = mock Gtk::Image
+    @mock_list = mock Gtk::ListView, :selected_to_top => nil, :prepend => nil, :empty? => false, :hide => nil
+    @mock_theme = mock Gtk::SourceStyleScheme
+    @mock_edit = mock(Gtk::SourceView, :theme => @mock_theme, :highlight_brackets => true)
+    @mock_views = {
+      :main => @mock_main,
+      :edit => @mock_edit,
+      :file_status => @mock_image,
+      :file_list => @mock_list
+    }
+    @mock_source_model = mock_source_model
+    SourceModel.stub!(:new).and_return @mock_source_model
+    @mock_main.stub :signal_handler_disconnect
+    @mock_edit.stub :scroll_to_cursor
+    @mock_edit.stub!(:buffer=)
+  end
+
+  class Gdk::EventKey
+    def inspect
+      modifiers = (state.control_mask? ? 1 : 0) |
+        (state.mod1_mask? ? 2 : 0) |
+        (state.shift_mask? ? 4 : 0)
+      "#<Gdk::EventKey #{event_type.name} with state: #{modifiers}, keyval: #{keyval}, keycode: #{hardware_keycode}>"
+    end
+
+    def == other
+      inspect == other.inspect
+    end
+  end
+
+  def mock_source_model
+    mock SourceModel, :style_scheme= => nil, :highlight_matching_brackets= => nil, :modified= => nil, :signal_connect => nil, :start_iter => nil, :place_cursor => nil
+  end
+
+  describe '#load_all' do
+    it 'creates the source models' do
+      SourceModel.should_receive(:new).with('path1').and_return @mock_source_model
+      SourceModel.should_receive(:new).with('path2').and_return @mock_source_model
+      @mock_edit.should_receive(:buffer=).once.with @mock_source_model
+      @mock_source_model.should_receive(:modified=).with false
+      @mock_source_model.should_receive(:style_scheme=).with @mock_theme
+      @mock_source_model.should_receive(:highlight_matching_brackets=).with true
+
+      file = FileController.new @mock_commands, @mock_views
+      file.load_all ['path1', 'path2']
+    end
+  end
+
+  describe '#load' do
+    it 'adds name to file list' do
+      @mock_list.should_receive(:prepend).with 'path'
+      file = FileController.new @mock_commands, @mock_views
+      file.load 'path'
+    end
+
+    it 'positions cursor at start of file' do
+      mock_iter = mock Gtk::TextIter
+      @mock_source_model.should_receive(:start_iter).and_return mock_iter
+      @mock_source_model.should_receive(:place_cursor).with mock_iter
+      file = FileController.new @mock_commands, @mock_views
+      file.load 'path'
+    end
+  end
+
+  it 'requests source model to save' do
+    @mock_edit.stub(:buffer).and_return @mock_source_model
+    @mock_source_model.should_receive :save
+
+    file = FileController.new @mock_commands, @mock_views
+    file.save
+  end
+
+  it 'indicate when source model has been modified' do
+    @mock_source_model.stub(:modified?).and_return true
+    @mock_source_model.should_receive(:signal_connect).with('modified_changed').and_yield
+    @mock_image.should_receive(:file=).with /modified.svg/
+
+    file = FileController.new @mock_commands, @mock_views
+    file.load_all ['path']
+  end
+
+  it 'indicate when source model is not modified' do
+    @mock_source_model.stub(:modified?).and_return false
+    @mock_source_model.should_receive(:signal_connect).with('modified_changed').and_yield
+    @mock_image.should_receive(:file=).with /saved.svg/
+
+    file = FileController.new @mock_commands, @mock_views
+    file.load_all ['path']
+  end
+
+  describe '#switch' do
+    before(:each) do
+      @mock_list.stub :show
+      @mock_list.stub :next
+      @mock_list.stub(:selected).and_return 'path1'
+
+      @mock_edit.stub :switch
+    end
+
+    context 'when shortcut pressed' do
+      before(:each) do
+        @mock_main.stub :signal_connect
+        @next_mock_source_model = mock_source_model
+        @file = FileController.new @mock_commands, @mock_views
+        @file.stub :id=
+      end
+
+      context 'when list has two items' do
+        before(:each) do
+          SourceModel.stub(:new).with('path1').and_return @mock_source_model
+          SourceModel.stub(:new).with('path2').and_return @next_mock_source_model
+          @file.load_all ['path1', 'path2']
+        end
+
+        context 'when shortcut pressed, released and pressed' do
+          it 'does not display file_list' do
+            @mock_list.should_not_receive :show
+            event = Shortcut.to_event('CTRL', :release)
+            @mock_main.stub(:signal_connect).with('key_release_event').and_yield(nil, event)
+            @file.switch
+            @file.switch
+          end
+        end
+
+        context 'when shortcut pressed the second time' do
+          it 'displays file_list' do
+            @mock_list.should_receive :show
+            @file.switch
+            @file.switch
+          end
+
+          it 'highlight second file in the list' do
+            @mock_list.should_receive(:next)
+            @mock_list.should_receive(:selected).and_return 'path2'
+            @mock_edit.should_receive(:buffer=).with(@next_mock_source_model)
+            @file.switch
+            @file.switch
+          end
+        end
+      end
+
+      context 'when list is empty' do
+        it 'list is not shown and nothing happens' do
+          @mock_list.stub(:empty?).and_return true
+          @mock_list.should_not_receive :show
+          @file.switch
+        end
+      end
+    end
+
+    context 'when releasing TAB' do
+      it 'does nothing' do
+        event = Shortcut.to_event('TAB', :release)
+        file = FileController.new @mock_commands, @mock_views
+        @mock_main.stub(:signal_connect).and_yield nil, event
+        @mock_list.should_not_receive :hide
+        @mock_main.should_not_receive :signal_handler_disconnect
+        file.switch
+      end
+    end
+
+    context 'when releasing modifier' do
+      before(:each) do
+        @mock_edit.stub(:scroll_to_cursor)
+        @event = Shortcut.to_event("CTRL", :release)
+        @mock_list.stub :hide
+      end
+
+      it 'moves selected file to the top of the list' do
+        file = FileController.new @mock_commands, @mock_views
+        @mock_main.stub(:signal_connect).and_yield nil, @event
+        @mock_list.should_receive :selected_to_top
+        file.switch
+      end
+
+      it 'hides file_list' do
+        @mock_list.should_receive :hide
+
+        @mock_main.stub!(:signal_connect).with('key_release_event').and_yield(nil, @event).and_return 1
+        file = FileController.new @mock_commands, @mock_views
+        file.should_receive(:handler_id=).with(1)
+        file.should_receive(:handler_id).and_return 1
+        file.switch
+      end
+
+      it 'handler_id from key release event is used to disconnect handler' do
+        @mock_main.should_receive(:signal_connect).with('key_release_event').and_return(1)
+        file = FileController.new @mock_commands, @mock_views
+        file.switch
+        file.send(:handler_id).should == 1
+      end
+
+      it 'disconnect handler is called with the correct handler id' do
+        @mock_main.stub!(:signal_connect).with('key_release_event').and_yield(nil, @event)
+        @mock_main.should_receive(:signal_handler_disconnect).with 1
+        file = FileController.new @mock_commands, @mock_views
+        file.send(:handler_id=, 1)
+        file.switch
+      end
+    end
+  end
+end
+

data/spec/controllers/main_controller_spec.rb

@@ -0,0 +1,20 @@
+require 'spec_helper'
+
+describe MainController do
+  it 'sets the title' do
+    mock_commands = mock Commands, :register => nil
+    mock_view = mock Gtk::Window, :signal_connect => nil
+    mock_view.should_receive(:title=).with('project (working/dir)')
+    main = MainController.new mock_commands, {:main => mock_view}
+    main.working_dir = 'working/dir/project'
+  end
+
+  it 'quit destroys window' do
+    mock_commands = mock Commands, :register => nil
+    mock_view = mock Gtk::Window, :signal_connect => nil
+    mock_view.should_receive :destroy
+    main = MainController.new mock_commands, {:main => mock_view}
+    main.quit
+  end
+end
+

data/spec/gtk/bin_spec.rb

@@ -0,0 +1,13 @@
+require 'spec_helper'
+
+describe Gtk::Bin do
+  it 'adds the container to the widget' do
+    widget = Gtk::Window.new
+
+    mock_vbox = mock Gtk::VBox
+    Gtk::VBox.stub!(:new).and_return mock_vbox
+    widget.should_receive(:add).with(mock_vbox)
+    widget.container = 'VBox'
+  end
+end
+

data/spec/gtk/list_view_spec.rb

@@ -0,0 +1,114 @@
+require 'spec_helper'
+
+describe Gtk::ListView do
+  before(:each) do
+    @list_view = Gtk::ListView.new
+    @mock_iter = mock Gtk::TreeIter
+    @mock_selection = mock Gtk::TreeSelection, :selected => nil, :select_iter => nil
+    @mock_list_store = mock Gtk::ListStore, :append => nil, :set_value => nil, :prepend => @mock_iter
+    @mock_list_store.stub(:iter_first).and_return @mock_iter
+    @list_view.stub(:selection).and_return @mock_selection
+    @list_view.stub(:model).and_return @mock_list_store
+  end
+
+  it 'headers are not visible' do
+    @list_view.should_not be_headers_visible
+  end
+
+  it 'has one column' do
+    @list_view.columns.size.should == 1
+  end
+
+  describe '#prepend' do
+    it 'adds row to the start of the list' do
+      @mock_list_store.should_receive :prepend
+      @mock_list_store.should_receive(:set_value).with(@mock_iter, 0, 'Item 1')
+      @list_view.prepend 'Item 1'
+    end
+
+    it 'selects item' do
+      @mock_selection.should_receive(:select_iter).with @mock_iter
+      @list_view.prepend 'Item 1'
+    end
+  end
+
+  describe '#list=' do
+    before(:each) do
+      @list_view.stub!(:model=)
+      @list_view.stub!(:model).and_return @mock_list_store
+      Gtk::ListStore.stub!(:new).and_return @mock_list_store
+    end
+
+    it 'insert a number of rows' do
+      @mock_list_store.should_receive(:append).twice.and_return @mock_iter
+      @mock_list_store.should_receive(:set_value).with(@mock_iter, 0, 'Item 1')
+      @mock_list_store.should_receive(:set_value).with(@mock_iter, 0, 'Item 2')
+      @list_view.list = ['Item 1', 'Item 2']
+    end
+
+    it 'selects first row' do
+      @mock_selection.should_receive(:select_iter).with @mock_iter
+      @list_view.list = ['Item 1']
+    end
+
+    it 'does not select first row if none set' do
+      @list_view.should_not_receive(:selection)
+      @list_view.list = []
+    end
+  end
+
+  describe '#next' do
+    it 'selects the next row' do
+      mock_selection = mock Gtk::TreeSelection, :selected => @mock_iter
+      @mock_iter.should_receive :next!
+      mock_selection.should_receive(:select_iter).with @mock_iter
+      @list_view.stub(:selection).and_return mock_selection
+      @list_view.next
+    end
+
+    context 'when no row selected' do
+      it 'what should happen?'
+    end
+  end
+
+  describe '#selected' do
+    before(:each) do
+    end
+
+    it 'retrieves the text of the selected row' do
+      @list_view.stub(:selection).and_return @mock_selection
+      @mock_selection.stub(:selected).and_return @mock_iter
+      @mock_iter.stub(:[]).with(0).and_return 'selected row'
+      @list_view.selected.should == 'selected row'
+    end
+
+    it 'does not fail when nothing selected' do
+      @list_view.stub(:selection).and_return @mock_selection
+      @list_view.selected.should be_nil
+    end
+  end
+
+  describe '#selected_to_top' do
+    it 'moves the selected row to the top of the list' do
+      @list_view.stub(:selection).and_return @mock_selection
+      selected_mock_iter = mock Gtk::TreeIter
+      @mock_selection.stub(:selected).and_return selected_mock_iter
+      @list_view.stub(:model).and_return @mock_list_store
+      @mock_list_store.should_receive(:move_before).with(selected_mock_iter, @mock_iter)
+      @list_view.selected_to_top
+    end
+  end
+
+  describe '#empty?' do
+    it 'empty when no rows' do
+      @mock_list_store.stub(:iter_first).and_return nil
+      @list_view.should be_empty
+    end
+
+    it 'not empty when at least one row' do
+      @mock_list_store.stub(:iter_first).and_return @mock_iter
+      @list_view.should_not be_empty
+    end
+  end
+end
+

data/spec/gtk/source_view_spec.rb

@@ -0,0 +1,41 @@
+require 'spec_helper'
+
+describe Gtk::SourceView do
+  before(:each) do
+    @view = Gtk::SourceView.new
+  end
+
+  it 'sets font' do
+    mock_font = mock Pango::FontDescription
+    Pango::FontDescription.should_receive(:new).with('a font').and_return mock_font
+    @view.should_receive(:modify_font).with mock_font
+    @view.font = 'a font'
+  end
+
+  it 'sets theme' do
+    mock_scheme = mock(Gtk::SourceStyleScheme)
+    mock_style_manager = mock(Gtk::SourceStyleSchemeManager)
+    Gtk::SourceStyleSchemeManager.stub(:new).and_return mock_style_manager
+    mock_style_manager.should_receive(:prepend_search_path).with /path\/to/
+    mock_style_manager.should_receive(:get_scheme).with('theme').and_return mock_scheme
+    @view.stub :buffer
+    @view.theme = 'path/to/theme'
+    @view.theme.should == mock_scheme
+  end
+
+  it 'sets highlight_brackets' do
+    @view.highlight_matching_brackets = true
+    @view.highlight_brackets.should be_true
+  end
+
+  describe '#scroll_to_cursor' do
+    it 'moves visible area to cursor' do
+      mock_mark = Gtk::SourceMark
+      mock_buffer = mock Gtk::SourceBuffer, :selection_bound => mock_mark
+      @view.stub(:buffer).and_return mock_buffer
+      @view.should_receive(:scroll_mark_onscreen).with(mock_mark)
+      @view.scroll_to_cursor
+    end
+  end
+end
+

data/spec/gtk/widget_spec.rb

@@ -0,0 +1,37 @@
+require 'spec_helper'
+
+describe Gtk::Widget do
+  it 'sets the font' do
+    mock_font = mock Pango::FontDescription
+    Pango::FontDescription.stub!(:new).with('font').and_return mock_font
+
+    window = Gtk::Window.new
+    window.should_receive(:modify_font).with mock_font
+    window.font = 'font'
+  end
+
+  describe 'initially_hidden' do
+    before(:each) do
+      @window = Gtk::Window.new
+    end
+
+    it 'ignores first show call when initially hidden' do
+      @window.initially_hidden = true
+      @window.show_all
+      @window.should_not be_visible
+    end
+
+    it 'shows when not initially hidden' do
+      @window.show_all
+      @window.should be_visible
+    end
+
+    it 'is made visible on subsequent calls to show' do
+      @window.initially_hidden = true
+      @window.show
+      @window.should be_visible
+    end
+  end
+
+end
+

data/spec/gtk/window_spec.rb

@@ -0,0 +1,28 @@
+require 'spec_helper'
+
+describe Gtk::Window do
+  subject {Gtk::Window.new}
+
+  describe '#icon' do
+    it 'is assigned' do
+      subject.should_receive(:set_icon).with(/path/)
+      subject.icon = 'path'
+    end
+  end
+
+  describe '#default_position=' do
+    it 'is assigned' do
+      subject.should_receive(:move).with(1, 2)
+      subject.default_position = '1, 2'
+    end
+  end
+
+  describe '#default_size=' do
+    it 'is assigned' do
+      subject.should_receive(:set_default_size).with(1, 2)
+      subject.default_size = '1, 2'
+    end
+  end
+
+end
+

data/spec/integration/000_startup_spec.rb

@@ -0,0 +1,14 @@
+require 'integration_helper'
+
+describe 'Startup' do
+  it 'sets the working dir' do
+    $application.views[:main].title.should =~ /merrol \(\/home\/.*\)/
+  end
+
+  context 'when CTRL+Q pressed' do
+    it 'quits' do
+      quits_by_pressing 'CTRL+Q'
+    end
+  end
+end
+

data/spec/integration/001_load_from_commandline_spec.rb

@@ -0,0 +1,25 @@
+require 'integration_helper'
+
+describe 'Editor' do
+  before(:each) do
+    @the_contents = 'Some prewritten text. '
+    create_file 'the_file', :containing => @the_contents
+  end
+
+  after(:each) do
+    destroy_file 'the_file'
+  end
+
+  it 'loads a file from the commandline' do
+    application = Application.new '', ['the_file']
+    loads @the_contents, :into => :edit, :test_against => application
+    displays 'the_file', :in => :file_path, :test_against => application
+    displays 'saved.svg', :in => :file_status, :test_against => application
+  end
+
+  it 'does not fail when no files specified on commandline' do
+    application = Application.new '', []
+    displays '', :in => :edit, :test_against => application
+  end
+end
+

data/spec/integration/002_loading_and_saving_spec.rb

@@ -0,0 +1,35 @@
+require 'integration_helper'
+
+describe 'Loading and saving' do
+  before(:each) do
+    @the_contents = 'Some prewritten text. '
+    create_file 'the_file', :containing => @the_contents
+  end
+
+  after(:each) do
+    destroy_file 'the_file'
+  end
+
+  it 'can load and save a file' do
+    pending
+    pressing 'CTRL+O'
+    shows 'open'
+
+    entering 'the_file', :into => 'open.search_field'
+    displays 'the_file', :in => 'open.results'
+
+    pressing 'ENTER'
+    loads @the_contents, :into => :edit
+
+    entering 'some text', :into => :edit
+    displays 'some text', :in => :edit
+
+    pressing 'CTRL+S'
+    saves @the_contents + 'some text', :in => 'the_file'
+
+    pressing 'CTRL+W'
+    closes the file
+    saves @the_contents + 'some text', :in => 'the_file'
+  end
+end
+

data/spec/integration/003_tab_file_switching_spec.rb

@@ -0,0 +1,49 @@
+require 'integration_helper'
+
+describe 'CTRL+TAB file switching' do
+  before(:each) do
+    create_file 'a_file', :containing => some_text_in('a_file')
+    create_file 'another_file', :containing => some_text_in('another_file')
+    create_file 'a_third_file', :containing => some_text_in('a_third_file')
+  end
+
+  after(:each) do
+    destroy_file 'a_file'
+    destroy_file 'another_file'
+    destroy_file 'a_third_file'
+  end
+
+  it 'switches to third file after loading' do
+    pressing 'CTRL+TAB'
+    does_not_show :file_list
+
+    load_file 'a_file'
+    load_file 'another_file'
+    load_file 'a_third_file'
+    displays some_text_from('a_third_file'), :in => :edit
+
+    pressing 'CTRL+TAB'
+    does_not_show :file_list
+    displays some_text_from('another_file'), :in => :edit
+
+    releasing 'CTRL'
+    pressing 'CTRL+TAB'
+    does_not_show :file_list
+    displays some_text_from('a_third_file'), :in => :edit
+
+    pressing 'CTRL+TAB'
+    shows :file_list
+    highlights 'a_file', :in => :file_list
+    displays ['another_file', 'a_third_file', 'a_file'], :in => :file_list
+
+    releasing 'CTRL'
+    hides :file_list
+    displays some_text_from('a_file'), :in => :edit
+
+    pressing 'CTRL+TAB'
+    does_not_show :file_list
+    releasing 'CTRL'
+  end
+
+end
+

data/spec/integration/ideas_spec.rb

@@ -0,0 +1,23 @@
+require 'integration_helper'
+
+describe 'ideas' do
+  describe 'gedit does not' do
+    it 'move past quotes or brackets when TAB pressed'
+    it 'support nested quotes and brackets'
+    it 'ignore TAB completion when already in TAB completion'
+    it 'complete words sometimes'
+    it 'paste at current cursor location'
+  end
+
+  it 'splits screen and switches to it when ALT+RIGHT pressed'
+  it 'switches to existing split screen when ALT+RIGHT pressed'
+  it 'shortcut of the day in status bar'
+  it 'options to turn off shortcut of the day'
+  it 'Adding a new file automatically adds spec/test file'
+  it 'opening a previously opened directory reloads the previously open files'
+
+  describe 'snippets' do
+    it 'handle multi-choice parameters by TABing through and pressing ENTER on the desired option'
+  end
+end
+

data/spec/integration_helper.rb

@@ -0,0 +1,11 @@
+require 'spec_helper'
+require 'support/setup'
+require 'support/actions'
+require 'support/expectations'
+
+Rspec.configure do |c|
+  c.before(:all) do
+    $application = Application.new WORKING_DIR, [] unless $application
+  end
+end
+

data/spec/lib/application_spec.rb

@@ -0,0 +1,57 @@
+require 'spec_helper'
+
+describe Application do
+  before(:each) do
+    @mock_window = mock Gtk::Window, :show_all => nil
+    @mock_file_list = mock Gtk::ListView, :list= => nil
+    @mock_file_path = mock Gtk::Label, :text= => nil
+    @mock_edit = mock Gtk::SourceView, :grab_focus => nil
+    @mock_commands = mock Commands
+    @mock_main = mock MainController, :working_dir= => nil
+    @mock_file = mock FileController, :load_all => nil
+
+    @widgets = {:main => @mock_window, :file_list => @mock_file_list, :file_path => @mock_file_path, :edit => @mock_edit}
+    WidgetBuilder.stub(:build).and_return(@widgets)
+    Commands.stub(:new).and_return @mock_commands
+    Dir.stub(:[]).and_return %w(main_controller.rb file_controller.rb)
+    MainController.stub(:new).and_return @mock_main
+    FileController.stub(:new).and_return @mock_file
+  end
+
+  it 'builds widgets' do
+    WidgetBuilder.should_receive :build
+    Application.new nil, []
+  end
+
+  it 'creates controllers' do
+    MainController.should_receive :new
+    FileController.should_receive :new
+    Application.new nil, []
+  end
+
+  it 'sets working dir' do
+    @mock_main.should_receive(:working_dir=).with 'working dir'
+    Application.new 'working dir', []
+  end
+
+  it 'loads files' do
+    @mock_file.should_receive(:load_all).with ['paths']
+    Application.new nil, ['paths']
+  end
+
+  it 'sets file path' do
+    @mock_file_path.should_receive(:text=).with 'path'
+    Application.new nil, ['path']
+  end
+
+  it 'focuses source view' do
+    @mock_edit.should_receive(:grab_focus)
+    Application.new nil, []
+  end
+
+  it 'shows main window' do
+    @mock_window.should_receive(:show_all)
+    Application.new nil, []
+  end
+end
+