rbus 0.1.0

data/bin/rbus-send

@@ -0,0 +1,165 @@
+#!/usr/bin/env ruby
+#
+#--
+# 
+# R-Bus is a native Ruby implementation of the D-Bus protocol.
+# Copyright (C) 2007 Kristoffer Lundén (kristoffer.lunden@gmail.com)
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA  02110-1301, USA.  A copy of the GNU General Public License is
+# also available at http://www.gnu.org/copyleft/gpl.html.
+#
+#++
+#
+# <em>rbus-send</em>
+# Pure ruby version of, and compatible with dbus-send
+#
+# Invocation:
+#   rbus-send <destination object path> <message name> [options] [arguments ...]
+#
+# Format of arguments:
+#   <arguments>  ::= <item> | <container> [ <item> | <container>...]
+#   <item>       ::= <type>:<value>
+#   <container>  ::= <array> | <dict> | <variant>
+#   <array>      ::= array:<type>:<value>[,<value>...] 
+#   <dict>       ::= dict:<type>:<type>:<key>,<value>[,<key>,<value>...]
+#   <variant>    ::= variant:<type>:<value>
+#   <type>       ::= string | int16 | uint16 | int32 | uint32 | int64 | uint64 | double | byte | boolean | objpath
+#
+# See the TUTORIAL[link:files/TUTORIAL_txt.html] for example invocations.
+#
+# Stuff known to be missing/not working:
+#   --reply-timeout=MSEC
+#
+
+
+require 'optparse'
+require 'rbus'
+require 'yaml'
+
+def make_signature # :nodoc:
+  translation = {
+    'byte'      => 'y',
+    'boolean'   => 'b',
+    'int16'     => 'n',
+    'uint16'    => 'q',
+    'int32'     => 'i',
+    'uint32'    => 'u',
+    'int64'     => 'x',
+    'uint64'    => 't',
+    'double'    => 'd',
+    'string'    => 's',
+    'objpath'   => 'o',
+    'signature' => 'g',
+    'variant'   => 'v',
+    'array'     => 'a',
+    'dict'      => 'a{',
+  }
+
+  signature = ''
+  array = false
+  
+  ARGV.map!{|a|
+    type, arg = a.split(':',2)
+    fail "Unknown type '#{type}'" unless translation.has_key?(type)
+    signature << translation[type]
+    case type
+      when 'dict'
+        key,value,arg = arg.split(':',3)
+        signature << translation[key]
+        signature << translation[value]
+        signature << '}'
+        arg.nil? ? {} : Hash[*arg.split(',')]
+      when 'array'
+        array = true
+        a = arg
+        redo
+      when 'variant'
+        a = arg
+        redo
+      else
+        rv = (array) ? arg.split(',') : arg 
+        array = false
+        rv
+    end
+  }
+  signature
+end
+
+klass = RBus::Signal
+destination = nil
+bus = nil
+print_reply = false
+
+opts = OptionParser.new do |opts|
+  opts.banner = 'rbus-send <destination object path> <message name> [options] [arguments ...]'
+
+  opts.on('--dest=NAME',
+          String,
+          'Specify the name of the connection to receive the message.') {|dest|
+            destination = dest
+  }
+  
+  opts.on('--print-reply', 
+          'Block for a reply to the message sent, and print any reply received.') {
+    print_reply = true
+    klass = RBus::MethodCall
+  }
+  
+  opts.on('--system', 'Send to the system message bus.') {
+    bus = RBus.system_bus
+  }
+  
+  opts.on('--session', 'Send to the session message bus. (This is the default.)') {
+    bus = RBus.session_bus
+  }
+  
+  opts.on('--type=TYPE', %w{method_call signal},
+          'Specify "method_call" or "signal" (defaults to "signal").') { |type|
+    klass = case type
+              when 'method_call' : RBus::MethodCall
+              when 'signal' : RBus::Signal
+            end
+  }
+end
+
+opts.parse!
+
+if ARGV.length < 2
+  puts opts.to_s
+  exit
+end
+
+object_path = ARGV.shift
+member,interface = ARGV.shift.reverse.split('.',2).map{|s|s.reverse}
+
+bus = RBus.session_bus if bus.nil?
+
+message = klass.new do |m|
+  m.destination = destination
+  m.object_path = object_path
+  m.interface = interface
+  m.member = member
+  m.signature = make_signature
+  m.arguments = ARGV
+end
+
+#puts YAML.dump(message);exit
+
+if print_reply
+  puts YAML.dump(bus.message_loop.send_message(message, nil))
+else
+  bus.message_loop.send_message(message, lambda{})
+end

