redcar 0.3.10.1dev → 0.4

data/plugins/textmate/lib/textmate/bundle.rb

@@ -2,8 +2,9 @@
 module Redcar
   module Textmate
     class Bundle
+      include Redcar::Observable
       attr_reader :path, :snippets, :preferences
-    
+
       def initialize(path)
         @path = File.expand_path(path)
         info_path = File.join(path, "info.plist")
@@ -13,45 +14,44 @@ module Redcar
         @snippets = snippet_paths.map {|path| Snippet.new(path, self.name) }
         @preferences = preference_paths.map {|path| Preference.new(path) }
       end
-      
+
       def name
         @plist["name"]
       end
-      
+
       def uuid
         @plist["uuid"]
       end
-      
+
       def ordering
         @plist["ordering"]
       end
-      
+
       def contact_name
         @plist["contactName"]
       end
-      
+
       def contact_email
         @plist["contactEmailRot13"]
       end
-      
+
       def description
         @plist["description"]
       end
-      
+
       def deleted
         @plist["deleted"]
       end
-      
+
       def main_menu
         @plist["mainMenu"]
       end
-      
+
       def sub_menus
         main_menu["submenus"]
       end
-      
+
       def build_menu(builder)
-        snippets
         if main_menu and main_menu["items"]
           builder.sub_menu name do |m|
             main_menu["items"].each do |item|
@@ -60,37 +60,41 @@ module Redcar
           end
         end
       end
-      
+
       def build_menu_from_item(builder, item)
-        if item =~ /^$/
+        if item =~ /^$/ #is a separator
           builder.separator
-        elsif snippet = Textmate.uuid_hash[item] and snippet.is_a?(Textmate::Snippet)
-          return unless snippet.name and snippet.name != ""
-          builder.item(snippet.to_menu_string) do
-            doc = EditView.focussed_edit_view_document
-            if doc
-              controller = doc.controllers(Snippets::DocumentController).first
-              controller.start_snippet!(snippet)
-            end
-          end
-        elsif sub_menu = sub_menus[item]
+        elsif sub_menus[item] #is a submenu
+          sub_menu = sub_menus[item]
           builder.sub_menu(sub_menu["name"]) do |sub_builder|
             sub_menu["items"].each do |sub_item|
               build_menu_from_item(sub_builder, sub_item)
             end
           end
+        elsif Textmate.uuid_hash[item] #is a snippet
+          snippet = Textmate.uuid_hash[item]
+          if snippet.is_a?(Textmate::Snippet)
+            return unless snippet.name and snippet.name != "" #has a name
+            builder.item(snippet.to_menu_string) do
+              doc = EditView.focussed_edit_view_document
+              if doc
+                controller = doc.controllers(Snippets::DocumentController).first
+                controller.start_snippet!(snippet)
+              end
+            end
+          end
         end
       end
-      
+
       private
-      
+
       def preference_paths
         Dir[File.join(path, "Preferences", "*")]
       end
-      
+
       def snippet_paths
         Dir[File.join(path, "Snippets", "*")]
       end
     end
   end
-end
+end

data/plugins/textmate/lib/textmate/commands.rb

@@ -0,0 +1,79 @@
+
+module Redcar
+  module Textmate
+    # A test for leaks
+    #class RefreshMenuTenTimes < Redcar::Command
+    #  def execute
+    #    puts "Refreshing menu ten times."
+    #    10.times do
+    #  	  Redcar.app.refresh_menu!
+    #      puts "Refreshing the menu!"
+    #    end
+    #  end
+    #end
+
+    class ShowSnippetTree < Redcar::Command
+      def execute
+        if tree = win.treebook.trees.detect {|tree| tree.tree_mirror.title == TREE_TITLE }
+          win.treebook.focus_tree(tree)
+        else
+          tree = Tree.new(TreeMirror.new(Textmate.all_bundles),TreeController.new)
+          win.treebook.add_tree(tree)
+        end
+      end
+    end
+
+    class ReloadSnippetTree < Redcar::Command
+      def execute
+        if tree = win.treebook.trees.detect {|tree| tree.tree_mirror.title == TREE_TITLE }
+          win.treebook.remove_tree(tree)
+          tree = Tree.new(TreeMirror.new(Textmate.all_bundles),TreeController.new)
+          win.treebook.add_tree(tree)
+        else
+          ShowSnippetTree.new.run
+        end
+      end
+    end
+
+
+    class ClearBundleMenu < Redcar::Command
+      def execute
+        Textmate.storage['loaded_bundles'] = []
+        Textmate.refresh_tree
+        Redcar.app.refresh_menu!
+      end
+    end
+
+    class RemovePinnedBundle < Redcar::Command
+      def initialize(bundle_name)
+        @bundle_name = bundle_name.downcase
+      end
+
+      def execute
+        unless not Textmate.storage['loaded_bundles'].include?(@bundle_name)
+          bundles = Textmate.storage['loaded_bundles'] || []
+          bundles.delete(@bundle_name)
+          Textmate.storage['loaded_bundles'] = bundles
+          Textmate.refresh_tree
+          Redcar.app.refresh_menu!
+        end
+      end
+    end
+
+    class PinBundleToMenu < Redcar::Command
+      def initialize(bundle_name)
+        @bundle_name = bundle_name.downcase
+      end
+
+      def execute
+        unless Textmate.storage['loaded_bundles'].include?(@bundle_name)
+          bundles = Textmate.storage['loaded_bundles'] || []
+          bundles << @bundle_name
+          Textmate.storage['loaded_bundles'] = bundles
+          Textmate.refresh_tree
+          Redcar.app.refresh_menu!
+        end
+      end
+    end
+  end
+end

