rum 0.0.1-x86-mswin32-60

data/lib/rum/mac.rb

@@ -0,0 +1,18 @@
+require 'rum/mac/system'
+require 'rum/mac/keyboard_hook'
+require 'rum/mac/gui'
+require 'rum/mac/layouts'
+require 'rum/mac/app'
+
+module Rum
+  Platform = :mac
+  
+  def self.restart_platform_specific
+    Rum::Server.close_connections
+    exec(RUBY_ENGINE, $PROGRAM_NAME)
+  end
+
+  module Keyboard
+    # not yet implemented
+  end
+end

data/lib/rum/mac/app.rb

@@ -0,0 +1,4 @@
+module Rum
+  class App
+  end
+end

data/lib/rum/mac/apps.rb

@@ -0,0 +1,19 @@
+Emacs = App.new
+require 'rum/barrel/emacs'
+class << Emacs
+  def activate
+    System.script 'tell application "Emacs"
+                     activate
+                   end tell'
+  end
+end
+
+Textmate = App.new
+class << Textmate
+  def open_file(path, line=nil)
+    args = []
+    args.concat ['-l', line.to_s] if line
+    args << path
+    system('mate', *args)
+  end
+end

data/lib/rum/mac/gui.rb

@@ -0,0 +1,26 @@
+module Rum
+  module Gui
+    autoload :Growl, 'rum/mac/gui/growl'
+
+    def open_file path, line=nil
+      NSWorkspace.sharedWorkspace.openFile(File.expand_path(path))
+    end
+
+    def goto path
+      # reveal in finder
+      System.start '-R', path
+    end
+
+    private
+
+    def browse_backend url
+      url = NSURL.URLWithString(url)
+      NSWorkspace.sharedWorkspace.openURL(url)
+    end
+    
+    binary = File.join(File.dirname(__FILE__),
+                       'gui/CocoaDialog.app/Contents/MacOS/CocoaDialog')
+    CocoaDialog.setup binary
+    use CocoaDialog
+  end
+end

data/lib/rum/mac/gui/growl.rb

@@ -0,0 +1,54 @@
+module Rum
+  module Gui
+    module Growl
+      class Notifier
+        def initialize application_name, notification_name
+          @application_name  = application_name
+          @notification_name = notification_name
+          @callbacks = {}
+          GrowlApplicationBridge.setGrowlDelegate(self)
+        end
+        
+        def registrationDictionaryForGrowl
+          notifications = [@notification_name]
+          { TicketVersion: 1,  AllNotifications: notifications,
+            DefaultNotifications: notifications,  ApplicationId: ''}
+        end
+
+        def applicationNameForGrowl
+          @application_name
+        end
+
+        def growlNotificationWasClicked click_context
+          @callbacks[click_context].call
+        end
+
+        def notify(title, description, sticky, callback)
+          if callback
+            click_context = callback.object_id
+            @callbacks[click_context] = callback
+          end
+          GrowlApplicationBridge.notifyWithTitle(title.to_s,
+                                                 description: description.to_s,
+                                                 notificationName: @notification_name,
+                                                 iconData: nil,
+                                                 priority: 0,
+                                                 isSticky: !!sticky,
+                                                 clickContext: click_context)
+        end
+      end
+
+      def self.auto_setup
+        framework File.join(File.dirname(__FILE__), 'Growl.framework')
+        @@notifier = Notifier.new('Rum', 'Notification')
+      end
+      
+      private
+      
+      def message_backend(text, title, sticky, callback)
+        title ||= 'Rum' # Mac Growl needs a title
+        @@notifier.notify(title, text, sticky, callback)
+      end
+    end
+  end
+end

data/lib/rum/mac/irb/completion.rb

