# Author::    Nicolas Despres  <nicolas.despres@gmail.com>.
# Copyright:: Copyright (c) 2004, 2005 TTK team. All rights reserved.
# License::   LGPL
# $Id: sub_testable.rb 567 2005-04-13 08:00:06Z polrop $


module TTK

  module Services

    class DRbService < DRb::DRbService

      module SubTestable

        def sub_testable_initialize
          @sub_testers = {}
          @sub_testers.extend(Mutex_m)
        end

        def sub_testable_set(sub_tester_uris)
          @sub_testers.clear
          sub_tester_uris.each do |sub_tester_uri|
          @sub_testers[sub_tester_uri] = DRbObject.new(nil,
                                                       sub_tester_uri.to_s)
          end
        end

        def self.included?(mod)
          mod.module_eval do
            attr_reader :sub_testers
          end
        end

      end # module SubTestable

    end # class DRbService

  end # module Services

end # module TTK