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@7783 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 26 insertions, 0 deletions

diff --git a/sample/webrick/httpproxy.rb b/sample/webrick/httpproxy.rb
new file mode 100644
index 0000000000..bca0cc4626
--- /dev/null
+++ b/sample/webrick/httpproxy.rb
@@ -0,0 +1,26 @@
+require "webrick"
+require "webrick/httpproxy"
+
+# :ProxyContentHandler will be invoked before sending
+# response to User-Agenge. You can inspect the pair of
+# request and response messages (or can edit the response
+# message if necessary).
+
+pch = Proc.new{|req, res|
+  p [ req.request_line, res.status_line ]
+}
+
+def upstream_proxy
+  if prx = ENV["http_proxy"]
+    return URI.parse(prx)
+  end
+  return nil
+end
+
+httpd = WEBrick::HTTPProxyServer.new(
+  :Port     => 10080,
+  :ProxyContentHandler => pch,
+  :ProxyURI => upstream_proxy
+)
+Signal.trap(:INT){ httpd.shutdown }
+httpd.start