data/examples/async_rb_and_notify.rb

@@ -0,0 +1,56 @@
+#!/usr/bin/env ruby
+#--
+# 
+# R-Bus is a native Ruby implementation of the D-Bus protocol.
+# Copyright (C) 2007 Kristoffer Lundén (kristoffer.lunden@gmail.com)
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA  02110-1301, USA.  A copy of the GNU General Public License is
+# also available at http://www.gnu.org/copyleft/gpl.html.
+#
+#++
+#
+#
+# RBus Example:
+# Asynchronous calls, very contrived example :)
+#
+
+
+# Add lib to load path during developmennt
+$: << '../lib/'
+
+require 'rbus'
+
+session_bus = RBus.session_bus()
+
+# Rhythmbox player
+rb = session_bus.get_object('org.gnome.Rhythmbox', '/org/gnome/Rhythmbox/Player')
+rb.interface!('org.gnome.Rhythmbox.Player')
+
+# Libnotify
+notify = session_bus.get_object('org.freedesktop.Notifications','/org/freedesktop/Notifications')
+notify.interface!('org.freedesktop.Notifications')
+
+# Async call, should be run in parallell
+rb.getPlayingUri() do |uri|
+  notify.Notify('R-Bus',0,'info','Async Notification 1',uri,[],{},-1)
+  sleep(1)
+  notify.Notify('R-Bus',0,'info','Async Notification 2',uri,[],{},-1)
+end
+
+# Sync call, runs in main thread
+notify.Notify('R-Bus',0,'info','Sync Notification',rb.getPlayingUri(),[],{},-1)
+sleep(2)
+

data/examples/async_rb_loop.rb

@@ -0,0 +1,52 @@
+#!/usr/bin/env ruby
+#--
+# 
+# R-Bus is a native Ruby implementation of the D-Bus protocol.
+# Copyright (C) 2007 Kristoffer Lundén (kristoffer.lunden@gmail.com)
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA  02110-1301, USA.  A copy of the GNU General Public License is
+# also available at http://www.gnu.org/copyleft/gpl.html.
+#
+#++
+#
+#
+# RBus Example:
+# Asynchronous calls, in loops
+# Prints RB song 10 times in random order
+#
+
+# Add lib to load path during developmennt
+$: << '../lib/'
+
+require 'rbus'
+
+session_bus = RBus.session_bus()
+
+# Rhythmbox player
+rb = session_bus.get_object('org.gnome.Rhythmbox', '/org/gnome/Rhythmbox/Player')
+rb.interface!('org.gnome.Rhythmbox.Player')
+
+# Async calls, should be run in parallell
+10.times do |i|
+  rb.getPlayingUri() do |uri|
+    sleep(rand(2))
+    puts "#{i}: #{uri}"
+  end
+end
+
+# Give it time to finish
+sleep(2)
+

data/examples/glib_async_rb_loop.rb

@@ -0,0 +1,57 @@
+#!/usr/bin/env ruby
+#--
+# 
+# R-Bus is a native Ruby implementation of the D-Bus protocol.
+# Copyright (C) 2007 Kristoffer Lundén (kristoffer.lunden@gmail.com)
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA  02110-1301, USA.  A copy of the GNU General Public License is
+# also available at http://www.gnu.org/copyleft/gpl.html.
+#
+#++
+#
+#
+# RBus Example:
+# Asynchronous calls, in loops
+# Prints RB song 10 times in random order
+#
+
+# Add lib to load path during developmennt
+$: << '../lib/'
+
+require 'rbus/glib'
+
+session_bus = RBus.session_bus()
+
+# Rhythmbox player
+rb = session_bus.get_object('org.gnome.Rhythmbox', '/org/gnome/Rhythmbox/Player')
+rb.interface!('org.gnome.Rhythmbox.Player')
+
+# Or we won't see anything... :)
+STDOUT.sync=true
+
+# Async calls, however in with a GLib mainloop
+# it will still be exectued in sequence, and not
+# until the mainloop is started.
+10.times do |i|
+  rb.getPlayingUri() do |uri|
+    sleep(rand(2))
+    puts "#{i}: #{uri}"
+  end
+end
+
+# Start the mainloop for GLib
+# Same as Gtk.main
+RBus.mainloop

