redcar 0.3.1dev → 0.3.2dev

data/lib/plugin_manager/spec/spec_helper.rb

@@ -0,0 +1,3 @@
+
+require File.join(File.dirname(__FILE__), "..", "lib", "plugin_manager")
+

data/lib/redcar.rb

@@ -3,11 +3,13 @@ $:.push File.join(File.dirname(__FILE__))
 
 require 'rbconfig'
 
+require 'redcar/usage'
+
 module Redcar
-  VERSION         = '0.3.1dev'
+  VERSION         = '0.3.2dev'
   VERSION_MAJOR   = 0
   VERSION_MINOR   = 3
-  VERSION_RELEASE = 1
+  VERSION_RELEASE = 2
 
   def self.ensure_jruby
     if Config::CONFIG["RUBY_INSTALL_NAME"] == "jruby"
@@ -24,4 +26,7 @@ module Redcar
   end
 end
 
-require 'redcar/installer'
+usage = Redcar::Usage.new
+usage.version_string
+usage.version_requested
+usage.help_requested

data/lib/redcar/boot.rb

@@ -1,40 +1,19 @@
 
 require 'java'
 
-$:.push(File.join(File.dirname(__FILE__), %w(.. little_plugger lib)))
-require 'little-plugger'
-
-$:.push(File.join(File.dirname(__FILE__), %w(.. logging lib)))
-require 'thread'
-require 'logging'
-
-$:.push(File.join(File.dirname(__FILE__), %w(.. freebase2 lib)))
-require 'freebase/freebase'
-
 require 'redcar/ruby_extensions'
+require 'redcar/instance_exec'
 require 'redcar/usage'
 
+require 'plugin_manager/lib/plugin_manager'
+
 require 'forwardable'
 require 'yaml'
 
 # ## Loading and Initialization
 #
 # Every feature in Redcar is written as a plugin. This module contains a few 
-# methods to bootstrap the plugins by loading the FreeBASE plugin handler.
-#
-# FreeBASE (kindly open sourced by the FreeRIDE project) will load Redcar in 
-# the following manner:
-#
-#   1. For each plugin load the file *plugin_name/lib/plugin_name.rb* and then
-#      run the method "load" on the class defined in plugin.yaml as the 
-#      "startup_module". The plugins will be loaded in an order respecting the
-#      "load_dependencies" in each plugin.yaml.
-#   2. Call the start method on each of the "startup_module" classes, respecting
-#      the "start_dependencies" in each plugin.yaml
-#
-# All Redcar initialization is done in these methods, "load" and "start" on 
-# every plugin class. Note that plugins are not required to define either of 
-# these methods.
+# methods to bootstrap the plugins by loading the PluginManager.
 #
 # Once loaded, bin/redcar will start the gui pump, which will run 
 # Redcar.gui.start. This starts the GUI library's event loop and hands over 
@@ -59,47 +38,71 @@ require 'yaml'
 # and so on.
 module Redcar
   
-  ROOT = File.expand_path(File.join(File.dirname(__FILE__), "..", ".."))
-
-  $FR_CODEBASE          = File.expand_path(File.join(File.dirname(__FILE__)) + "/../../")
-  $FR_PROJECT           = nil
-  $FREEBASE_APPLICATION = "Redcar"
-  
-  class << self
-    attr_reader :freebase_core
-  end
-  
   def self.root
-    ROOT
+    File.expand_path(File.join(File.dirname(__FILE__), "..", ".."))
   end
   
-  def self.start
-    @freebase_core = FreeBASE::Core.new(*freebase_core_args)
-    @freebase_core.startup
+  def self.plugin_manager
+    @plugin_manager ||= begin
+      m = PluginManager.new
+      m.add_plugin_source(File.join(root, "plugins"))
+      m.add_plugin_source(File.join(user_dir, "plugins"))
+      m
+    end
   end
   
   def self.load