data/plugins/textmate/lib/textmate/tree_mirror.rb

@@ -0,0 +1,205 @@
+# Some Icons by Yusuke Kamiyamane.
+# http://p.yusukekamiyamane.com/
+#
+# Licensed under a Creative Commons Attribution 3.0 license.
+# http://creativecommons.org/licenses/by/3.0/
+module Redcar
+  module Textmate
+    TREE_TITLE = "Bundles"
+    class TreeController
+      include Redcar::Tree::Controller
+
+      def right_click(tree, node)
+        controller = self
+        menu = Menu.new
+        Redcar.plugin_manager.objects_implementing(:bundle_context_menus).each do |object|
+          case object.method(:bundle_context_menus).arity
+          when 1
+            menu.merge(object.bundle_context_menus(node))
+          when 2
+            menu.merge(object.bundle_context_menus(tree, node))
+          when 3
+            menu.merge(object.bundle_context_menus(tree, node, controller))
+          else
+            puts("Invalid bundle_context_menus hook detected in "+object.class.name)
+          end
+        end
+        Application::Dialog.popup_menu(menu, :pointer)
+      end
+
+      def activated(tree, node)
+        if node.leaf? and
+            tab = Redcar.app.focussed_notebook_tab and
+            tab.is_a?(EditTab)
+          doc = tab.document
+          if tab.edit_tab? and doc
+            controller = doc.controllers(Snippets::DocumentController).first
+            controller.start_snippet!(node.snippet)
+            tab.focus
+          end
+        end
+      end
+    end
+
+    class TreeMirror
+      include Redcar::Tree::Mirror
+
+      def initialize(bundles)
+        @top = []
+        bundles.sort_by {|bundle| (bundle.name||"").downcase}.each_with_index do |b, i|
+          if b.name and b.snippets and b.snippets.size() > 0
+            name = b.name.downcase
+            unless Textmate.storage['select_bundles_for_tree'] and !Textmate.storage['loaded_bundles'].to_a.include?(name)
+              build_tree(@top, b)
+            end
+          end
+        end
+
+        if @top.size() < 1
+          @top = [EmptyTree.new]
+        end
+      end
+
+      def refresh
+        cache = []
+        cache.concat(@top)
+        @top = []
+        @top.concat(cache)
+        cache = nil
+      end
+
+      def build_tree(tree, bundle)
+        if bundle.main_menu and bundle.main_menu["items"]
+          main_menu = bundle.main_menu
+          group = BundleNode.new(bundle.name)
+          main_menu["items"].each do |item|
+            build_tree_from_item(group.children, bundle, item)
+          end
+          tree << group
+        end
+      end
+
+      def build_tree_from_item(tree, bundle, item)
+        #if item is a snippet, add to tree
+        if snippet = Textmate.uuid_hash[item] and snippet.is_a?(Textmate::Snippet)
+          return unless snippet.name and snippet.name != ""
+          tree << SnippetNode.new(snippet)
+        #if item has submenus, make a group and add sub-items
+        elsif sub_menu = bundle.sub_menus[item]
+          unless sub_menu["items"].size() < 1
+            group = SnippetGroup.new(sub_menu["name"])
+            sub_menu["items"].each do |sub_item|
+              build_tree_from_item(group.children, bundle, sub_item)
+            end
+            tree << group
+          end
+        end
+      end
+
+      def title
+        TREE_TITLE
+      end
+
+      def top
+        @top
+      end
+    end
+
+    class EmptyTree
+      include Redcar::Tree::Mirror::NodeMirror
+      def text
+        "No snippets found"
+      end
+    end
+
+    class BundleNode
+      include Redcar::Tree::Mirror::NodeMirror
+      attr_writer :children
+
+      def initialize(name)
+        @children = []
+        @text = name
+      end
+
+      def leaf?
+        false
+      end
+
+      def text
+        @text
+      end
+
+      def children
+        @children
+      end
+
+      def icon
+        if Textmate.storage['loaded_bundles'].include?(text.downcase)
+          File.dirname(__FILE__) + "/../../icons/ui-menu-blue.png"
+        else
+          File.dirname(__FILE__) + "/../../icons/tree_mode.gif"
+        end
+      end
+    end
+
+    class SnippetGroup
+      include Redcar::Tree::Mirror::NodeMirror
+
+      attr_writer :children
+
+      def initialize(name)
+        @children = []
+        @text = name
+      end
+
+      def icon
+        File.dirname(__FILE__) + "/../../icons/tree_mode.gif"
+      end
+
+      def leaf?
+        false
+      end
+
+      def text
+        @text
+      end
+
+      def children
+        @children
+      end
+    end
+
+    class SnippetNode
+      include Redcar::Tree::Mirror::NodeMirror
+
+      def initialize(snippet)
+        @snippet = snippet
+        @name = snippet.name
+        #custom menu string
+        if snippet.tab_trigger
+          @name << " (#{snippet.tab_trigger})"
+        end
+      end
+
+      def icon
+        File.dirname(__FILE__) + "/../../icons/document-snippet.png"
+      end
+
+      def text
+        @name
+      end
+
+      def leaf?
+        true
+      end
+
+      def children
+        []
+      end
+
+      def snippet
+        @snippet
+      end
+    end
+  end
+end

