rbus 0.1.0

data/spec/auth_spec.rb

@@ -0,0 +1,123 @@
+#--
+# 
+# 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.
+#
+#++
+#
+require File.dirname(__FILE__) + '/helpers/spec_helper'
+require 'etc'
+require 'digest/sha1'
+
+module RBus
+  context "Auth" do
+    setup do
+      @transport = mock('Transport')
+      @transport.stub!(:sendline)
+      @transport.stub!(:send)
+      @state_machine = mock('StateMachine')
+      Auth::StateMachine.stub!(:new).and_return(@state_machine)
+      @state_machine.stub!(:authorize).and_raise(AuthException)
+    end
+    specify "should raise on nil transport" do
+      lambda{Auth.authorize(nil)}.should_raise AuthException
+    end
+    
+    specify "should close socket on exception" do
+      @transport.should_receive(:close)
+      begin
+        Auth.authorize(@transport)
+      rescue AuthException
+      end
+    end
+    
+  end
+  
+  context "Dummy" do
+    setup do
+      @dummy = Auth::Dummy.new
+    end
+    specify "auth should reply nil, nil, :REJECTED" do
+      @dummy.auth.should == [nil, nil, :REJECTED]
+    end
+    specify "should not have data" do
+      @dummy.should_not_respond_to :data
+    end
+  end
+
+  context "EXTERNAL" do
+    setup do
+      @ex = Auth::External.new
+    end
+    specify "auth should reply EXTERNAL, UID, :OK" do
+      @ex.auth.should == ['EXTERNAL', Process.uid, :OK]
+    end
+    specify "should not have data" do
+      @ex.should_not_respond_to :data
+    end
+  end
+
+  context "DBUS_COOKIE_SHA1" do
+    setup do
+      @dbs = Auth::DBusCookieSHA1.new
+    end
+    specify "auth should reply DBUS_COOKIE_SHA1, username, :DATA" do
+      @dbs.auth.should == ['DBUS_COOKIE_SHA1', Etc.getlogin, :DATA]
+    end
+    
+    specify "should respond to data" do
+      @dbs.should_respond_to :data
+    end
+       
+    specify "should read cookie file and return proper digest + :OK" do
+      seed = rand(255) # for extra fun
+      id = '1157262198'
+      timestamp = '1173310572'
+      cookie = '173d01b6f806051f36daee8336a08d5754ac021ac3309e19'
+      
+      File.stub!(:foreach).and_yield("#{id} #{timestamp} #{cookie}")
+      
+      s_challenge = Array.new(16).map{|obj|obj=rand(255).to_s}.join
+      data = "org_freedesktop_general 1157262198 #{s_challenge}"
+      
+      srand(seed)
+      c_challenge = Array.new(s_challenge.length/2).map{|obj|obj=rand(255).to_s}.join
+      sha = Digest::SHA1.hexdigest("#{s_challenge}:#{c_challenge}:#{cookie}")
+      
+      srand(seed)
+      @dbs.data(data).should == ["#{c_challenge} #{sha}", :OK]
+    end
+  end
+  
+  context "Auth::Command" do
+    specify "should decode DATA" do
+      data = 'Some test data'
+      encoded = data.unpack('H*')[0]
+      Auth::Command.new("DATA #{encoded}").data.should == data
+    end
+  
+    specify "should not decode REJECTED data" do
+      Auth::Command.new('REJECTED EXTERNAL').data.should == 'EXTERNAL'
+    end
+    
+    specify "should not decode OK data" do
+      Auth::Command.new('OK 7300ef45753074d050c8465c31cb2700').data.should == '7300ef45753074d050c8465c31cb2700'
+    end
+  end
+end

data/spec/bus_spec.rb