@@ -0,0 +1,207 @@
+#
+#   irb/completor.rb - 
+#   	$Release Version: 0.9$
+#   	$Revision: 23233 $
+#   	by Keiju ISHITSUKA(keiju@ishitsuka.com)
+#       From Original Idea of shugo@ruby-lang.org
+#
+
+require "readline"
+
+module IRB
+  module InputCompletor
+
+    @RCS_ID='-$Id: completion.rb 23233 2009-04-19 13:35:47Z yugui $-'
+
+    ReservedWords = [
+      "BEGIN", "END",
+      "alias", "and", 
+      "begin", "break", 
+      "case", "class",
+      "def", "defined", "do",
+      "else", "elsif", "end", "ensure",
+      "false", "for", 
+      "if", "in", 
+      "module", 
+      "next", "nil", "not",
+      "or", 
+      "redo", "rescue", "retry", "return",
+      "self", "super",
+      "then", "true",
+      "undef", "unless", "until",
+      "when", "while",
+      "yield",
+    ]
+      
+    CompletionProc = proc { |input|
+      bind = IRB.conf[:MAIN_CONTEXT].workspace.binding
+      
+#      puts "input: #{input}"
+
+      case input
+      when /^(\/[^\/]*\/)\.([^.]*)$/
+	# Regexp
+	receiver = $1
+	message = Regexp.quote($2)
+
+	candidates = Regexp.instance_methods.collect{|m| m.to_s}
+	select_message(receiver, message, candidates)
+
+      when /^([^\]]*\])\.([^.]*)$/
+	# Array
+	receiver = $1
+	message = Regexp.quote($2)
+
+	candidates = Array.instance_methods.collect{|m| m.to_s}
+	select_message(receiver, message, candidates)
+
+      when /^([^\}]*\})\.([^.]*)$/
+	# Proc or Hash
+	receiver = $1
+	message = Regexp.quote($2)
+
+	candidates = Proc.instance_methods.collect{|m| m.to_s}
+	candidates |= Hash.instance_methods.collect{|m| m.to_s}
+	select_message(receiver, message, candidates)
+	
+      when /^(:[^:.]*)$/
+ 	# Symbol
+	if Symbol.respond_to?(:all_symbols)
+	  sym = $1
+	  candidates = Symbol.all_symbols.collect{|s| ":" + s.id2name}
+	  candidates.grep(/^#{sym}/)
+	else
+	  []
+	end
+
+      when /^::([A-Z][^:\.\(]*)$/
+	# Absolute Constant or class methods
+	receiver = $1
+	candidates = Object.constants.collect{|m| m.to_s}
+	candidates.grep(/^#{receiver}/).collect{|e| "::" + e}
+
+      when /^(((::)?[A-Z][^:.\(]*)+)::?([^:.]*)$/
+	# Constant or class methods
+	receiver = $1
+	message = Regexp.quote($4)
+	begin
+	  candidates = eval("#{receiver}.constants.collect{|m| m.to_s}", bind)
+	  candidates |= eval("#{receiver}.methods.collect{|m| m.to_s}", bind)
+	rescue Exception
+	  candidates = []
+	end
+	candidates.grep(/^#{message}/).collect{|e| receiver + "::" + e}
+
+      when /^(:[^:.]+)\.([^.]*)$/
+	# Symbol
+	receiver = $1
+	message = Regexp.quote($2)
+
+	candidates = Symbol.instance_methods.collect{|m| m.to_s}
+	select_message(receiver, message, candidates)
+
+      when /^(-?(0[dbo])?[0-9_]+(\.[0-9_]+)?([eE]-?[0-9]+)?)\.([^.]*)$/
+	# Numeric
+	receiver = $1
+	message = Regexp.quote($5)
+
+	begin
+	  candidates = eval(receiver, bind).methods.collect{|m| m.to_s}
+	rescue Exception
+	  candidates = []
+	end
+	select_message(receiver, message, candidates)
+
+      when /^(-?0x[0-9a-fA-F_]+)\.([^.]*)$/
+	# Numeric(0xFFFF)
+	receiver = $1
+	message = Regexp.quote($2)
+
+	begin
+	  candidates = eval(receiver, bind).methods.collect{|m| m.to_s}
+	rescue Exception
+	  candidates = []
+	end
+	select_message(receiver, message, candidates)
+
+      when /^(\$[^.]*)$/
+	regmessage = Regexp.new(Regexp.quote($1))
+	candidates = global_variables.collect{|m| m.to_s}.grep(regmessage)
+
+#      when /^(\$?(\.?[^.]+)+)\.([^.]*)$/
+      when /^((\.?[^.]+)+)\.([^.]*)$/
+	# variable
+	receiver = $1
+	message = Regexp.quote($3)
+
+	gv = eval("global_variables", bind).collect{|m| m.to_s}
+	lv = eval("local_variables", bind).collect{|m| m.to_s}
+	cv = eval("self.class.constants", bind).collect{|m| m.to_s}
+	
+	if (gv | lv | cv).include?(receiver)
+	  # foo.func and foo is local var.
+	  candidates = eval("#{receiver}.methods", bind).collect{|m| m.to_s}
+	elsif /^[A-Z]/ =~ receiver and /\./ !~ receiver
+	  # Foo::Bar.func
+	  begin
+	    candidates = eval("#{receiver}.methods", bind).collect{|m| m.to_s}
+	  rescue Exception
+	    candidates = []
+	  end
+	else
+	  # func1.func2
+	  candidates = []
+	  ObjectSpace.each_object(Module){|m|
+	    begin
+	      name = m.name
+	    rescue Exception
+	      name = ""
+	    end
+	    next if name != "IRB::Context" and 
+	      /^(IRB|SLex|RubyLex|RubyToken)/ =~ name
+	    candidates.concat m.instance_methods(false).collect{|x| x.to_s}
+	  }
+	  candidates.sort!
+	  candidates.uniq!
+	end
+	select_message(receiver, message, candidates)
+
+      when /^\.([^.]*)$/
+	# unknown(maybe String)
+
+	receiver = ""
+	message = Regexp.quote($1)
+
+	candidates = String.instance_methods(true).collect{|m| m.to_s}
+	select_message(receiver, message, candidates)
+
+      else
+	candidates = eval("methods | private_methods | local_variables | self.class.constants", bind).collect{|m| m.to_s}
+			  
+	(candidates|ReservedWords).grep(/^#{Regexp.quote(input)}/)
+      end
+    }
+
+    Operators = ["%", "&", "*", "**", "+",  "-",  "/",
+      "<", "<<", "<=", "<=>", "==", "===", "=~", ">", ">=", ">>",
+      "[]", "[]=", "^", "!", "!=", "!~"]
+
+    def self.select_message(receiver, message, candidates)
+      candidates.grep(/^#{message}/).collect do |e|
+	case e
+	when /^[a-zA-Z_]/
+	  receiver + "." + e
+	when /^[0-9]/
+	when *Operators
+	  #receiver + " " + e
+	end
+      end
+    end
+  end
+end
+
+if Readline.respond_to?("basic_word_break_characters=")
+  Readline.basic_word_break_characters= " \t\n\"\\'`><=;|&{("
+end
+Readline.completion_append_character = nil
+Readline.completion_proc = IRB::InputCompletor::CompletionProc

data/lib/rum/mac/keyboard_hook.rb

@@ -0,0 +1,73 @@
+framework "ApplicationServices"
+framework "#{File.dirname(__FILE__)}/keyboard_hook/KeyboardHook.framework"
+framework 'Cocoa'
+
+module KeyboardHook
+  def self.start &block
+    @tap = EventTap.new
+    @tap.on_event &block
+    NSApplication.sharedApplication.run()
+  end
+
+  def self.stop
+    # Todo: cleanup, unregister hook
+    NSApplication.sharedApplication.terminate(nil)
+  end
+end
+
+class EventTap
+  def handleEvent(event)
+    event if @proc.call(event)
+  end
+
+  def on_event(&proc)
+    @proc = proc
+  end
+end
+
+class Event
+  def set_event_source(source)
+    CGEventSetSource(eventRef, source)
+  end
+
+  def set_keycode(code)
+    set_integer_value_field(KCGKeyboardEventKeycode, code)
+  end
+
+  def down?
+    down != 0
+  end
+
+  def keycode
+    get_integer_value_field(KCGKeyboardEventKeycode)
+  end
+  
+  def id
+    get_integer_value_field(KCGKeyboardEventKeycode)
+  end
+
+  def to_s
+    "#{down? ? 'Down' : 'Up'}: Id #{id}"
+  end
+
+  def set_integer_value_field(field, value)
+    CGEventSetIntegerValueField(eventRef, field, value)
+  end
+
+  def get_integer_value_field(field)
+    CGEventGetIntegerValueField(eventRef, field)
+  end
+
+  def get_user_data
+    CGEventGetIntegerValueField(eventRef, KCGEventSourceUnixProcessID)
+  end
+
+  def get_flags
+    CGEventGetFlags(eventRef)  
+  end
+
+  def set_flags(flags)
+    CGEventSetFlags(eventRef, flags)
+  end
+end
+

data/lib/rum/mac/layouts.rb

@@ -0,0 +1,146 @@
+# encoding: utf-8
+
+module Rum
+  module Layouts
+    module_function
+    
+    def default_layout
+      us
+    end
+
+    # /System/Library/Frameworks/Carbon.framework/.../Events.h
+    def core
+      core = Layout.new
+      
+      [['return', "\n", 36],
+       ['tab', 48],
+       ['space', ' ', 49],
+       ['delete', 51],
+       ['escape', 53],
+       ['rightcommand', 54],
+       ['command', 55],
+       ['shift', 56],
+       ['capslock', 57],
+       ['option', 58],
+       ['control', 59],
+       ['rightshift', 60],
+       ['rightoption', 61],
+       ['rightcontrol', 62],
+       ['function', 63],
+       ['f17', 64],
+       ['volumeup', 72],
+       ['volumedown', 73],
+       ['mute', 74],
+       ['f18', 79],
+       ['f19', 80],
+       ['f20', 90],
+       ['f5', 96],
+       ['f6', 97],
+       ['f7', 98],
+       ['f3', 99],
+       ['f8', 100],
+       ['f9', 101],
+       ['f11', 103],
+       ['f13', 105],
+       ['f16', 106],
+       ['f14', 107],
+       ['f10', 109],
+       ['f12', 111],
+       ['f15', 113],
+       ['help', 114],
+       ['home', 115],
+       ['pageup', 116],
+       ['forward_delete', 117],
+       ['f4', 118],
+       ['end', 119],
+       ['f2', 120],
+       ['pagedown', 121],
+       ['f1', 122],
+       ['leftarrow', 123],
+       ['rightarrow', 124],
+       ['downarrow', 125],
+       ['uparrow', 126]].each { |key| core.add *key }
+      
+      core
+    end
+
+    def basic
+      basic = core
+
+      [['decimal', 65],
+       ['multiply', 67],
+       ['add', 69],
+       ['numlock', 71],
+       ['divide', 75],
+       ['numpadenter', 76],
+       ['subtract', 78],
+       ['numpad0', 82],
+       ['numpad1', 83],
+       ['numpad2', 84],
+       ['numpad3', 85],
+       ['numpad4', 86],
+       ['numpad5', 87],
+       ['numpad6', 88],
+       ['numpad7', 89],
+       ['numpad8', 91],
+       ['numpad9', 92],
+       ['apps', 110]].each { |key| basic.add *key }
+
+      basic.remap 'rightshift', 'shift'
+      basic.remap 'rightcontrol', 'control'
+      basic.remap 'rightoption', 'option'
+      basic.remap 'rightcommand', 'command'
+
+      basic.rename 'uparrow', 'up'
+      basic.rename 'rightarrow', 'right'
+      basic.rename 'downarrow', 'down'
+      basic.rename 'leftarrow', 'left'
+      basic.rename 'help', 'insert'
+      basic.alias  'insert', 'help'
+      basic.rename 'delete', 'backspace'
+      basic.rename 'forward_delete', 'delete'
+      basic.rename 'return', 'enter'
+      basic.alias  'enter', 'return'
+      basic.rename 'capslock', 'caps'
+
+      basic.alias  'f13', 'print'
+      basic.alias  'f14', 'scroll'
+      basic.alias  'f15', 'pause'
+
+      basic.alias 'command', 'cmd'
+      basic.alias 'function', 'fn'
+
+      %w{command control option shift function}.each do |key|
+        basic.core_modifier key
+      end
+
+      basic
+    end
+
+    def us
+      us = basic
+      %w{a s d f h g z x c v § b q w e r y t 1 2 3 4 6
+         5 = 9 7 - 8 0 ] o u [ i p _ l j _ k ; _ , / n m .}.each_with_index do |key, id|
+        us.add key, id unless key == '_'
+      end
+      
+      us.add "'", 39
+      us.add '\\', 42
+      us.add '`', 50
+
+      us
+    end
+
+    def german
+      german = basic
+      %w{a s d f h g z x c v ^ b q w e r y t 1 2 3 4 6
+         5 ´ 9 7 ß 8 0 + o u ü i p _ l j ä k ö # , - n m .}.each_with_index do |key, id|
+        german.add key, id unless key == '_'
+      end
+
+      german.add '<', 50
+
+      german
+    end
+  end
+end