-    @freebase_core = FreeBASE::Core.new(*freebase_core_args)
-    @freebase_core.load_plugins
+    plugin_manager.load
+    if plugin_manager.unreadable_definitions.any?
+      puts "Couldn't read definition files: "
+      puts plugin_manager.unreadable_definitions.map {|d| "  * " + d}
+    end
+    if plugin_manager.plugins_with_errors.any?
+      puts "There was an error loading: "
+      puts plugin_manager.plugins_with_errors.map {|d| "  * " + d.name}
+    end
+    if ENV["PLUGIN_DEBUG"]
+      puts "Loaded plugins:"
+      puts plugin_manager.loaded_plugins.map {|d| "  * " + d.name}
+      puts
+      puts "Unloaded plugins:"
+      puts plugin_manager.unloaded_plugins.map {|d| "  * " + d.name}
+      
+    end
   end
-  
-  def self.require_files
-    @freebase_core = FreeBASE::Core.new(*freebase_core_args)
-    @freebase_core.require_files
+
+  def self.pump 
+    Redcar.gui.start
   end
   
-  def self.pump
-    @freebase_core.bus["/system/ui/messagepump"].call()
+  # Platform symbol
+  #
+  # @return [:osx/:windows/:linux]
+  def self.platform
+    case Config::CONFIG["target_os"]
+    when /darwin/
+      :osx
+    when /mswin|mingw/
+      :windows
+    when /linux/
+      :linux
+    end
   end
   
-  private
-  
-  def self.freebase_core_args
-    ["properties.yaml", "config/default.yaml"]
+  # Platform specific ~/.redcar
+  #
+  # @return [String] expanded path
+  def self.user_dir
+    if platform == :windows
+      if ENV['USERPROFILE'].nil?
+        userdir = "C:/My Documents/.redcar/"
+      else
+        userdir = File.join(ENV['USERPROFILE'], ".redcar")
+      end
+    else
+      userdir = File.join(ENV['HOME'], ".redcar") unless ENV['HOME'].nil?
+    end
+    File.expand_path(userdir)
   end
-end
 
-usage = Redcar::Usage.new
-usage.version_string
-usage.version_requested
-usage.help_requested
+end

data/lib/redcar/installer.rb

@@ -72,7 +72,7 @@ module Redcar
       when /linux/i
         download("/swt/linux.jar", File.join(plugins_dir, %w(application_swt vendor swt linux swt.jar)))
         download("/swt/linux64.jar", File.join(plugins_dir, %w(application_swt vendor swt linux64 swt.jar)))
-      when /windows|mswin/i
+      when /windows|mswin|mingw/i
         download("/swt/win32.jar", File.join(plugins_dir, %w(application_swt vendor swt win32 swt.jar)))
         # download("/swt/win64.jar", File.join(plugins_dir, %w(application_swt vendor swt win64 swt.jar)))
       end

data/lib/redcar/instance_exec.rb

@@ -0,0 +1,25 @@
+
+class Object
+  
+  unless defined? instance_exec # 1.9
+    # http://eigenclass.org/hiki/bounded+space+instance_exec
+    module InstanceExecHelper; end
+    include InstanceExecHelper
+    def instance_exec(*args, &block)
+      begin
+        old_critical, Thread.critical = Thread.critical, true
+        n = 0
+        n += 1 while respond_to?(mname="__instance_exec#{n}")
+        InstanceExecHelper.module_eval{ define_method(mname, &block) }
+      ensure
+        Thread.critical = old_critical
+      end
+      begin
+        ret = send(mname, *args)
+      ensure
+        InstanceExecHelper.module_eval{ remove_method(mname) } rescue nil
+      end
+      ret
+    end
+  end
+end

data/lib/redcar/runner.rb

@@ -11,7 +11,11 @@ module Redcar
     # our vendored jarred one (useful for gems).
     def spin_up
       bin = "#{File.dirname(__FILE__)}/../../bin/redcar"
