From 49981da0edf3cb142079ee9341640bd5b798c880 Mon Sep 17 00:00:00 2001
From: Eric Wong <normalperson@yhbt.net>
Date: Sat, 17 Oct 2009 22:42:56 -0700
Subject: tests: rack.input hammer concurrency testing

---
 t/lib-rack-input-hammer.sh         | 38 +++++++++++++++++++++++++++++++++
 t/t1100-thread-pool-rack-input.sh  |  2 ++
 t/t2100-thread-spawn-rack-input.sh |  2 ++
 t/t3100-revactor-rack-input.sh     |  2 ++
 t/t3100-revactor-tee-input.sh      | 43 --------------------------------------
 t/t4100-rev-rack-input.sh          | 43 +-------------------------------------
 6 files changed, 45 insertions(+), 85 deletions(-)
 create mode 100644 t/lib-rack-input-hammer.sh
 create mode 100755 t/t1100-thread-pool-rack-input.sh
 create mode 100755 t/t2100-thread-spawn-rack-input.sh
 create mode 100755 t/t3100-revactor-rack-input.sh
 delete mode 100755 t/t3100-revactor-tee-input.sh

(limited to 't')

diff --git a/t/lib-rack-input-hammer.sh b/t/lib-rack-input-hammer.sh
new file mode 100644
index 0000000..11f0479
--- /dev/null
+++ b/t/lib-rack-input-hammer.sh
@@ -0,0 +1,38 @@
+nr_client=${nr_client-4}
+. ./test-lib.sh
+test -r random_blob || die "random_blob required, run with 'make $0'"
+
+eval $(unused_listen)
+rtmpfiles unicorn_config curl_out curl_err r_err r_out pid
+
+cat > $unicorn_config <<EOF
+listen "$listen"
+pid "$pid"
+stderr_path "$r_err"
+stdout_path "$r_out"
+Rainbows! do
+  use :$model
+end
+EOF
+
+rainbows -D sha1.ru -c $unicorn_config
+wait_for_pid $pid
+
+start=$(date +%s)
+for i in $(awk "BEGIN{for(i=0;i<$nr_client;++i) print i}" </dev/null)
+do
+	(
+		curl -sSf -T- http://$listen/$i \
+		  < random_blob >> $curl_out 2>> $curl_err
+	) &
+done
+wait
+echo elapsed=$(( $(date +%s) - $start ))
+
+kill $(cat $pid)
+test $nr_client -eq $(wc -l < $curl_out)
+test 1 -eq $(sort < $curl_out | uniq | wc -l)
+blob_sha1=$( expr "$(sha1sum < random_blob)" : '\([a-f0-9]\+\)')
+echo blob_sha1=$blob_sha1
+test x"$blob_sha1" = x"$(sort < $curl_out | uniq)"
+! grep Error $r_err
diff --git a/t/t1100-thread-pool-rack-input.sh b/t/t1100-thread-pool-rack-input.sh
new file mode 100755
index 0000000..4d6d4c9
--- /dev/null
+++ b/t/t1100-thread-pool-rack-input.sh
@@ -0,0 +1,2 @@
+#!/bin/sh
+. ./lib-rack-input-hammer.sh
diff --git a/t/t2100-thread-spawn-rack-input.sh b/t/t2100-thread-spawn-rack-input.sh
new file mode 100755
index 0000000..4d6d4c9
--- /dev/null
+++ b/t/t2100-thread-spawn-rack-input.sh
@@ -0,0 +1,2 @@
+#!/bin/sh
+. ./lib-rack-input-hammer.sh
diff --git a/t/t3100-revactor-rack-input.sh b/t/t3100-revactor-rack-input.sh
new file mode 100755
index 0000000..4d6d4c9
--- /dev/null
+++ b/t/t3100-revactor-rack-input.sh
@@ -0,0 +1,2 @@
+#!/bin/sh
+. ./lib-rack-input-hammer.sh
diff --git a/t/t3100-revactor-tee-input.sh b/t/t3100-revactor-tee-input.sh
deleted file mode 100755
index 5b580b5..0000000
--- a/t/t3100-revactor-tee-input.sh
+++ /dev/null
@@ -1,43 +0,0 @@
-#!/bin/sh
-nr_client=${nr_client-25}
-nr_actor=${nr_actor-50}
-
-. ./test-lib.sh
-test -r random_blob || die "random_blob required, run with 'make $0'"
-
-eval $(unused_listen)
-rtmpfiles unicorn_config curl_out curl_err r_err r_out pid
-
-cat > $unicorn_config <<EOF
-listen "$listen"
-pid "$pid"
-stderr_path "$r_err"
-stdout_path "$r_out"
-Rainbows! do
-  use :Revactor
-  worker_connections $nr_actor
-end
-EOF
-
-echo pid=$pid
-rainbows -D sha1.ru -c $unicorn_config
-wait_for_pid $pid
-
-start=$(date +%s)
-for i in $(awk "BEGIN{for(i=0;i<$nr_client;++i) print i}" </dev/null)
-do
-	(
-		curl -sSf -T- http://$listen/$i \
-		  < random_blob >> $curl_out 2>> $curl_err
-	) &
-done
-wait
-echo elapsed=$(( $(date +%s) - $start ))
-
-kill $(cat $pid)
-test $nr_client -eq $(wc -l < $curl_out)
-test 1 -eq $(sort < $curl_out | uniq | wc -l)
-blob_sha1=$( expr "$(sha1sum < random_blob)" : '\([a-f0-9]\+\)')
-echo blob_sha1=$blob_sha1
-test x"$blob_sha1" = x"$(sort < $curl_out | uniq)"
-! grep Error $r_err
diff --git a/t/t4100-rev-rack-input.sh b/t/t4100-rev-rack-input.sh
index 2368269..4d6d4c9 100755
--- a/t/t4100-rev-rack-input.sh
+++ b/t/t4100-rev-rack-input.sh
@@ -1,43 +1,2 @@
 #!/bin/sh
-nr_client=${nr_client-25}
-nr=${nr-50}
-
-. ./test-lib.sh
-test -r random_blob || die "random_blob required, run with 'make $0'"
-
-eval $(unused_listen)
-rtmpfiles unicorn_config curl_out curl_err r_err r_out pid
-
-cat > $unicorn_config <<EOF
-listen "$listen"
-pid "$pid"
-stderr_path "$r_err"
-stdout_path "$r_out"
-Rainbows! do
-  use :Rev
-  worker_connections $nr
-end
-EOF
-
-echo pid=$pid
-rainbows -D sha1.ru -c $unicorn_config
-wait_for_pid $pid
-
-start=$(date +%s)
-for i in $(awk "BEGIN{for(i=0;i<$nr_client;++i) print i}" </dev/null)
-do
-	(
-		curl -sSf -T- http://$listen/$i \
-		  < random_blob >> $curl_out 2>> $curl_err
-	) &
-done
-wait
-echo elapsed=$(( $(date +%s) - $start ))
-
-kill $(cat $pid)
-test $nr_client -eq $(wc -l < $curl_out)
-test 1 -eq $(sort < $curl_out | uniq | wc -l)
-blob_sha1=$( expr "$(sha1sum < random_blob)" : '\([a-f0-9]\+\)')
-echo blob_sha1=$blob_sha1
-test x"$blob_sha1" = x"$(sort < $curl_out | uniq)"
-! grep Error $r_err
+. ./lib-rack-input-hammer.sh
-- 
cgit v1.2.3-24-ge0c7