psyho-skype 0.1.0

data/History.txt

@@ -0,0 +1,9 @@
+2010/08/12
+  - Added some very basic instructions.
+
+2010/04/12
+  - Simple class structure for sending chat messages
+
+2010/04/11
+  - Started development, with a simple file that uses various chat-related aspects of the raw dbus-transported API.
+  - Added dependency: dbus => http://github.com/mvidner/ruby-dbus/downloads

data/lib/skype.rb

@@ -0,0 +1,21 @@
+require 'forwardable'
+
+require 'skype/api'
+require 'skype/chat'
+require 'skype/chatmessage'
+require 'skype/events'
+
+module Skype
+  class << self
+    extend Forwardable
+
+    def_delegator Skype::Api,    :instance, :instance
+    def_delegator Skype::Api,    :attach
+    def_delegator Skype::Chat,   :new, :chat
+    def_delegator Skype::Chat,   :all, :chats
+    def_delegator Skype::Events, :on
+    
+    Skype::Events.initialize_listeners
+  end
+end
+

data/lib/skype/api.rb

@@ -0,0 +1,111 @@
+require 'dbus'
+require 'forwardable'
+
+module Skype
+  class Notify < DBus::Object
+    dbus_interface "com.Skype.API.Client" do
+      dbus_method :Notify, "in data:s" do |message|
+        Api.notify(message)
+      end
+    end
+  end
+
+  class Api
+    class << self
+      extend Forwardable
+      def_delegators :instance, :attach, :invoke, :on_notification, :notify
+
+      def instance
+        @instance ||= new
+      end
+    end
+
+    def attach(application_name="ruby-skype")
+      raise "Already attached." if @attached
+
+      # Say hi to Skype.
+      api.Invoke "NAME #{application_name}"
+      api.Invoke "PROTOCOL 7"
+
+      run_notification_thread
+
+      @attached = true
+    end
+
+    def invoke(message, &block)
+      raise "Not attached to skype. Call Skype::Api.attach first." unless @attached
+
+      log_outgoing message
+      if block_given?
+        api.Invoke(message) do |headers, answer|
+          log_incoming answer
+          block.call(answer)
+        end
+      else
+        answer = api.Invoke(message) do |_, _|
+          # Huh? Without passing in a block, sometimes it hangs...??
+        end
+        log_incoming answer
+        answer
+      end
+    end
+
+    def on_notification(scope, proc=nil, &block)
+      raise "Need to register callbacks before attaching to Skype." if @attached
+
+      callbacks[scope] ||= []
+      callbacks[scope] << (proc ? proc : block)
+    end
+
+    def notify(message)
+      log_incoming message
+      
+      callbacks.keys.each do |key|
+        next unless match = Regexp.new("^#{key}").match(message)
+        callbacks[key].each{ |callback| callback.call(*match.captures) }
+      end
+    end
+
+  private
+
+    def initialize
+      # 'pu'a says no.
+    end
+
+    def api
+      @api ||= begin
+        skype_service = bus.service("com.Skype.API")
+        skype_object  = skype_service.object('/com/Skype')
+        skype_object.introspect
+        skype_object["com.Skype.API"]
+      end
+    end
+
+    def run_notification_thread
+      thread = Thread.new do
+        receiving_service = bus.request_service("com.nikofelger.ruby-skype")
+        receiving_service.export(Notify.new("/com/Skype/Client"))
+        dbus_event_loop = DBus::Main.new
+        dbus_event_loop << bus
+        dbus_event_loop.run
+      end
+      thread.run
+    end
+
+    def bus
+      DBus::SessionBus.instance
+    end
+
+    def callbacks
+      @callback ||= {}
+    end
+    
+    def log_incoming(message)
+      STDERR.puts "<- #{message}"
+    end
+ 
+    def log_outgoing(message)
+      STDERR.puts "-> #{message}"
+    end
+  end
+end

data/lib/skype/chat.rb

@@ -0,0 +1,28 @@
+require 'skype/events'
+
+module Skype
+  class Chat
+    class << self
+      attr_accessor :chats
+
+      def all
+        chats if chats
+
+        Api.invoke("SEARCH CHATS")
+        sleep 0.01 while chats.nil?
+        
+        yield chats
+      end
+    end
+
+    attr_reader :chatname
+
+    def initialize(chatname)
+      @chatname = chatname
+    end
+
+    def send_message(message)
+      Api.invoke("CHATMESSAGE #{@chatname} #{message}")
+    end
+  end
+end

data/lib/skype/chatmessage.rb

@@ -0,0 +1,27 @@
+module Skype
+  class Chatmessage
+    def initialize(id)
+      @chatmessage_id = id
+    end
+    
+    def chat(&block)
+      return unless block_given?
+      get_property("CHATNAME") do |chatname|
+        block.call(Chat.new(chatname))
+      end
+    end
+    
+    def body(&block)
+      return unless block_given?
+      get_property("BODY", &block)
+    end
+
+  private
+    def get_property(property, &block)
+      return unless block_given?
+      Api.invoke("GET CHATMESSAGE #{@chatmessage_id} #{property}") do |message|
+        yield message.split[3..-1].join(' ')
+      end
+    end
+  end
+end

data/lib/skype/events.rb

@@ -0,0 +1,29 @@
+require 'thread'
+
+module Skype
+  class Events
+    class << self
+      def on(event)
+        case event
+
+        when :chatmessage_received
+          Skype::Api.instance.on_notification("CHATMESSAGE (.*) STATUS RECEIVED") do |chatmessage_id|
+            yield Chatmessage.new(chatmessage_id)
+          end
+
+        when :chats_received
+          Skype::Api.instance.on_notification("CHATS (.*)") do |chatlist|
+            yield chatlist.split(', ').map { |chatname| Chat.new(chatname) }
+          end
+        end
+      end
+      
+      def initialize_listeners
+        mutex = Mutex.new
+        Skype::Events.on(:chats_received) do |chats|          
+          mutex.synchronize { Skype::Chat.chats = chats }
+        end
+      end
+    end
+  end
+end

metadata

@@ -0,0 +1,80 @@
+--- !ruby/object:Gem::Specification 
+name: psyho-skype
+version: !ruby/object:Gem::Version 
+  prerelease: 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Niko Felger
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-05-17 00:00:00 Z
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+  type: :development
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: cucumber
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+  type: :development
+  version_requirements: *id002
+description: 
+email: niko.felger@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- History.txt
+- lib/skype.rb
+- lib/skype/chat.rb
+- lib/skype/chatmessage.rb
+- lib/skype/events.rb
+- lib/skype/api.rb
+homepage: http://github.com/nfelger/skype
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.7.2
+signing_key: 
+specification_version: 3
+summary: Skype Api wrapper
+test_files: []
+