data/examples/glib_rhythmbox.rb

@@ -0,0 +1,54 @@
+#--
+# 
+# R-Bus is a native Ruby implementation of the D-Bus protocol.
+# Copyright (C) 2007 Kristoffer Lundén (kristoffer.lunden@gmail.com)
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA  02110-1301, USA.  A copy of the GNU General Public License is
+# also available at http://www.gnu.org/copyleft/gpl.html.
+#
+#++
+#
+#
+# RBus Example:
+# - GLib main loop
+# - Display song info from Rhytmbox on song change
+# - exact same code, except include 'rbus/glib'
+
+
+# Add lib to load path during developmennt
+$: << '../lib/'
+
+require 'rbus/glib'
+
+session_bus = RBus.session_bus()
+
+rb_player = session_bus.get_object('org.gnome.Rhythmbox', '/org/gnome/Rhythmbox/Player')
+rb_player.interface!('org.gnome.Rhythmbox.Player')
+
+rb_shell = session_bus.get_object('org.gnome.Rhythmbox', '/org/gnome/Rhythmbox/Shell')
+rb_shell.interface!('org.gnome.Rhythmbox.Shell')
+
+rb_player.connect!("playingUriChanged") { |uri|
+  properties = rb_shell.getSongProperties(uri)
+  duration = Time.at(properties['duration'].to_i).strftime("%M:%S")
+  artist = properties['artist']
+  title = properties['title']
+  puts "Now playing: #{artist} - #{title} (#{duration})"
+  printf "File-size: %.2f MB\n", properties['file-size'].to_f/1024/1024
+}
+
+
+RBus.mainloop

data/examples/hal_device_info.rb

@@ -0,0 +1,54 @@
+#!/usr/bin/env ruby
+#--
+# 
+# R-Bus is a native Ruby implementation of the D-Bus protocol.
+# Copyright (C) 2007 Kristoffer Lundén (kristoffer.lunden@gmail.com)
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA  02110-1301, USA.  A copy of the GNU General Public License is
+# also available at http://www.gnu.org/copyleft/gpl.html.
+#
+#++
+#
+#
+# RBus Example:
+# Get information about a random HAL device.
+#
+
+# Add lib to load path during development
+$: << '../lib/'
+
+require 'rbus'
+
+bus = RBus.system_bus()
+
+# Connect to HAL Manager first:
+hal = bus.get_object('org.freedesktop.Hal','/org/freedesktop/Hal/Manager')
+hal.interface!('org.freedesktop.Hal.Manager')
+
+# Get a random device from list:
+devs = hal.GetAllDevices()
+random = devs[rand(devs.size)]
+
+# Get object for that device:
+random_device = bus.get_object('org.freedesktop.Hal',random)
+random_device.interface!('org.freedesktop.Hal.Device')
+
+# Define method manually, as HAL doesn't provide introspection, at least
+# in my version.
+random_device.method!(:GetProperty, 's')
+
+# Print info and device path:
+puts ("#{random_device.GetProperty('info.product')} (#{random})")

data/examples/listnames.rb

@@ -0,0 +1,37 @@
+#!/usr/bin/env ruby
+#--
+# 
+# R-Bus is a native Ruby implementation of the D-Bus protocol.
+# Copyright (C) 2007 Kristoffer Lundén (kristoffer.lunden@gmail.com)
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA  02110-1301, USA.  A copy of the GNU General Public License is
+# also available at http://www.gnu.org/copyleft/gpl.html.
+#
+#++
+#
+#
+# RBus Example:
+# A Bus is a Proxy too...
+#
+
+# Add lib to load path during developmennt
+$: << '../lib/'
+
+require 'rbus'
+
+session_bus = RBus.session_bus()
+puts session_bus.ListNames
+