Index: http-transport.scm
==================================================================
--- http-transport.scm
+++ http-transport.scm
@@ -13,11 +13,13 @@
 (use sqlite3 srfi-1 posix regex regex-case srfi-69 hostinfo md5 message-digest)
 (import (prefix sqlite3 sqlite3:))
 
 (use spiffy uri-common intarweb http-client spiffy-request-vars)
 
+;; Configurations for server
 (tcp-buffer-size 2048)
+(max-connections 2048) 
 
 (declare (unit http-transport))
 
 (declare (uses common))
 (declare (uses db))

Index: megatest.scm
==================================================================
--- megatest.scm
+++ megatest.scm
@@ -8,11 +8,11 @@
 ;;  PURPOSE.
 
 ;; (include "common.scm")
 ;; (include "megatest-version.scm")
 
-(use sqlite3 srfi-1 posix regex regex-case srfi-69 base64 format readline apropos json) ;; (srfi 18) extras)
+(use sqlite3 srfi-1 posix regex regex-case srfi-69 base64 format readline apropos json http-client) ;; (srfi 18) extras)
 (import (prefix sqlite3 sqlite3:))
 (import (prefix base64 base64:))
 
 ;; (use zmq)
 
@@ -33,12 +33,13 @@
 (include "key_records.scm")
 (include "db_records.scm")
 (include "megatest-fossil-hash.scm")
 
 ;; (use trace dot-locking)
-;; (trace
-;;  tests:match)
+;;  (trace
+;;   tests:match
+;;   runs:run-tests)
 ;;  db:teststep-set-status!
 ;;  db:open-test-db-by-test-id
 ;;  db:test-get-rundir-from-test-id
 ;;  cdb:tests-register-test
 ;;  cdb:tests-update-uname-host
@@ -622,12 +623,11 @@
    "run a test" 
    (lambda (target runname keys keynames keyvallst)
      (runs:run-tests target
 		     runname
 		     (args:get-arg "-runtests")
-		     (or (args:get-arg "-testpatt")
-			 (args:get-arg "-runtests"))
+		     (args:get-arg "-runtests")
 		     user
 		     args:arg-hash))))
 
 ;;======================================================================
 ;; Rollup into a run
@@ -1056,10 +1056,12 @@
       (set! *didsomething* #t)))
 
 ;;======================================================================
 ;; Exit and clean up
 ;;======================================================================
+
+(if *runremote* (close-all-connections!))
 
 ;; this is the socket if we are a client
 ;; (if (and *runremote*
 ;; 	 (socket? *runremote*))
 ;;     (close-socket *runremote*))

Index: tests/fdktestqa/testqa/Makefile
==================================================================
--- tests/fdktestqa/testqa/Makefile
+++ tests/fdktestqa/testqa/Makefile
@@ -1,3 +1,25 @@
-
+BINDIR=$(PWD)/../../../bin
+MEGATEST=$(BINDIR)/megatest
+DASHBOARD=$(BINDIR)/dashboard
 all :
-	megatest -runtests % -target a/b :runname c
+	$(MEGATEST) -runtests % -target a/b :runname c
+
+bigbig :
+	for tn in a b c d;do \
+	   ($(MEGATEST) -runtests % -target a/b :runname $tn & ) ; \
+	done
+
+bigrun :
+	$(MEGATEST) -runtests bigrun -target a/bigrun :runname a
+
+bigrun2 :
+	$(MEGATEST) -runtests bigrun2 -target a/bigrun2 :runname a
+
+dashboard : 
+	$(DASHBOARD) -rows 20 &
+
+compile :
+	(cd ../../..;make && make install)
+
+clean :
+	rm -rf ../simple*/*/* megatest.db

Index: tests/fdktestqa/testqa/tests/bigrun2/step1.sh
==================================================================
--- tests/fdktestqa/testqa/tests/bigrun2/step1.sh
+++ tests/fdktestqa/testqa/tests/bigrun2/step1.sh
@@ -1,7 +1,9 @@
 #!/bin/sh
-prev_test=`$MT_MEGATEST -test-paths -target $MT_TARGET :runname $MT_RUNNAME -testpatt bigrun/$NUMBER`
-if [ -e $prev_test/testconfig ]; then
-  exit 0
-else
-  exit 1
-fi
+# prev_test=`$MT_MEGATEST -test-paths -target $MT_TARGET :runname $MT_RUNNAME -testpatt bigrun/$NUMBER`
+# if [ -e $prev_test/testconfig ]; then
+#   exit 0
+# else
+#   exit 1
+# fi
+
+exit 0

Index: tests/fdktestqa/testqa/tests/bigrun2/testconfig
==================================================================
--- tests/fdktestqa/testqa/tests/bigrun2/testconfig
+++ tests/fdktestqa/testqa/tests/bigrun2/testconfig
@@ -2,18 +2,18 @@
 [ezsteps]
 step1 step1.sh
 
 # Test requirements are specified here
 [requirements]
-waiton bigrun
+# waiton bigrun
 priority 0
 mode itemmatch
 
 
 # Iteration for your tests are controlled by the items section
 [items]
-NUMBER #{scheme (string-intersperse (map number->string (sort (let loop ((a 0)(res '()))(if (< a 150)(loop (+ a 1)(cons a res)) res)) >)) " ")}
+NUMBER #{scheme (string-intersperse (map number->string (sort (let loop ((a 0)(res '()))(if (< a 1500)(loop (+ a 1)(cons a res)) res)) >)) " ")}
 
 # test_meta is a section for storing additional data on your test
 [test_meta]
 author matt
 owner  matt