@@ -0,0 +1,178 @@
+#--
+# 
+# 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.
+#
+#++
+#
+require File.dirname(__FILE__) + '/helpers/spec_helper'
+require File.dirname(__FILE__) + '/helpers/bus_mocks'
+
+module RBus
+  
+  module BusSpecHelper
+    def setup_mocks
+      @transport = mock('Transport')
+      @transport.stub!(:send)
+      @transport.stub!(:read)
+      
+      @message_reader = mock('Message::Reader')
+      @message_reader.stub!(:read_message)
+      Message::Reader.stub!(:new).and_return(@message_reader)
+      
+      message_loop = mock('Mainloop', :null_object => true)
+      #message_loop.stub!(:run).and_return(message_loop)
+      message_loop.stub!(:send_message)
+      Mainloop.stub!(:new).and_return(message_loop)
+
+      @proxy = mock('Proxy')
+      Bus.stub!(:get_object).and_return(@proxy)
+
+      Transport.stub!(:connect).and_return(@transport)
+      Auth.stub!(:authorize).and_return(fake_guid)      
+    end
+  
+    def fake_guid
+      "deadbeef" * 4
+    end
+  end
+    
+  context "Bus" do
+    include BusSpecHelper
+    setup do
+      setup_mocks
+      @bus = Bus.new('unix:')
+    end
+    
+    specify "should be a Bus object" do
+      @bus.should_be_an_instance_of(Bus)
+    end
+    
+    specify "should respond to get_object" do
+      @bus.should_respond_to :get_object
+    end
+    
+    specify "should barf on empty address" do
+      lambda{Bus.new('')}.should_raise InvalidAddressException
+    end
+    
+  end
+
+  context "Bus address splitting" do
+    include BusSpecHelper
+    setup do
+      setup_mocks
+    end
+
+    specify "should handle multiple separated by ;" do
+      Transport.should_receive(:connect).twice.with(/test/).and_return(@transport)
+      @bus = MockBus.new('test;test2')
+    end
+  end
+
+  context "Session bus" do
+    include BusSpecHelper
+    setup do
+      setup_mocks
+      @bus = RBus.session_bus
+    end
+
+    specify "should be a Bus object" do
+      @bus.should_be_a_kind_of(Bus)
+    end
+    
+    specify "should be a singleton" do
+      @bus.should == (RBus.session_bus)
+    end
+      
+    specify "should be a SessionBus object" do
+      @bus.should_be_an_instance_of(SessionBus)
+    end
+
+  end
+
+  context "Session bus when instanciated" do
+    include BusSpecHelper
+
+    setup do
+      setup_mocks
+    end
+    
+    specify "should use ENV variable if exists" do
+      ENV['DBUS_SESSION_BUS_ADDRESS'] = 'test'
+      Transport.should_receive(:connect).once.with('test').and_return(@transport)
+      @bus = MockSessionBus.new
+    end
+
+=begin TODO
+    The address of the login session message bus is given in the DBUS_SESSION_BUS_ADDRESS environment variable. If that 
+    variable is not set, applications may also try to read the address from the X Window System root window property
+    _DBUS_SESSION_BUS_ADDRESS. The root window property must have type STRING. The environment variable should have
+    precedence over the root window property.
+    
+    $ xprop -root _DBUS_SESSION_BUS_ADDRESS
+    --> _DBUS_SESSION_BUS_ADDRESS(STRING) = "somethingsomething"
+=end
+
+  end
+
+
+
+  context "System bus" do
+    include BusSpecHelper
+    setup do
+      setup_mocks
+      @bus = RBus.system_bus
+    end
+
+    specify "should be a Bus object" do
+      @bus.should_be_a_kind_of(Bus)
+    end
+    
+    specify "should be a singleton" do
+      @bus.should == (RBus.system_bus)
+    end
+      
+    specify "should be a SystemBus object" do
+      @bus.should_be_an_instance_of(SystemBus)
+    end
+
+  end
+
+  context "System bus when instanciated" do
+    include BusSpecHelper
+
+    setup do
+      setup_mocks
+    end
+    
+    specify "should use ENV variable if exists" do
+      ENV['DBUS_SYSTEM_BUS_ADDRESS'] = 'test'
+      Transport.should_receive(:connect).once.with('test').and_return(@transport)
+      @bus = MockSystemBus.new
+    end
+    
+    specify "should use well-known address if no ENV" do
+      ENV.delete('DBUS_SYSTEM_BUS_ADDRESS')
+      Transport.should_receive(:connect).once.with('unix:path=/var/run/dbus/system_bus_socket').and_return(@transport)
+      @bus = MockSystemBus.new
+    end
+    
+  end
+end

data/spec/helpers/bus_mocks.rb

@@ -0,0 +1,64 @@
+#--
+# 
+# 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.
+#
+#++
+#
+# Mock object of the generic Bus to test parsing
+class MockBus < RBus::Bus
+  attr_reader :addresses
+  
+  def initialize(server_address)
+    @addresses = []
+    super
+  end
+  
+  def parse_address(address)
+    @addresses << address
+  end
+end
+
+# Mock objects of the system and session buses in order
+# to be able to test Singletons
+
+class MockSystemBus < RBus::SystemBus
+
+  def self.new
+    new_object = self.allocate
+    new_object.initialize
+    new_object
+  end
+  public_class_method :allocate
+  public :initialize
+
+end
+
+class MockSessionBus < RBus::SessionBus
+
+  def self.new
+    new_object = self.allocate
+    new_object.initialize
+    new_object
+  end
+  public_class_method :allocate
+  public :initialize
+
+end
+

data/spec/helpers/spec_helper.rb

@@ -0,0 +1,24 @@
+#--
+# 
+# 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.
+#
+#++
+#
+require File.join(File.dirname(__FILE__), '..', '..', 'lib', 'rbus')

data/spec/mainloop_spec.rb

@@ -0,0 +1,74 @@
+#--
+# 
+# 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.
+#
+#++
+#
+require File.dirname(__FILE__) + '/helpers/spec_helper'
+
+module RBus
+  module Message
+    context "MainlLoop" do
+      setup do
+        @transport = mock('Transport')
+        @transport.stub!(:send)
+        @transport.stub!(:read)
+       
+        @message = mock('Message', :null_object => true)
+        @message.stub!(:serial).and_return(1)
+        @message.stub!(:message).and_return("string")
+        
+        @message.stub!(:destination).and_return(":1.31")
+        Bus::NAMES[0] = ':1.31'
+        
+        @message_reader = mock('Message::Reader', :null_object => true)
+        @message_reader.stub!(:read_message).and_return(@message)
+        Reader.stub!(:new).and_return(@message_reader)
+        
+        @message_writer = mock('Message::Writer')
+        @message_writer.stub!(:send_message)
+        Writer::stub!(:new).and_return(@message_writer)
+        
+        @message_loop = Mainloop.new(@transport)
+        
+        Thread.abort_on_exception = true
+      end
+      
+      specify "should be instance of Mainloop" do
+        @message_loop.should_be_an_instance_of(Mainloop)
+      end
+
+      specify "should receive reply in sync" do
+        @message_loop.send_message(@message).should == @message
+      end
+      
+      specify "should receive reply in async" do
+        callback = mock('Proc')
+        callback.should_receive(:call).with(@message)
+        @message_loop.send_message(@message, callback)
+      end
+      
+      teardown do
+        Thread.abort_on_exception = false
+      end
+    end
+    
+  end
+end