redcar-dev 0.12.17dev

data/plugins/auto_pairer/lib/auto_pairer/pairs_for_scope.rb

@@ -0,0 +1,57 @@
+module Redcar
+  class AutoPairer
+    module PairsForScope
+      def self.autopair_rules
+        @autopair_rules ||= begin
+          rules = Hash.new {|h, k| h[k] = {}}
+          @autopair_default = nil
+          pair_settings = Textmate.settings(Textmate::SmartTypingPairsSetting)
+          pair_settings.each do |setting|
+            if setting.scope
+              rules[setting.scope] = Hash[*setting.pairs.flatten]
+            else
+              @autopair_default = Hash[*setting.pairs.flatten]
+            end
+          end
+          if @autopair_default
+            @autopair_default1 = @autopair_default.invert
+          end
+          rules.default = nil
+          rules
+        end
+      end
+      
+      def self.autopair_default
+        @autopair_default ||= begin
+          autopair_rules
+          @autopair_default
+        end
+      end
+
+      def self.cache
+        @cache ||= {}
+      end
+
+      def self.pairs_for_scope(current_scope)
+        cache[current_scope] ||= begin
+          rules = nil
+          if current_scope
+            matches = autopair_rules.map do |scope_name, value|
+              if match = JavaMateView::ScopeMatcher.get_match(scope_name, current_scope)
+                [scope_name, match, value]
+              end
+            end.compact
+            best_match = matches.sort do |a, b|
+              JavaMateView::ScopeMatcher.compare_match(current_scope, a[1], b[1])
+            end.last
+            if best_match
+              rules = best_match[2]
+            end
+          end
+          rules = autopair_default unless rules
+          rules
+        end
+      end
+    end
+  end
+end

data/plugins/auto_pairer/plugin.rb

@@ -0,0 +1,9 @@
+
+Plugin.define do
+  name    "auto_pairer"
+  version "1.0"
+  file    "lib", "auto_pairer"
+  object  "Redcar::AutoPairer"
+  dependencies "edit_view", ">0",
+               "textmate",  ">0"
+end

data/plugins/clipboard-viewer/lib/clipboard_viewer.rb

@@ -0,0 +1,50 @@
+
+require 'clipboard_viewer/clipboard_bar'
+require 'clipboard_viewer/browser_controller'
+
+module Redcar
+  class ClipboardViewer
+
+    def self.menus
+      Redcar::Menu::Builder.build do
+        sub_menu "Plugins" do
+          sub_menu "Clipboard" do
+            item "Clipboard Viewer Bar", :command => OpenClipboardBar    , :priority => 18
+            item "Clipboard Browser"   , :command => OpenClipboardBrowser, :priority => 18
+          end
+        end
+      end
+    end
+
+    def self.storage
+      @storage ||= begin
+         storage = Plugin::Storage.new('clipboard_viewer')
+         storage.set_default('chars_to_display', 50)
+         storage.set_default('lines_to_display', 3)
+         storage
+      end
+    end
+
+    class OpenClipboardBar < Redcar::Command
+      def execute
+        window = Redcar.app.focussed_window
+        speedbar = Redcar::ClipboardViewer::ClipboardBar.new
+        window.open_speedbar(speedbar)
+      end
+    end
+
+    class OpenClipboardBrowser < Redcar::Command
+
+      def initialize(list=Redcar.app.clipboard)
+        @list = list || []
+      end
+
+      def execute
+        controller = BrowserController.new(@list)
+        tab = win.new_tab(HtmlTab)
+        tab.html_view.controller = controller
+        tab.focus
+      end
+    end
+  end
+end

data/plugins/clipboard-viewer/lib/clipboard_viewer/browser_controller.rb

@@ -0,0 +1,27 @@
+
+module Redcar
+  class ClipboardViewer
+    class BrowserController
+      include HtmlController
+
+      def initialize(list)
+        @list = list.to_a.reverse
+      end
+
+      def title
+        "Clipboard History"
+      end
+
+      def copy(idx)
+        text = @list[idx]
+        Redcar.app.clipboard >> text if text
+        false
+      end
+
+      def index
+        rhtml = ERB.new(File.read(File.join(File.dirname(__FILE__), "..","..", "views", "clipboard.html.erb")))
+        rhtml.result(binding)
+      end
+    end
+  end
+end

data/plugins/clipboard-viewer/lib/clipboard_viewer/clipboard_bar.rb