-      jruby_complete = Dir[File.dirname(__FILE__) + "/../jruby-complete-1.4.0.jar"].first
+      jruby_complete = File.expand_path(File.join(File.dirname(__FILE__), "..", "jruby-complete-1.4.0.jar"))
+      unless File.exist?(jruby_complete)
+        puts "\nCan't find jruby jar at #{jruby_complete}, did you run 'redcar install' ?"
+        exit 1
+      end
       args = []
       if false
         command = "jruby #{java_args} \"#{bin}\" #{ARGV.join(' ')}"

data/lib/redcar/usage.rb

@@ -15,13 +15,17 @@ module Redcar
     end
 
     def help_requested
-      if ARGV.include?("-h")
+      if ARGV.include?("-h") or ARGV.include?("--help")
         puts "Redcar #{Redcar::VERSION}"
         puts
         puts "       --font=FONT  Choose font"
         puts "  --font-size=SIZE  Choose font point size"
         puts "     --theme=THEME  Choose Textmate theme"
         puts
+        puts "To download jars:"
+        puts
+        puts "   $ [sudo] redcar install"
+        puts
         exit
       end
     end

data/plugins/application/lib/application.rb

@@ -3,6 +3,8 @@ require 'application/command/executor'
 require 'application/command/history'
 require 'application/sensitive'
 require 'application/sensitivity'
+
+require 'application/clipboard'
 require 'application/command'
 require 'application/dialog'
 require 'application/dialogs/filter_list_dialog'
@@ -10,6 +12,7 @@ require 'application/menu'
 require 'application/menu/item'
 require 'application/menu/builder'
 require 'application/notebook'
+require 'application/speedbar'
 require 'application/tab'
 require 'application/tab/command'
 require 'application/treebook'
@@ -33,41 +36,48 @@ module Redcar
     include Redcar::Model
     include Redcar::Observable
     
-    def self.load
-      Redcar.freebase_core.bus["/system/ui/messagepump"].set_proc do
-        Redcar.gui.start
-      end
-    end
-    
     def self.start
       Redcar.app     = Application.new
       Redcar.history = Command::History.new
-      Sensitivity.new(:open_tab, Redcar.app, false, [:focussed_window, :tab_focussed]) do |tab|
-        if win = Redcar.app.focussed_window
-          win.focussed_notebook.focussed_tab
-        end
-      end
-      Sensitivity.new(:single_notebook, Redcar.app, true, [:focussed_window, :notebook_change]) do
-        if win = Redcar.app.focussed_window
-          win.notebooks.length == 1
-        end
-      end
-      Sensitivity.new(:multiple_notebooks, Redcar.app, false, [:focussed_window, :notebook_change]) do
-        if win = Redcar.app.focussed_window
-          win.notebooks.length > 1
-        end
-      end
-      Sensitivity.new(:other_notebook_has_tab, Redcar.app, false, 
-                      [:focussed_window, :focussed_notebook, :notebook_change, :tab_closed]) do
-        if win = Redcar.app.focussed_window and notebook = win.nonfocussed_notebook
-          notebook.tabs.any?
+    end
+    
+    def self.sensitivities
+      [ 
+        Sensitivity.new(:open_tab, Redcar.app, false, [:focussed_window, :tab_focussed]) do |tab|
+          if win = Redcar.app.focussed_window
+            win.focussed_notebook.focussed_tab
+          end
+        end,
+        Sensitivity.new(:single_notebook, Redcar.app, true, [:focussed_window, :notebook_change]) do
+          if win = Redcar.app.focussed_window
+            win.notebooks.length == 1
+          end
+        end,
+        Sensitivity.new(:multiple_notebooks, Redcar.app, false, [:focussed_window, :notebook_change]) do
+          if win = Redcar.app.focussed_window
+            win.notebooks.length > 1
+          end
+        end,
+        Sensitivity.new(:other_notebook_has_tab, Redcar.app, false, 
+                        [:focussed_window, :focussed_notebook, :notebook_change, :tab_closed]) do
+          if win = Redcar.app.focussed_window and notebook = win.nonfocussed_notebook
+            notebook.tabs.any?
+          end
         end
-      end
+      ]
     end
     
