This commit was manufactured by cvs2svn to create branch 'ruby_1_8'.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@7710 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 37 insertions, 0 deletions

diff --git a/test/xmlrpc/webrick_testing.rb b/test/xmlrpc/webrick_testing.rb
new file mode 100644
index 0000000000..a6830cece1
--- /dev/null
+++ b/test/xmlrpc/webrick_testing.rb
@@ -0,0 +1,37 @@
+require 'timeout'
+
+module WEBrick_Testing
+  class DummyLog < WEBrick::BasicLog
+    def initialize() super(self) end
+    def <<(*args) end
+  end
+  
+  def start_server(config={})
+    raise "already started" if @__server
+    @__started = false
+
+    Thread.new {
+      @__server = WEBrick::HTTPServer.new(
+        { 
+          :Logger => DummyLog.new,
+          :AccessLog => [],
+          :StartCallback => proc { @__started = true }
+        }.update(config))
+      yield @__server 
+      @__server.start
+      @__started = false
+    }
+
+    Timeout.timeout(5) {
+      nil until @__started # wait until the server is ready
+    }
+  end
+
+  def stop_server
+    Timeout.timeout(5) {
+      @__server.shutdown
+      nil while @__started # wait until the server is down
+    }
+    @__server = nil
+  end
+end