@@ -0,0 +1,67 @@
+module Redcar
+  class ClipboardViewer
+    class ClipboardBar < Redcar::Speedbar
+      include Redcar::Observable
+
+      def initialize
+        @size = ClipboardViewer.storage['chars_to_display'].to_i
+        @line_limit = ClipboardViewer.storage['lines_to_display'].to_i
+        load_list
+        @listener = Redcar.app.clipboard.add_listener(:added) {|t|load_list}
+      end
+
+      def close
+        Redcar.app.clipboard.remove_listener(@listener)
+      end
+
+      def load_list
+        @list = Redcar.app.clipboard || []
+        values = display_values(@list)
+        if values.length > 0
+          clip_list.items = values
+          clip_list.value = values.first
+        else
+          clip_list.items = [" "*(@size+5)]
+          clip_list.value = clip_list.items.first
+        end
+      end
+
+      combo :clip_list
+      button :paste_selected, "Paste!", "Return" do
+        tab = Redcar.app.focussed_window.focussed_notebook_tab
+        content = @list.to_a.reverse.detect do |r|
+          l = r.to_s
+          val = clip_list.value.to_s
+          val = val[0,val.length-3] if val =~ /\.\.\.$/
+          l.length >= val.length and l[0,val.length].to_s == val.to_s
+        end
+        tab.edit_view.document.insert_at_cursor(content.to_s) if tab.is_a?(EditTab) and content
+        load_list
+      end
+
+      button :browse, "Browse", nil do
+        OpenClipboardBrowser.new(@list).run
+      end
+
+      def display_values(list)
+        display = list.to_a.reverse.map do |l|
+          value = ""
+          r=0
+          l.to_s.each_line do |line|
+            value << line  if r <= @line_limit - 1
+            value << "..." if r == @line_limit
+            r+=1
+            break if r > @line_limit - 1
+          end
+          value = value[0,value.length-1] if value =~ /\n$/
+          if value.length > @size
+            value[0,@size]+"..."
+          else
+            value
+          end
+        end
+        display || []
+      end
+    end
+  end
+end

data/plugins/clipboard-viewer/plugin.rb

@@ -0,0 +1,9 @@
+
+Plugin.define do
+  name    "clipboard_viewer"
+  version "1.0"
+  file    "lib", "clipboard_viewer"
+  object  "Redcar::ClipboardViewer"
+  dependencies "application",">0",
+               "redcar"     ,">0"
+end

data/plugins/clipboard-viewer/views/clipboard.html.erb

@@ -0,0 +1,19 @@
+
+<script type="text/javascript" src="file://<%= Redcar::HtmlView.jquery_path %>"></script>
+<% redcar_css = File.expand_path(File.join(Redcar.root, %w(plugins html_view views default.css))) %>
+<% watermark  = File.expand_path(File.join(Redcar.root, %w(plugins html_view views watermark-48.png))) %>
+<link rel="stylesheet" href="file://<%= redcar_css %>" type="text/css" media="screen">
+<div id="top">
+  <img src="file://<%=watermark%>" id="watermark"/>
+  <h1>Clipboard History</h1>
+</div>
+<div class="main" id="copies">
+  <table>
+    <thead><th>Recently Copied Text</th></thead>
+    <tbody>
+      <% @list.each_with_index do |item, i|%>
+        <tr><td class="copied-item" id="item_<%=i%>"><pre><%= item.join("").gsub("<", "&lt;").gsub(">", "&gt;") %></pre></td></td>
+      <% end %>
+    </tbody>
+  </table>
+</div>

data/plugins/clipboard-viewer/views/default.css

@@ -0,0 +1,43 @@
+body {
+  margin:0;
+}
+
+h1 {
+  background: #5f282d url("redcar_small_icon.png") no-repeat 10px 10px;
+  color: #dcb663;
+  height: 30px;
+  line-height: 30px;
+  padding: 10px 10px 10px 52px;
+  font-family: Palatino, Times, serif;
+  letter-spacing: 3px;
+  font-size: 100%;
+}
+
+.content {
+  margin: 10px;
+  font-size: 1.2em;
+}
+
+td.copied-item pre {
+  font-family: monospace;
+}
+
+.refresh {
+  padding: 5px;
+}
+
+.even {
+  background-color: #ddd;
+}
+
+table {
+  font-size: 80%;
+  border-collapse: collapse;
+  border: 1px solid #888;
+}
+
+td,th {
+  border-collapse: collapse;
+  border: 1px solid #888;
+  padding: 8px;
+}

data/plugins/comment/features/line_comment.feature