data/plugins/todo_list/README.md

@@ -0,0 +1,22 @@
+#Todo List Plugin for Redcar
+
+This adds a simple 'todo list' populated from tags in the code, like 'TODO','IMPROVE','NOTE', etc.
+
+Tags and other settings can be configured from Plugins > Edit Preferences in the Redcar menu.
+
+##Todo List Settings
+
+_included suffixes:_ The suffixes of all files to be included in search for todo tags
+ * Defaults to .rb .java .js .erb .groovy .gsp and .html
+
+_excluded files:_ Files to ignore
+ * Defaults to jquery.js and prototype.js
+
+_excluded dirs:_ Directories to ignore. 
+* Defaults to .svn and .git
+
+_require_colon:_ Whether or not a tag required a colon to be included in tag list.
+ * Defaults to true
+
+_tags:_ tags to be searched for in files. 
+ * Defaults to TODO NOTE CHANGED OPTIMIZE and IMPROVE

data/plugins/todo_list/lib/todo_list.rb

@@ -0,0 +1,41 @@
+
+require 'erb'
+require 'cgi'
+require 'todo_list/todo_controller'
+require 'todo_list/file_parser'
+
+module Redcar
+  class TodoList
+
+    def self.menus
+      Menu::Builder.build do
+        sub_menu "Project" do
+          item "Todo List", TodoList::ViewListCommand
+        end
+      end
+    end
+
+    def self.storage
+      @storage ||= begin
+        storage = Plugin::Storage.new('todo_list_plugin')
+        storage.set_default('included_suffixes', ['.java','.rb','.groovy','.erb','.gsp','.html','.js'])
+        storage.set_default('excluded_files', ['jquery.js','prototype.js'])
+        storage.set_default('excluded_dirs', ['.svn','.git'])
+        storage.set_default('require_colon', true)
+        storage.set_default('tags', ['TODO','IMPROVE','CHANGED','OPTIMIZE','NOTE'])
+        storage
+      end
+    end
+
+    class ViewListCommand < Redcar::Command
+      sensitize :open_project
+      def execute
+        project = Project::Manager.in_window(win)
+        controller = TodoController.new(project.home_dir)
+        tab = win.new_tab(HtmlTab)
+        tab.html_view.controller = controller
+        tab.focus
+      end
+    end
+  end
+end