about summary refs log tree commit homepage
path: root/t
diff options
context:
space:
mode:
authorEric Wong <normalperson@yhbt.net>2011-01-10 18:07:21 -0800
committerEric Wong <normalperson@yhbt.net>2011-01-11 13:24:23 -0800
commit69d8ec2f167eb99a1efec4a770ba5951e7c366f0 (patch)
tree4a809940fdcfa1f596d48401f7d7e2426ae3453b /t
parentbf6eb8f1f79ed57ee317b2e6f73c70a59708739f (diff)
downloadrainbows-69d8ec2f167eb99a1efec4a770ba5951e7c366f0.tar.gz
The lack of an equivlent to EM::Deferrable prevents us from
doing streaming/trickling responses, but a one-shot body
should work fine for Coolio and generating dynamic responses.
Diffstat (limited to 't')
-rw-r--r--t/async_chunk_app.ru42
-rw-r--r--t/t0402-async-keepalive.sh (renamed from t/t0402-em-async-keepalive.sh)44
2 files changed, 72 insertions, 14 deletions
diff --git a/t/async_chunk_app.ru b/t/async_chunk_app.ru
index 26b9915..007d7b2 100644
--- a/t/async_chunk_app.ru
+++ b/t/async_chunk_app.ru
@@ -17,27 +17,45 @@ class DeferrableChunkBody
   def finish
     @body_callback.call("0\r\n\r\n")
   end
-end
+end if defined?(EventMachine)
 
 class AsyncChunkApp
   def call(env)
-    body = DeferrableChunkBody.new
-    body.callback { body.finish }
     headers = {
       'Content-Type' => 'text/plain',
       'Transfer-Encoding' => 'chunked',
     }
-    EM.next_tick {
-      env['async.callback'].call([ 200, headers, body ])
-    }
-    EM.add_timer(1) {
-      body.call "Hello "
+    delay = env["HTTP_X_DELAY"].to_i
+
+    case env["rainbows.model"]
+    when :EventMachine, :NeverBlock
+      body = DeferrableChunkBody.new
+      body.callback { body.finish }
+      task = lambda {
+        env['async.callback'].call([ 200, headers, body ])
+        EM.add_timer(1) {
+          body.call "Hello "
 
-      EM.add_timer(1) {
-        body.call "World #{env['PATH_INFO']}\n"
-        body.succeed
+          EM.add_timer(1) {
+            body.call "World #{env['PATH_INFO']}\n"
+            body.succeed
+          }
+        }
       }
-    }
+      delay == 0 ? EM.next_tick(&task) : EM.add_timer(delay, &task)
+    when :Coolio
+      # Cool.io only does one-shot responses due to the lack of the
+      # equivalent of EM::Deferrables
+      body = [ "Hello ", "World #{env['PATH_INFO']}\n", '' ].map do |chunk|
+        "#{chunk.size.to_s(16)}\r\n#{chunk}\r\n"
+      end
+
+      next_tick = Coolio::TimerWatcher.new(delay, false)
+      next_tick.on_timer { env['async.callback'].call([ 200, headers, body ]) }
+      next_tick.attach(Coolio::Loop.default)
+    else
+      raise "Not supported: #{env['rainbows.model']}"
+    end
     nil
   end
 end
diff --git a/t/t0402-em-async-keepalive.sh b/t/t0402-async-keepalive.sh
index 24eb678..fdf4cbc 100644
--- a/t/t0402-em-async-keepalive.sh
+++ b/t/t0402-async-keepalive.sh
@@ -1,14 +1,15 @@
 #!/bin/sh
+DELAY=${DELAY-1}
 . ./test-lib.sh
 case $model in
-NeverBlock|EventMachine) ;;
+Coolio|NeverBlock|EventMachine) ;;
 *)
         t_info "skipping $T since it's not compatible with $model"
         exit 0
         ;;
 esac
 
-t_plan 9 "async_chunk_app test for test for EM"
+t_plan 11 "async_chunk_app test for test for $model"
 
 CONFIG_RU=async_chunk_app.ru
 
@@ -39,6 +40,31 @@ t_begin "async.callback supports pipelining" && {
         elapsed=$(( $t1 - $t0 ))
         t_info "elapsed=$elapsed $model.$0 ($t_current)"
         test 3 -eq "$(fgrep 'HTTP/1.1 200 OK' $tmp | wc -l)"
+        test 3 -eq "$(grep '^Hello ' $tmp | wc -l)"
+        test 3 -eq "$(grep 'World ' $tmp | wc -l)"
+}
+
+t_begin "async.callback supports pipelining with delay $DELAY" && {
+        rm -f $tmp
+        t0=$(date +%s)
+        (
+                cat $fifo > $tmp &
+                printf 'GET /0 HTTP/1.1\r\nX-Delay: %d\r\n' $DELAY
+                printf 'Host: example.com\r\n\r\n'
+                printf 'GET /1 HTTP/1.1\r\nX-Delay: %d\r\n' $DELAY
+                printf 'Host: example.com\r\n\r\n'
+                printf 'GET /2 HTTP/1.0\r\nX-Delay: %d\r\n' $DELAY
+                printf 'Host: example.com\r\n\r\n'
+                wait
+        ) | socat - TCP:$listen > $fifo
+        t1=$(date +%s)
+        elapsed=$(( $t1 - $t0 ))
+        min=$(( $DELAY * 3 ))
+        t_info "elapsed=$elapsed $model.$0 ($t_current) min=$min"
+        test $elapsed -ge $min
+        test 3 -eq "$(fgrep 'HTTP/1.1 200 OK' $tmp | wc -l)"
+        test 3 -eq "$(grep '^Hello ' $tmp | wc -l)"
+        test 3 -eq "$(grep 'World ' $tmp | wc -l)"
 }
 
 t_begin "async.callback supports keepalive" && {
@@ -52,6 +78,20 @@ t_begin "async.callback supports keepalive" && {
         rm -f $curl_err
 }
 
+t_begin "async.callback supports keepalive with delay $DELAY" && {
+        t0=$(date +%s)
+        curl -v --no-buffer -sSf -H "X-Delay: $DELAY" \
+          http://$listen/[0-2] > $tmp 2>> $curl_err
+        t1=$(date +%s)
+        elapsed=$(( $t1 - $t0 ))
+        min=$(( $DELAY * 3 ))
+        t_info "elapsed=$elapsed $model.$0 ($t_current) min=$min"
+        test $elapsed -ge $min
+        cmp $expect $tmp
+        test 2 -eq "$(fgrep 'Re-using existing connection!' $curl_err |wc -l)"
+        rm -f $curl_err
+}
+
 t_begin "send async requests off in parallel" && {
         t0=$(date +%s)
         curl --no-buffer -sSf http://$listen/[0-2] > $a 2>> $curl_err &