@@ -0,0 +1,249 @@
+Feature: Commenting lines by prefixing a comment string
+
+  Background:
+    When I open a new edit tab
+
+  Scenario: Commenting a single line
+    When I replace the contents with "A piece of code"
+    And I switch the language to "C"
+    And I move the cursor to 5
+    And I toggle comment lines
+    Then the contents should be "// A pie<c>ce of code"
+    When I toggle comment lines
+    Then the contents should be "A pie<c>ce of code"
+
+  Scenario: Uncommenting a single line
+    When I replace the contents with "# A piece of code"
+    And I switch the language to "Ruby"
+    And I move the cursor to 5
+    And I toggle comment lines
+    Then the contents should be "A p<c>iece of code"
+
+  Scenario: Commenting a single line among many
+    When I replace the contents with "foo\nbar\nbaz"
+    And I switch the language to "Ruby"
+    And I move the cursor to 4
+    And I toggle comment lines
+    Then the contents should be "foo\n<c># bar\nbaz"
+    When I toggle comment lines
+    Then the contents should be "foo\n<c>bar\nbaz"
+
+  Scenario: Uncommenting a single line that doesn't have the space
+    When I replace the contents with "#A piece of code"
+    And I switch the language to "Ruby"
+    And I move the cursor to 5
+    And I toggle comment lines
+    Then the contents should be "A piece of code"
+
+  Scenario: Commenting several lines
+    When I replace the contents with "Two pieces\nof code"
+    And I switch the language to "Ruby"
+    And I select from 0 to 13
+    And I toggle comment lines
+    Then the contents should be "<s># Two pieces\n# of<c> code"
+    When I toggle comment lines
+    Then the contents should be "<s>Two pieces\nof<c> code"
+
+  Scenario: Uncommenting several lines, not all of them have the space
+    When I replace the contents with "# Two pieces\n#of code"
+    And I switch the language to "Ruby"
+    And I select from 0 to 16
+    And I toggle comment lines
+    Then the contents should be "<s>Two pieces\nof<c> code"
+
+  Scenario: Commenting when not all the lines begin with the comment symbol
+    When I replace the contents with "# foo\n# bar\nbaz"
+    And I switch the language to "Ruby"
+    And I select from 0 to 15
+    And I toggle comment lines
+    Then the contents should be "<s># # foo\n# # bar\n# baz<c>"
+    When I toggle comment lines
+    Then the contents should be "# foo\n# bar\nbaz"
+
+  Scenario: Commenting when not all the lines begin with the comment symbol, reversed
+    When I replace the contents with "# foo\n# bar\nbaz"
+    And I switch the language to "Ruby"
+    And I select from 15 to 0
+    And I toggle comment lines
+    Then the contents should be "<c># # foo\n# # bar\n# baz<s>"
+    When I toggle comment lines
+    Then the contents should be "# foo\n# bar\nbaz"
+
+  Scenario: Commenting a single line with the cursor on the next line
+    When I replace the contents with "Two pieces\nof code"
+    And I switch the language to "Ruby"
+    And I select from 0 to 11
+    And I toggle comment lines
+    Then the contents should be "<s># Two pieces\n<c>of code"
+    When I toggle comment lines
+    Then the contents should be "<s>Two pieces\n<c>of code"
+
+  Scenario: Commenting a single line with the cursor on the next line, reversed
+    When I replace the contents with "Two pieces\nof code"
+    And I switch the language to "Ruby"
+    And I select from 11 to 0
+    And I toggle comment lines
+    Then the contents should be "<c># Two pieces\n<s>of code"
+    When I toggle comment lines
+    Then the contents should be "<c>Two pieces\n<s>of code"
+
+  Scenario: Commenting a single line with the cursor and selection point on the same line
+    When I replace the contents with "Two pieces\nof code"
+    And I switch the language to "Ruby"
+    And I select from 3 to 0
+    And I toggle comment lines
+    Then the contents should be "<c># Two<s> pieces\nof code"
+    When I toggle comment lines
+    Then the contents should be "<c>Two<s> pieces\nof code"
+
+  Scenario: Inserting a single space after comments when a line has no indentation
+    When I replace the contents with "A few\nlines\nof unindented\ncode"
+    And I switch the language to "Ruby"
+    And I select from 2 to 27
+    And I toggle comment lines
+    Then the contents should be "A <s># few\n# lines\n# of unindented\n# c<c>ode"
+    When I toggle comment lines
+    Then the contents should be "A <s>few\nlines\nof unindented\nc<c>ode"
+    
+  Scenario: Commenting an indented single line
+    When I replace the contents with "  A piece of code"
+    And I switch the language to "C"
+    And I toggle comment lines
+    Then the contents should be "  // A piece of code"
+    When I toggle comment lines
+    Then the contents should be "  A piece of code"
+
+  Scenario: Commenting several lines, not from the start of one of them
+    When I replace the contents with "Two pieces\nof code"
+    And I switch the language to "Ruby"
+    And I select from 2 to 13
+    And I toggle comment lines
+    Then the contents should be "Tw<s># o pieces\n# of<c> code"
+    When I toggle comment lines
+    Then the contents should be "Tw<s>o pieces\nof<c> code"
+
+  Scenario: Commenting several lines, not from the start of one of them, reversed
+    When I replace the contents with "Two pieces\nof code"
+    And I switch the language to "Ruby"
+    And I select from 13 to 2
+    And I toggle comment lines
+    Then the contents should be "Tw<c># o pieces\n# of<s> code"
+    When I toggle comment lines
+    Then the contents should be "Tw<c>o pieces\nof<s> code"
+
+  Scenario: Commenting several lines, not from the start of one of them
+    When I replace the contents with "    foo\n    bar"
+    And I switch the language to "Ruby"
+    And I select from 2 to 15
+    And I toggle comment lines
+    Then the contents should be "  <s>  # foo\n    # bar<c>"
+    When I toggle comment lines
+    Then the contents should be "  <s>  foo\n    bar<c>"
+
+  Scenario: Commenting several lines, with mismatched indentation, beginning in the start
+    When I replace the contents with "    def foo\n      dfo\n    sdfj\n  asdf\nasdf"
+    And I switch the language to "Ruby"
+    And I select from 0 to 40
+    And I toggle comment lines
+    Then the contents should be "<s>#     def foo\n#       dfo\n#     sdfj\n#   asdf\n# as<c>df"
+
+  Scenario: Commenting several indented lines, beginning before the text starts
+    Given the content is:
+				"""
+				  <s>    def foo
+				        dfo<c>
+				"""
+    And I switch the language to "Ruby"
+    And I toggle comment lines
+    Then the content should be:
+				"""
+				  <s>    # def foo
+				      #   dfo<c>
+				"""
+
+  Scenario: Commenting several indented lines, beginning before the text starts, reversed
+    Given the content is:
+				"""
+				  <c>    def foo
+				        dfo<s>
+				"""
+    And I switch the language to "Ruby"
+    And I toggle comment lines
+    Then the content should be:
+				"""
+				  <c>    # def foo
+				      #   dfo<s>
+				"""
+
+  Scenario: Commenting several indented lines, beginning where the text starts
+    Given the content is:
+				"""
+				      <s>def foo
+				        dfo<c>
+				"""
+    And I switch the language to "Ruby"
+    And I toggle comment lines
+    Then the content should be:
+				"""
+				      <s># def foo
+				      #   dfo<c>
+				"""
+    And I toggle comment lines
+    Then the content should be:
+				"""
+				      <s>def foo
+				        dfo<c>
+				"""
+
+  Scenario: Commenting several indented lines, with a whitespace only line in between
+    Given the content is:
+        """
+            <s>doc.compound do
+              all_lines_are_already_commented = true
+              start_line_comment_offset       = nil
+              insertion_column                = 1000
+              
+              <c>(start_line..end_line).each do |line|
+        """
+    And I switch the language to "Ruby"
+    And I toggle comment lines
+    Then the content should be:
+        """
+            <s># doc.compound do
+            #   all_lines_are_already_commented = true
+            #   start_line_comment_offset       = nil
+            #   insertion_column                = 1000
+            #   
+            #   <c>(start_line..end_line).each do |line|
+        """
+        
+  Scenario: Commenting several indented lines, with a blank line in between
+    Given the content is:
+        """
+            <s>doc.compound do
+              all_lines_are_already_commented = true
+              start_line_comment_offset       = nil
+              insertion_column                = 1000
+        
+              <c>(start_line..end_line).each do |line|
+        """
+    And I switch the language to "Ruby"
+    And I toggle comment lines
+    Then the content should be:
+        """
+            <s># doc.compound do
+            #   all_lines_are_already_commented = true
+            #   start_line_comment_offset       = nil
+            #   insertion_column                = 1000
+            # 
+            #   <c>(start_line..end_line).each do |line|
+        """
+        
+  # This is pretty damn marginal, and I'm tired...
+  #Scenario: Commenting several lines, with mismatched indentation, beginning in the middle
+  #  When I replace the contents with "    def foo\n      dfo\n    sdfj\n  asdf\nasdf"
+  #  And I switch the language to "Ruby"
+  #  And I select from 6 to 40
+  #  And I toggle comment lines
+  #  Then the contents should be "    de<s># f foo\n    #       dfo\n    #     sdfj\n    #  asdf\n    # as<c>df"
+