redcar 0.3.10.1dev → 0.4

data/plugins/find-in-project/lib/find_in_project/views/_results.html.erb

@@ -0,0 +1,50 @@
+<% image_path = File.expand_path(File.join(@plugin_root, %w(lib find_in_project images))) %>
+<div id="results">
+  <table>
+    <% @results.each_with_index do |result, file_index| %>
+      <% filename, matches = result[0].gsub(/^\.\//, ''), result[1] %>
+      <tr>
+        <td class="file_heading" colspan="2">
+          <a class="expand_collapse" data-file_index="<%= file_index %>">
+            <img src="<%= image_path %>/expanded.png" />
+            <%= filename %>
+          </a>
+        </td>
+      </tr>
+      <% matches.each_with_index do |(line, text), line_index| %>
+        <% text = CGI.escapeHTML(text).gsub((@match_case ? /(#{@query})/ : /(#{@query})/i)) { "<span>#{$1}</span>" } %>
+        <% divider = (line == :divide) %>
+        <tr class="line_for_<%= file_index %> <%= (divider ? 'divider' : 'result') %> <%= (line_index % 2 == 0 ? 'even' : 'odd') %>" data-href='<%= filename %>' data-line_no='<%= line %>'>
+          <td class='line_no'><%= (divider ? '. . .' : line) %></td>
+          <td class='text'><pre><%= text %></pre></td>
+        </tr>
+      <% end %>
+      <tr><td class='break' colspan='2'></td></tr>
+    <% end %>
+  </table>
+</div>
+
+<script type="text/javascript">
+  $(document).ready(function() {
+    $('.result').click(function(ev) {
+      ev.preventDefault();
+      try {
+        Controller.openFile($(this).attr('data-href'), $(this).attr('data-line_no'), "<%= @query %>", <%= @match_case ? 'true' : 'false' %>);
+      } catch(e) {
+        alert(e.message);
+      }
+    });
+
+    $('.expand_collapse').click(function(ev) {
+      ev.preventDefault();
+      var file_index = $(this).attr('data-file_index');
+      if ($(".line_for_" + file_index).first().is(":visible")) {
+        $('img', this).attr('src', '<%= image_path %>/collapsed.png');
+        $(".line_for_" + file_index).hide();
+      } else {
+        $('img', this).attr('src', '<%= image_path %>/expanded.png');
+        $(".line_for_" + file_index).show();
+      }
+    });
+  });
+</script>

data/plugins/find-in-project/lib/find_in_project/views/index.html.erb

@@ -0,0 +1,120 @@
+<% jquery_path = File.expand_path(File.join(Redcar.root, %w(plugins html_view assets jquery-1.4.min.js))) %>
+<script type="text/javascript" src="file://<%= jquery_path %>"></script>
+
+<% plugin_css = File.expand_path(File.join(@plugin_root, %w(lib find_in_project stylesheets style.css))) %>
+<link rel="stylesheet" href="file://<%= plugin_css %>" type="text/css" media="screen">
+
+<% image_path = File.expand_path(File.join(@plugin_root, %w(lib find_in_project images))) %>
+
+<div id="search_container">
+  <form id="search_form">
+    <table>
+      <tr class="input">
+        <td class="label"><label for="query">Search Term</label></td>
+        <td class="field">
+          <input id="query" type="text" value="<%= @query %>" />
+          <div id="recent_queries" style="display: none;">
+            <ul>
+              <% (@settings['recent_queries'] || []).each do |query| %>
+                <li><%= query %></li>
+              <% end %>
+            </ul>
+          </div>
+        </td>
+        <td class="expand">
+          <a href="#" title="Toggle Recent Queries" id="toggle_recent_queries">&darr;</a>
+        </td>
+      </tr>
+      <tr class="input">
+        <td class="label"><label for="options">Options</label></td>
+        <td class="field">
+          <input id="options" type="text" value="<%= @options %>" />
+          <div id="recent_options" style="display: none;">
+            <ul>
+              <% (@settings['recent_options'] || []).each do |option| %>
+                <li><%= option %></li>
+              <% end %>
+            </ul>
+          </div>
+        </td>
+        <td class="expand">
+          <a href="#" title="Toggle Recent Options" id="toggle_recent_options">&darr;</a>
+        </td>
+      </tr>
+      <tr>
+        <td></td>
+        <td class="controls">
+          <input id="search" type="submit" value="Find In Project" />
+          <input type="checkbox" id="match_case" <%="checked=checked" if @match_case %>>
+          <label for="match_case">Match case</label>
+          <input type="checkbox" id="with_context" <%="checked=checked" if @with_context %>>
+          <label for="with_context">With context</label>
+        </td>
+        <td></td>
+      </tr>
+    </table>
+  </form>
+</div>
+
+<div id="results_container">
+  <div id="no_results">
+    Please provide a search term above.
+  </div>
+</div>
+
+<script type="text/javascript">
+  $(document).ready(function() {
+    $('#query').trigger('focus');
+
+    $('#search_form').submit(function(ev) {
+      ev.preventDefault();
+      try {
+        if ($("#match_case").attr('checked')) { var match_case = 'true'; } else { var match_case = 'false'; }
+        if ($("#with_context").attr('checked')) { var with_context = 'true'; } else { var with_context = 'false'; }
+        Controller.search($("#query").val(), $("#options").val(), match_case, with_context);
+      } catch(e) {
+        alert(e.message);
+      }
+    });
+
+    $('#query').keyup(function(ev) {
+      if ($(this).val() == '') {
+        $('input[type=submit]').attr('disabled', 'disabled');
+      } else {
+        $('input[type=submit]').attr('disabled', '');
+      }
+    });
+    $('#query').trigger('keyup');
+
+    $('#toggle_recent_queries').click(function(ev) {
+      ev.preventDefault();
+      if ($('#recent_queries').is(":visible")) {
+        $('#recent_queries').hide();
+      } else {
+        $('#recent_queries').show();
+      }
+    });
+
+    $('#recent_queries li').click(function(ev) {
+      ev.preventDefault();
+      $('#query').val($(this).html());
+      $('#query').trigger('keyup');
+      $('#recent_queries').hide();
+    });
+
+    $('#toggle_recent_options').click(function(ev) {
+      ev.preventDefault();
+      if ($('#recent_options').is(":visible")) {
+        $('#recent_options').hide();
+      } else {
+        $('#recent_options').show();
+      }
+    });
+
+    $('#recent_options li').click(function(ev) {
+      ev.preventDefault();
+      $('#options').val($(this).html());
+      $('#recent_options').hide();
+    });
+  });
+</script>

data/plugins/find-in-project/plugin.rb

@@ -0,0 +1,10 @@
+Plugin.define do
+  name    "find-in-project"
+  version "0.1.0"
+
+  object  "Redcar::FindInProject"
+  file    "lib", "find_in_project"
+
+  dependencies "core",      ">0",
+               "HTML View", ">=0.3.2"
+end

data/plugins/html_view/features/step_definitions/html_view_steps.rb

@@ -0,0 +1,20 @@
+require 'ruby-debug'
+
+Then /^the HTML tab (should say|says) "([^"]*)"$/ do |_, needle|
+  limit = 5
+  contents = nil
+  started = false
+  
+  thread = Thread.new do
+    started = true
+    start = Time.now
+    contents = get_browser_contents
+    while !contents.match(needle) && Time.now - start < limit
+      contents = get_browser_contents
+      sleep 0.1
+    end    
+  end
+
+  Redcar.gui.yield_until { started && !thread.alive? }
+  contents.should match needle
+end

data/plugins/html_view/lib/html_view.rb

@@ -33,12 +33,13 @@ module Redcar
       @controller.add_listener(:reload_index) { controller_action("index") }
 
       @controller.add_listener(:execute_script) do |script|
+        result = nil
         begin
           Redcar.update_gui do
             begin
               browser = @html_tab.controller.browser
               unless browser.is_disposed
-                browser.execute(script)
+                result = browser.evaluate(script)
               end
             rescue => e
               puts e.message
@@ -49,6 +50,7 @@ module Redcar
           puts e.message
           puts e.backtrace
         end
+        result
       end
     end
     

data/plugins/outline_view/lib/outline_view.rb

@@ -0,0 +1,64 @@
+require "outline_view/commands"
+
+module Redcar
+  class OutlineView
+    
+    def self.menus
+      Menu::Builder.build do
+        sub_menu "View" do
+          item "Current Document Outline", OutlineView::OpenOutlineViewCommand
+        end
+      end
+    end
+    
+    def self.keymaps
+      linwin = Keymap.build("main", [:linux, :windows]) do
+        link "Ctrl+I", OutlineView::OpenOutlineViewCommand
+      end
+      osx = Keymap.build("main", [:osx]) do
+        link "Cmd+I", OutlineView::OpenOutlineViewCommand
+      end
+      [linwin, osx]
+    end
+    
+    class OutlineViewDialog < FilterListDialog
+      include Redcar::Model
+      include Redcar::Observable
+      
+      attr_accessor :document
+      attr_accessor :last_list
+      
+      def initialize(document)
+        self.controller = Redcar::OutlineViewSWT.new(self)
+        @document = document
+        @last_list = {}
+      end
+      
+      def close
+        super
+      end
+      
+      def update_list(filter)
+        file = Declarations::File.new(@document.path)
+        file.add_tags_for_paths([@document.path])
+        re = make_regex(filter)
+        @last_list.clear
+        result = {}
+        file.tags.each do |name, _, match|
+          if name =~ re
+            @last_list[match] = name
+            result[match] = {:name => name, :kind => Declarations.match_kind(@document.path, match)}
+          end
+        end
+        result
+      end
+      
+      def selected(match, closing=true)
+        if @last_list
+          DocumentSearch::FindNextRegex.new(Regexp.new(Regexp.quote(match)), true).run
+          close if closing
+        end
+      end
+    end
+  end
+end

data/plugins/outline_view/lib/outline_view/commands.rb

@@ -0,0 +1,13 @@
+module Redcar
+  class OutlineView
+    class OpenOutlineViewCommand < Redcar::EditTabCommand
+      
+      def execute
+        cur_doc = Redcar.app.focussed_window.focussed_notebook_tab.document
+        if cur_doc
+          OutlineView::OutlineViewDialog.new(cur_doc).open
+        end
+      end
+    end
+  end
+end

data/plugins/outline_view/plugin.rb

@@ -0,0 +1,10 @@
+Plugin.define do
+  name    "outline_view"
+  version "0.1.0"
+  file    "lib", "outline_view"
+  object  "Redcar::OutlineView"
+  dependencies  "declarations", ">0",
+                "edit_view", ">0",
+                "document_search", ">0", 
+                "outline_view_swt", ">0"
+end

data/plugins/outline_view_swt/lib/outline_view_swt.rb

@@ -0,0 +1,81 @@
+module Redcar
+  class OutlineViewSWT < Redcar::ApplicationSWT::FilterListDialogController
+    include Redcar::Controller
+    
+    ICON_PATH = File.expand_path(File.dirname(__FILE__) + "/icons")
+    
+    ICONS = {
+      :method => File.join(ICON_PATH, "method.png"),
+      :class => File.join(ICON_PATH, "class.png"),
+      :attribute => File.join(ICON_PATH, "attribute.png"),
+      :alias => File.join(ICON_PATH, "alias.png"),
+      :assignment => File.join(ICON_PATH, "assignment.png"),
+      :interface => File.join(ICON_PATH, "interface.png"),
+      :none => nil
+    }
+    
+    class OutlineViewDialogSWT < Redcar::ApplicationSWT::FilterListDialogController::FilterListDialog
+      attr_reader :list, :text
+      attr_accessor :controller
+      
+      def createDialogArea(parent)
+        composite = Swt::Widgets::Composite.new(parent, Swt::SWT::NONE)
+        layout = Swt::Layout::RowLayout.new(Swt::SWT::VERTICAL)
+        composite.setLayout(layout)
+        @text = Swt::Widgets::Text.new(composite, Swt::SWT::SINGLE | Swt::SWT::LEFT | Swt::SWT::ICON_CANCEL)
+        @text.set_layout_data(Swt::Layout::RowData.new(400, 20))
+        @list = Swt::Widgets::Table.new(composite, Swt::SWT::V_SCROLL | Swt::SWT::H_SCROLL | Swt::SWT::MULTI)
+        @list.set_layout_data(Swt::Layout::RowData.new(400, 200))
+        controller.attach_listeners
+        controller.update_list_sync
+        get_shell.add_shell_listener(Redcar::ApplicationSWT::FilterListDialogController::ShellListener.new(controller))
+        Redcar::ApplicationSWT.register_shell(get_shell)
+        Redcar::ApplicationSWT.register_dialog(get_shell, self)
+        @list.set_selection(0)
+      end
+    end
+    
+    def initialize(model)
+      @model = model
+      @dialog = OutlineViewDialogSWT.new(Redcar.app.focussed_window.controller.shell)
+      @dialog.controller = self
+      if Redcar::ApplicationSWT::FilterListDialogController.test_mode?
+        @dialog.setBlockOnOpen(false)
+        @dialog.setShellStyle(Swt::SWT::DIALOG_TRIM)
+      end
+      attach_model_listeners
+      @associations = {}
+    end
+    
+    def update_list_sync
+      if @dialog
+        s = Time.now
+        hash = @model.update_list(@dialog.text.get_text)
+        populate_table(hash)
+        @dialog.list.set_selection(0)
+        text_focus
+      end
+    end
+    
+    def selected
+      @model.selected(@associations[@dialog.list.get_selection.first])
+    end
+    
+    private
+    
+    def populate_table(hash = {})
+      @dialog.list.removeAll; @associations.clear
+      hash.each do |match, props|
+        props = {:kind => :none, :name => ""}.merge(props)
+        item = Swt::Widgets::TableItem.new(@dialog.list, Swt::SWT::NONE)
+        @associations[item] = match
+        item.text = props[:name]
+        icon = ICONS[props[:kind].to_sym] if props[:kind]
+        if icon
+          image = Swt::Graphics::Image.new(ApplicationSWT.display, icon)
+          item.image = image
+        end
+      end
+    end
+  end
+end

data/plugins/outline_view_swt/plugin.rb

@@ -0,0 +1,7 @@
+Plugin.define do
+  name    "outline_view_swt"
+  version "0.1.0"
+  file    "lib", "outline_view_swt"
+  object  "Redcar::OutlineViewSWT"
+  dependencies "application_swt", ">0"
+end

data/plugins/pair_highlighter/lib/pair_highlighter.rb

@@ -0,0 +1,34 @@
+
+require 'pair_highlighter/document_controller'
+
+module Redcar
+  class PairHighlighter
+
+    def self.edit_view_gui_update(mate_text)
+      if @styledText != mate_text.get_text_widget
+        @styledText = mate_text.get_text_widget
+        @styledText.add_key_listener(KeyListener.new)
+        @styledText.addLineBackgroundListener(LineEventListener.new)
+	      @doc.mate_text = mate_text
+        @doc.styledText = @styledText
+      end
+    end
+    
+    def self.document_cursor_listener
+      @doc = DocumentController.new
+    end
+    
+    def self.theme_changed_update
+      @doc.set_highlight_colour
+    end
+    
+    class KeyListener
+      def key_pressed(_); end
+      def key_released(_); end
+    end  
+    
+    class LineEventListener
+      def lineGetBackground(_); end
+    end
+  end 
+end