+    attr_reader :clipboard
+    
     def initialize
       @windows = []
       @window_handlers = Hash.new {|h,k| h[k] = []}
+      create_clipboard
+    end
+    
+    def create_clipboard
+      @clipboard       = Clipboard.new("application")
+      @clipboard.add_listener(:added) { notify_listeners(:clipboard_added) }
     end
     
     # Immediately halts the gui event loop.
@@ -101,7 +111,7 @@ module Redcar
       end
       @window_handlers[window].each {|h| window.remove_listener(h) }
       @window_handlers.delete(window)
-      if windows.length == 0  and [:linux, :windows].include?(Core.platform)
+      if windows.length == 0  and [:linux, :windows].include?(Redcar.platform)
         quit
       end
     end
@@ -137,6 +147,24 @@ module Redcar
       self.menu = @menu
     end
     
+    def load_menus
+      menu = Menu.new
+      Redcar.plugin_manager.loaded_plugins.each do |plugin|
+        if plugin.object.respond_to?(:menus)
+          menu.merge(plugin.object.menus)
+        end
+      end
+      self.menu = menu
+    end
+    
+    def load_sensitivities
+      Redcar.plugin_manager.loaded_plugins.each do |plugin|
+        if plugin.object.respond_to?(:sensitivities)
+          plugin.object.sensitivities
+        end
+      end
+    end
+    
     def attach_window_listeners(window)
       h1 = window.add_listener(:tab_focussed) do |tab|
         notify_listeners(:tab_focussed, tab)
@@ -164,7 +192,12 @@ module Redcar
           notify_listeners(:focussed_tab_changed, tab)
         end
       end
-      @window_handlers[window] << h1 << h2 << h3 << h4 << h5 << h6 << h7 << h8
+      h9 = window.add_listener(:focussed_tab_selection_changed) do |tab|
+        if window == focussed_window
+          notify_listeners(:focussed_tab_selection_changed, tab)
+        end
+      end
+      @window_handlers[window] << h1 << h2 << h3 << h4 << h5 << h6 << h7 << h8 << h9
     end
   end
 end

data/plugins/application/lib/application/clipboard.rb

@@ -0,0 +1,71 @@
+module Redcar
+  # A simple array with a maximum length. Models a copy/paste clipboard
+  # that can contain multiple elements.
+  class Clipboard
+    include Redcar::Model
+    include Redcar::Observable
+    include Enumerable
+    
+    def self.max_length
+      10
+    end
+
+    attr_reader :name
+  
+    def initialize(name)
+      @name     = name
+      @contents = []
+    end
+    
+    # Add text to the clipboard.
+    #
+    # @param [String, Array<String>]
+    def <<(text)
+      if text.is_a?(String)
+        text = [text]
+      end
+      @contents << text
+      if @contents.length == Clipboard.max_length + 1
+        @contents.delete_at(0)
+      end
+      notify_listeners(:added_internal, text)
+      notify_listeners(:added, text)
+    end
+    
+    def last
+      check_for_changes
+      @contents.last
+    end
+    
+    def length
+      check_for_changes
+      @contents.length
+    end
+    
+    def [](index)
+      check_for_changes
+      @contents[-1*index-1]
+    end
+    
+    def each(&block)
+      check_for_changes
+      @contents.each(&block)
+    end
+    
+    def silently_add(text)
+      @contents << text
+    end
+    
+    private
+    
+    def check_for_changes
+      if controller and controller.changed?
+        controller.last_set = @contents.last.join("\n")
+        contents = controller.get_contents
+        self << contents if contents
+      end
+    end
+  end
+end
+
+