Index: Makefile
==================================================================
--- Makefile
+++ Makefile
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or
@@ -17,22 +19,26 @@
 # rm <files>.o ; make install CSCOPTS='-profile' ; ... ;  chicken-profile | less
 SHELL=/bin/bash
 PREFIX=$(PWD)
 CSCOPTS=
 INSTALL=install
-SRCFILES = common.scm items.scm launch.scm \
+SRCFILES = common.o items.scm launch.scm \
    ods.scm runconfig.scm server.scm configf.scm \
    db.scm keys.scm margs.scm megatest-version.scm \
    process.scm runs.scm tasks.scm tests.scm genexample.scm \
    http-transport.scm filedb.scm tdb.scm \
    client.scm mt.scm \
-   ezsteps.scm lock-queue.scm sdb.scm \
+   ezsteps.scm lock-queue.scm \
    rmt.scm api.scm subrun.scm \
    portlogger.scm archive.scm env.scm diff-report.scm cgisetup/models/pgdb.scm
 
-# module source files
-MSRCFILES = ftail.scm
+# sdb.scm \
+# module source files, NOTE: do not put ftail in this list yet!
+MSRCFILES = mtdb.scm mtcommon.scm mtconfigf.scm
+
+# mtest module source files actually used by mtest building 
+MTMSRCFILES = 
 
 # Eggs to install (straightforward ones)
 EGGS=matchable readline apropos base64 regex-literals format regex-case test coops trace csv \
 dot-locking posix-utils posix-extras directory-utils hostinfo tcp-server rpc csv-xml fmt \
 json md5 awful http-client spiffy uri-common intarweb spiffy-request-vars \
@@ -42,12 +48,13 @@
 
 OFILES   = $(SRCFILES:%.scm=%.o)
 GOFILES  = $(GUISRCF:%.scm=%.o)
 
 MOFILES = $(addprefix mofiles/,$(MSRCFILES:%.scm=%.o))
+MTMOFILES =  $(addprefix mofiles/,$(MTMSRCFILES:%.scm=%.o))
 
-mofiles/%.o : %.scm
+mofiles/%.o : src/%.scm
 	mkdir -p mofiles
 	csc $(CSCOPTS) -J -c $< -o mofiles/$*.o
 
 ADTLSCR=mt_laststep mt_runstep mt_ezstep
 HELPERS=$(addprefix $(PREFIX)/bin/,$(ADTLSCR))
@@ -65,22 +72,21 @@
 PNGFILES = $(shell cd docs/manual;ls *png)
 
 #all : $(PREFIX)/bin/.$(ARCHSTR) mtest dboard mtut ndboard
 all : $(PREFIX)/bin/.$(ARCHSTR) mtest dboard mtut
 
-mtest: $(OFILES) readline-fix.scm megatest.o $(MOFILES) mofiles/ftail.o
-	csc $(CSCOPTS) $(OFILES) $(MOFILES) megatest.o -o mtest
-
-
-dboard : $(OFILES) $(GOFILES) dashboard.scm $(MOFILES)
-	csc $(CSCOPTS) $(OFILES) dashboard.scm $(GOFILES) $(MOFILES) -o dboard
-
-ndboard : newdashboard.scm $(OFILES) $(GOFILES)
-	csc $(CSCOPTS) $(OFILES) $(GOFILES) newdashboard.scm -o ndboard
-
-mtut: $(OFILES) megatest-fossil-hash.scm mtut.scm
-	csc $(CSCOPTS) $(OFILES) mtut.scm -o mtut
+mtest: $(OFILES) readline-fix.scm megatest.scm $(MTMOFILES) megatest-fossil-hash.scm
+	csc $(CSCOPTS) $(OFILES) $(MTMOFILES) megatest.scm -o mtest
+
+dboard : $(OFILES) $(GOFILES) dashboard.scm $(MTMOFILES)
+	csc $(CSCOPTS) $(OFILES) dashboard.scm $(GOFILES) $(MTMOFILES) -o dboard
+
+ndboard : newdashboard.scm $(MOFILES) gutils.o margs.o megatest-version.o 
+	csc $(CSCOPTS) $(MOFILES) gutils.o margs.o megatest-version.o newdashboard.scm -o ndboard
+
+mtut: megatest-fossil-hash.scm megatest-version.o margs.o mtut.scm $(MOFILES)
+	csc $(CSCOPTS) $(MOFILES) megatest-version.o margs.o mtut.scm -o mtut
 
 TCMTOBJS = \
 	api.o \
 	archive.o \
 	cgisetup/models/pgdb.o \
@@ -99,11 +105,10 @@
 	megatest-version.o \
 	ods.o \
 	portlogger.o \
 	process.o \
 	rmt.o \
-	rpc-transport.o \
 	runconfig.o \
 	runs.o \
 	server.o \
 	tasks.o \
 	tdb.o \
@@ -120,13 +125,14 @@
 $(PREFIX)/share/docs/megatest_manual.html : docs/manual/megatest_manual.html
 	mkdir -p $(PREFIX)/share/docs
 	$(INSTALL) docs/manual/megatest_manual.html $(PREFIX)/share/docs/megatest_manual.html
 	for png in $(PNGFILES);do $(INSTALL) docs/manual/$$png $(PREFIX)/share/docs/$$png;done
 
-js : java-script-lib/jquery-3.1.0.slim.min.js
+# add a fake dependency so this doens't copy everytime
+$(PREFIX)/share/js/jquery-3.1.0.slim.min.js : # .fslckout
 	mkdir -p $(PREFIX)/share/js
-	cp java-script-lib/jquery-3.1.0.slim.min.js $(PREFIX)/share/js/jquery-3.1.0.slim.min.js
+	fossil wiki export java-script-lib > $(PREFIX)/share/js/jquery-3.1.0.slim.min.js
 
 $(PREFIX)/share/db/mt-pg.sql : mt-pg.sql
 	mkdir -p $(PREFIX)/share/db
 	$(INSTALL) mt-pg.sql $(PREFIX)/share/db/mt-pg.sql
 
@@ -137,20 +143,22 @@
 # $(PREFIX)/bin/revtagfsl : utils/revtagfsl.scm
 #	csc utils/revtagfsl.scm -o $(PREFIX)/bin/revtagfsl
 
 # Special dependencies for the includes
 tests.o db.o launch.o runs.o dashboard-tests.o dashboard-context-menu.o dashboard-guimonitor.o dashboard-main.o monitor.o dashboard.o  \
-archive.o megatest.o : db_records.scm
+archive.o : db_records.scm
 tests.o runs.o dashboard.o dashboard-tests.o dashboard-context-menu.o dashboard-main.o  : run_records.scm
-db.o ezsteps.o keys.o launch.o megatest.o monitor.o runs-for-ref.o runs.o tests.o : key_records.scm
+db.o ezsteps.o keys.o launch.o monitor.o runs-for-ref.o runs.o tests.o : key_records.scm
 tests.o tasks.o dashboard-tasks.o : task_records.scm
 runs.o : test_records.scm
-megatest.o : megatest-fossil-hash.scm
+# megatest.o : megatest-fossil-hash.scm
 rmt.scm client.scm common.scm configf.scm dashboard-guimonitor.scm dashboard-tests.scm dashboard.scm db.scm dcommon.scm ezsteps.scm fs-transport.scm http-transport.scm index-tree.scm items.scm keys.scm launch.scm megatest.scm monitor.scm mt.scm newdashboard.scm runconfig.scm runs.scm server.scm tdb.scm tests.scm tree.scm : common_records.scm
 common_records.scm : altdb.scm
 vg.o dashboard.o : vg_records.scm
 dcommon.o : run_records.scm
+mofiles/mtdb.o : mofiles/mtcommon.o
+
 # Temporary while transitioning to new routine
 # runs.o : run-tests-queue-classic.scm  run-tests-queue-new.scm
 
 megatest-fossil-hash.scm : $(SRCFILES) megatest.scm *_records.scm
 	echo "(define megatest-fossil-hash \"$(MTESTHASH)\")" > megatest-fossil-hash.new
@@ -269,11 +277,11 @@
           $(PREFIX)/bin/.$(ARCHSTR)/dboard $(PREFIX)/bin/dashboard $(HELPERS) $(PREFIX)/bin/nbfake \
 	  $(PREFIX)/bin/nbfind $(PREFIX)/bin/loadrunner $(PREFIX)/bin/viewscreen $(PREFIX)/bin/mt_xterm \
 	  $(PREFIX)/share/docs/megatest_manual.html $(PREFIX)/bin/remrun \
 	  $(PREFIX)/share/docs/megatest_manual.html $(PREFIX)/bin/remrun $(PREFIX)/bin/mtutil \
 	  $(PREFIX)/bin/tcmt $(PREFIX)/share/db/mt-pg.sql \
-          js 
+          $(PREFIX)/share/js/jquery-3.1.0.slim.min.js 
 #         $(PREFIX)/bin/.$(ARCHSTR)/ndboard
 
 # $(PREFIX)/bin/newdashboard
 
 $(PREFIX)/bin/.$(ARCHSTR) : 
@@ -289,11 +297,11 @@
 
 $(MTQA_FOSSIL) :
 	fossil clone https://www.kiatoa.com/fossils/megatest_qa $(MTQA_FOSSIL)
 
 clean : 
-	rm -f $(OFILES) $(GOFILES) $(MOFILES) $(TCMTOBJS) $(PREFIX)/megatest $(PREFIX)/dashboard mtest mtutil dboard dboard.o megatest.o dashboard.o megatest-fossil-hash.* altdb.scm mofiles/*.o vg.o
+	rm -f $(OFILES) $(GOFILES) $(MOFILES) $(TCMTOBJS) $(PREFIX)/megatest $(PREFIX)/dashboard mtest mtutil dboard dboard.o megatest.o dashboard.o megatest-fossil-hash.* altdb.scm mofiles/*.o vg.o *import.scm
 
 #======================================================================
 # Make the records files
 #======================================================================
 
@@ -332,12 +340,10 @@
 
 deploytarg/dboard :  $(OFILES) $(GOFILES) dashboard.scm deploytarg/apropos.so
 	csc -deploy $(OFILES) $(GOFILES) dashboard.scm -o deploytarg
 	mv deploytarg/deploytarg deploytarg/dboard
 
-# DATASHAREO=configf.o common.o process.o tree.o dcommon.o margs.o launch.o gutils.o db.o synchash.o server.o \
-#            megatest-version.o tdb.o ods.o mt.o keys.o
 datashare-testing/sd : datashare.scm $(OFILES)
 	csc $(CSCOPTS) datashare.scm $(OFILES) -o datashare-testing/sd
 
 datashare-testing/sdat: sharedat.scm $(OFILES)
 	csc $(CSCOPTS) sharedat.scm $(OFILES) -o datashare-testing/sdat

Index: Makefile.deploy
==================================================================
--- Makefile.deploy
+++ Makefile.deploy
@@ -1,7 +1,9 @@
 # make install CSCOPTS='-accumulate-profile -profile-name $(PWD)/profile-ww$(shell date +%V.%u)'
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: NOTES
==================================================================
--- NOTES
+++ NOTES
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: README
==================================================================
--- README
+++ README
@@ -1,5 +1,22 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 Megatest 
 
 To build:
 
 1. Install chicken scheme. See opensrc repo utils/installall.sh http://www.kiatoa.com/fossils/opensrc

Index: TODO
==================================================================
--- TODO
+++ TODO
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: archive.scm
==================================================================
--- archive.scm
+++ archive.scm
@@ -38,11 +38,11 @@
 	(flavor  'plain) ;; type of machine to run jobs on
 	(maxload 1.5)   ;; max allowed load for this work
 	(adisks  (archive:get-archive-disks)))
     ;; get testdir size
     ;;   - hand off du to job mgr
-    (if (and (common:file-exists? testdir)
+    (if (and (file-exists? testdir)
 	     (file-is-writable? testdir))
 	(let* ((dused  (jobrunner:run-job 
 			flavor  ;; machine type
 			maxload ;; max allowed load
 			'()     ;; prevars - environment vars to set for the job
@@ -145,11 +145,11 @@
 				      (> (rmt:test-toplevel-num-items run-id test-name) 0)))
 	      (test-partial-path (conc target "/" run-name "/" (db:test-make-full-name test-name item-path)))
 	      ;; note the trailing slash to get the dir inspite of it being a link
 	      (test-path         (conc linktree "/" test-partial-path))
 	      (mutex-lock! rp-mutex)
-	      (test-physical-path (if (common:file-exists? test-path) 
+	      (test-physical-path (if (file-exists? test-path) 
 				      (common:real-path test-path)
 				      #f))
 	      (mutex-unlock! rp-mutex)
 	      (partial-path-index (if test-physical-path (substring-index test-partial-path test-physical-path) #f))
 	      (test-base         (if (and partial-path-index 
@@ -160,11 +160,11 @@
 				     #f)))
 	 
  	 (cond
 	  (toplevel/children
 	   (debug:print 0 *default-log-port* "WARNING: cannot archive " test-name " with id " test-id " as it is a toplevel test with children"))
-	  ((not (common:file-exists? test-path))
+	  ((not (file-exists? test-path))
 	   (debug:print 0 *default-log-port* "WARNING: Cannot archive " test-name "/" item-path " as path " test-path " does not exist"))
 	  (else
 	   (debug:print 0 *default-log-port*
 			"From test-dat=" test-dat " derived the following:\n"
 			"test-partial-path  = " test-partial-path "\n"
@@ -188,13 +188,13 @@
 					      (conc "-" compress) ;; or (conc "--compress=" compress)
 					      "-n" (conc (common:get-testsuite-name) "-" run-id)
 					      (conc "--strip-path=" disk-group))
 					test-paths))
 	      (print-prefix      #f)) ;; "Running: ")) ;; change to #f to turn off printing
-	 (if (not (common:file-exists? archive-dir))
+	 (if (not (file-exists? archive-dir))
 	     (create-directory archive-dir #t))
-	 (if (not (common:file-exists? (conc archive-dir "/HEAD")))
+	 (if (not (file-exists? (conc archive-dir "/HEAD")))
 	     (begin
 	       ;; replace this with jobrunner stuff enventually
 	       (debug:print-info 0 *default-log-port* "Init bup in " archive-dir)
 	       ;; (mutex-lock! bup-mutex)
 	       (run-n-wait bup-exe params: bup-init-params print-cmd: print-prefix)
@@ -241,11 +241,11 @@
 	      (test-partial-path (conc target "/" run-name "/" (db:test-make-full-name test-name item-path)))
 	      ;; note the trailing slash to get the dir inspite of it being a link
 	      (test-path         (conc linktree "/" test-partial-path))
 	      ;; if the old path was not deleted then prev-test-physical-path will end up pointing to a real directory
 	      (mutex-lock! rp-mutex)
-	      (prev-test-physical-path (if (common:file-exists? test-path)
+	      (prev-test-physical-path (if (file-exists? test-path)
 					   ;; (read-symbolic-link test-path #t)
 					   (common:real-path test-path)
 					   #f))
 	      (mutex-unlock! rp-mutex)
 	      (new-test-physical-path  (conc best-disk "/" test-partial-path))
@@ -258,11 +258,11 @@
 	 
 	 ;; some sanity checks, move an existing path out of the way - iif it is not a toplevel with children
 	 ;;
 	 (if (and (not toplevel/children)  ;; special handling needed for toplevel with children
 		  prev-test-physical-path
-		  (common:file-exists? prev-test-physical-path)) ;; what to do? abort or clean up or link it in?
+		  (file-exists? prev-test-physical-path)) ;; what to do? abort or clean up or link it in?
 	     (let* ((base (pathname-directory prev-test-physical-path))
 		    (dirn (pathname-file      prev-test-physical-path))
 		    (newn (conc base "/." dirn)))
 	       (debug:print-error 0 *default-log-port* "the old directory " prev-test-physical-path ", still exists! Moving it to " newn)
 	       (rename-file prev-test-physical-path newn)))

DELETED bin/sleeprunner
Index: bin/sleeprunner
==================================================================
--- bin/sleeprunner
+++ /dev/null
@@ -1,22 +0,0 @@
-#!/bin/bash 
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-if [[ $SLEEPRUNNER == "" ]];then
-SLEEPRUNNER=0
-fi
-  
-echo "nbfake $@ &> /dev/null" | at now + $SLEEPRUNNER minutes &> /dev/null

Index: codescanlib.scm
==================================================================
--- codescanlib.scm
+++ codescanlib.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: common.scm
==================================================================
--- common.scm
+++ common.scm
@@ -26,13 +26,12 @@
      (prefix sqlite3 sqlite3:)
      pkts (prefix dbi dbi:)
      )
 
 (declare (unit common))
-
 (include "common_records.scm")
-
+(declare (uses configf))
 
 ;; (require-library margs)
 ;; (include "margs.scm")
 
 ;; (define old-exit exit)
@@ -208,25 +207,31 @@
          (or (> chicken-release-number 4)
              (and (eq? 4 chicken-release-number) (> chicken-major-version 9)))))
     (if resolve-pathname-broken?
         (define ##sys#expand-home-path pathname-expand))))
       
-(define (realpath x) (resolve-pathname  (pathname-expand (or x "/dev/null")) ))
+(define (realpath x)
+  (handle-exceptions
+   exn
+   #f
+   (resolve-pathname  (pathname-expand (or x "/dev/null")))))
 
 (define (common:get-this-exe-fullpath #!key (argv (argv)))
-  (let* ((this-script
-          (cond
-           ((and (> (length argv) 2)
-                 (string-match "^(.*/csi|csi)$" (car argv))
-                 (string-match "^-(s|ss|sx|script)$" (cadr argv)))
-            (caddr argv))
-           (else (car argv))))
+  (let* ((this-script (cond
+                       ((and (> (length argv) 2)
+                             (string-match "^(.*/csi|csi)$" (car argv))
+                             (string-match "^-(s|ss|sx|script)$" (cadr argv)))
+                        (caddr argv))
+                       (else (car argv))))
          (fullpath (realpath this-script)))
-    fullpath))
-(define *common:this-exe-fullpath* (common:get-this-exe-fullpath))
-(define *common:this-exe-dir*      (pathname-directory *common:this-exe-fullpath*))
-(define *common:this-exe-name*     (pathname-strip-directory *common:this-exe-fullpath*))
+    (or fullpath
+        (common:which this-script)))) ;; fall back on looking in the PATH for matching tool
+
+;; Let's not get these vars unless needed.
+;; (define *common:this-exe-fullpath* (common:get-this-exe-fullpath))
+;; (define *common:this-exe-dir*      (pathname-directory *common:this-exe-fullpath*))
+;; (define *common:this-exe-name*     (pathname-strip-directory *common:this-exe-fullpath*))
 
 
 
 
 
@@ -358,11 +363,11 @@
                      (> (file-size fullname) 200000))
                 (and (string-match "^server-.*.log" file)
                      (> (- (current-seconds) (file-modification-time fullname))
                         (* 8 60 60))))
             (let ((gzfile (conc fullname ".gz")))
-              (if (common:file-exists? gzfile)
+              (if (file-exists? gzfile)
                   (begin
                     (debug:print-info 0 *default-log-port* "removing " gzfile)
                     (delete-file gzfile)))
               (debug:print-info 0 *default-log-port* "compressing " file)
               (system (conc "gzip " fullname)))
@@ -388,11 +393,11 @@
 			 "WARNING: Version mismatch!\n"
 			 "   expected: " (common:version-signature) "\n"
 			 "   got:      " (common:get-last-run-version))
             (cond
              ((get-environment-variable "MT_SKIP_DB_MIGRATE") #t)
-             ((and (common:file-exists? mtconf) (common:file-exists? dbfile) (not read-only)
+             ((and (file-exists? mtconf) (file-exists? dbfile) (not read-only)
                    (eq? (current-user-id)(file-owner mtconf))) ;; safe to run -cleanup-db
               (debug:print 0 *default-log-port* "   I see you are the owner of megatest.config, attempting to cleanup and reset to new version")
               (handle-exceptions
                exn
                (begin
@@ -399,14 +404,14 @@
                  (debug:print 0 *default-log-port* "Failed to switch versions.")
                  (debug:print 0 *default-log-port* " message: " ((condition-property-accessor 'exn 'message) exn))
                  (print-call-chain (current-error-port))
                  (exit 1))
                (common:cleanup-db dbstruct)))
-             ((not (common:file-exists? mtconf))
+             ((not (file-exists? mtconf))
               (debug:print 0 *default-log-port* "   megatest.config does not exist in this area.  Cannot proceed with megatest version migration.")
               (exit 1))
-             ((not (common:file-exists? dbfile))
+             ((not (file-exists? dbfile))
               (debug:print 0 *default-log-port* "   megatest.db does not exist in this area.  Cannot proceed with megatest version migration.")
               (exit 1))
              ((not (eq? (current-user-id)(file-owner mtconf)))
               (debug:print 0 *default-log-port* "   You do not own megatest.db in this area.  Cannot proceed with megatest version migration.")
               (exit 1))
@@ -519,11 +524,11 @@
 ;;
 (define (common:simple-file-lock fname #!key (expire-time 300))
   (handle-exceptions
       exn
       #f ;; don't really care what went wrong right now. NOTE: I have not seen this one actually fail.
-    (if (common:file-exists? fname)
+    (if (file-exists? fname)
 	(if (> (- (current-seconds)(file-modification-time fname)) expire-time)
 	    (begin
 	      (delete-file* fname)
 	      (common:simple-file-lock fname expire-time: expire-time))
 	    #f)
@@ -530,11 +535,11 @@
 	(let ((key-string (conc (get-host-name) "-" (current-process-id))))
 	  (with-output-to-file fname
 	    (lambda ()
 	      (print key-string)))
 	  (thread-sleep! 0.25)
-	  (if (common:file-exists? fname)
+	  (if (file-exists? fname)
 	      (with-input-from-file fname
 		(lambda ()
 		  (equal? key-string (read-line))))
 	      #f)))))
 
@@ -708,18 +713,20 @@
           (pathname-file *toppath*)
           #f))) ;; (pathname-file (current-directory)))))
 
 (define common:get-area-name common:get-testsuite-name)
 
+;; get-db-tmp-area is improved/replicated src/db.scm
+;;
 (define (common:get-db-tmp-area . junk)
   (if *db-cache-path*
       *db-cache-path*
       (if *toppath* ;; common:get-create-writeable-dir
 	  (handle-exceptions
 	      exn
 	      (begin
-		(debug:print-error 0 *default-log-port* "Couldn't create path to " dbdir)
+		(debug:print-error 0 *default-log-port* "Couldn't create path to /tmp/ area")
 		(exit 1))
 	    (let ((dbpath (common:get-create-writeable-dir
 			   (list (conc "/tmp/" (current-user-name)
 				       "/megatest_localdb/"
 				       (common:get-testsuite-name) "/"
@@ -915,19 +922,19 @@
       #f
       (let loop ((hed (car cmds))
 		 (tal (cdr cmds)))
 	(let ((res (with-input-from-pipe (conc "which " hed) read-line)))
 	  (if (and (string? res)
-		   (common:file-exists? res))
+		   (file-exists? res))
 	      res
 	      (if (null? tal)
 		  #f
 		  (loop (car tal)(cdr tal))))))))
   
 (define (common:get-install-area)
   (let ((exe-path (car (argv))))
-    (if (common:file-exists? exe-path)
+    (if (file-exists? exe-path)
 	(handle-exceptions
 	 exn
 	 #f
 	 (pathname-directory
 	  (pathname-directory 
@@ -1050,11 +1057,11 @@
                        (if message
                            (debug:print-info 0 *default-log-port* message))
                        #f) (thunk) ))
 
 (define (common:file-exists? path-string #!key (silent #f))
-  ;; this avoids stack dumps in the case where 
+  ;; this avoids stack dumps in the case where file is not readable (I think this is due to a bug fixed in a later version of chicken)
 
   ;;;; TODO: catch permission denied exceptions and emit appropriate warnings, eg:  system error while trying to access file: "/nfs/pdx/disks/icf_env_disk001/bjbarcla/gwa/issues/mtdev/randy-slow/reproduce/q...
   (common:false-on-exception (lambda () (file-exists? path-string))
                              message: (if (not silent)
                                           (conc "Unable to access path: " path-string)
@@ -1168,11 +1175,11 @@
 				 (begin
 				   (mutex-unlock! *homehost-mutex*)
 				   (debug:print 0 *default-log-port* "ERROR: Failed to read .homehost file after trying five times. Giving up and exiting, message: "  ((condition-property-accessor 'exn 'message) exn))
 				   (exit 1)))
 			   (let ((hhf (conc *toppath* "/.homehost")))
-			     (if (common:file-exists? hhf)
+			     (if (file-exists? hhf)
 				 (with-input-from-file hhf read-line)
 				 (if (file-write-access? *toppath*)
 				     (begin
 				       (with-output-to-file hhf
 					 (lambda ()
@@ -1393,11 +1400,10 @@
 ;; if it looks like a number -> convert it to a number, else return it
 ;;
 (define (common:lazy-convert inval)
   (let* ((as-num (if (string? inval)(string->number inval) #f)))
     (or as-num inval)))
-
 ;; convert string a=1; b=2; c=a silly thing; d=
 ;; to '((a . 1)(b . 2)(c . "a silly thing")(d . ""))
 ;;
 (define (common:val->alist val #!key (convert #f))
   (let ((val-list (string-split-fields ";\\s*" val #:infix)))
@@ -2575,14 +2581,14 @@
 ;;
 (define (common:load-views-config)
   (let* ((view-cfgdat    (make-hash-table))
 	 (home-cfgfile   (conc (get-environment-variable "HOME") "/.mtviews.config"))
 	 (mthome-cfgfile (conc *toppath* "/.mtviews.config")))
-    (if (common:file-exists? mthome-cfgfile)
+    (if (file-exists? mthome-cfgfile)
 	(read-config mthome-cfgfile view-cfgdat #t))
     ;; we load the home dir file AFTER the MTRAH file so the user can clobber settings when running the dashboard in read-only areas
-    (if (common:file-exists? home-cfgfile)
+    (if (file-exists? home-cfgfile)
 	(read-config home-cfgfile view-cfgdat #t))
     view-cfgdat))
 
 ;;======================================================================
 ;; H I E R A R C H I C A L   H A S H   T A B L E S
@@ -2702,11 +2708,11 @@
 	 (pdbpath  (or (configf:lookup mtconf "setup"  "pdbpath") pktsdir)))
     (cond
      ((not (and  pktsdir toppath pdbpath))
       (debug:print 0 *default-log-port* "ERROR: settings are missing in your megatest.config for area management.")
       (debug:print  0 *default-log-port* "  you need to have pktsdir in the [setup] section."))
-     ((not (common:file-exists? pktsdir))
+     ((not (file-exists? pktsdir))
       (debug:print 0 *default-log-port* "ERROR: pkts directory not found " pktsdir))
      ((not (equal? (file-owner pktsdir)(current-effective-user-id)))
       (debug:print 0 *default-log-port* "ERROR: directory " pktsdir " is not owned by " (current-effective-user-name)))
      (else
 	(let* ((pdb  (open-queue-db pdbpath "pkts.db"
@@ -2719,11 +2725,11 @@
    mtconf
    (lambda (pktsdirs pktsdir pdb)
      (for-each
       (lambda (pktsdir) ;; look at all
 	(cond
-	 ((not (common:file-exists? pktsdir))
+	 ((not (file-exists? pktsdir))
 	  (debug:print 0 *default-log-port* "ERROR: packets directory " pktsdir " does not exist."))
 	 ((not (directory? pktsdir))
 	  (debug:print 0 *default-log-port* "ERROR: packets directory path " pktsdir " is not a directory."))
 	 ((not (file-read-access? pktsdir))
 	  (debug:print 0 *default-log-port* "ERROR: packets directory path " pktsdir " is not readable."))
@@ -2836,5 +2842,51 @@
            exn
            #t ;; just ignore it, it might have died in the meantime so joining it will throw an exception
            (thread-join! thread))
            )))
    (hash-table-keys *common:thread-punchlist*)))
+
+
+;; moved to common.scm as it is very megatest specific
+
+;; pathenvvar will set the named var to the path of the config
+(define (common:find-and-read-config fname #!key (environ-patt #f)(given-toppath #f)(pathenvvar #f))
+  (let* ((curr-dir   (current-directory))
+         (configinfo (find-config fname toppath: given-toppath))
+	 (toppath    (car configinfo))
+	 (configfile (cadr configinfo))
+	 (set-fields (lambda (curr-section next-section ht path)
+		       (let ((field-names (if ht (common:get-fields ht) '()))
+			     (target      (or (getenv "MT_TARGET")(args:get-arg "-reqtarg")(args:get-arg "-target"))))
+			 (debug:print-info 9 *default-log-port* "set-fields with field-names=" field-names " target=" target " curr-section=" curr-section " next-section=" next-section " path=" path " ht=" ht)
+			 (if (not (null? field-names))(keys:target-set-args field-names target #f))))))
+    (if toppath (change-directory toppath)) 
+    (if (and toppath pathenvvar)(setenv pathenvvar toppath))
+    (let ((configdat  (if configfile 
+			  (read-config configfile #f #t environ-patt: environ-patt post-section-procs: (list (cons "^fields$" set-fields)) #f))))
+      (if toppath (change-directory curr-dir))
+      (list configdat toppath configfile fname))))
+
+;;;; return list (path fullpath configname)
+(define (common:find-config configname #!key (toppath #f))
+  (if toppath
+      (let ((cfname (conc toppath "/" configname)))
+	(if (file-exists? cfname)
+	    (list toppath cfname configname)
+	    (list #f      #f     #f)))
+      (let* ((cwd (string-split (current-directory) "/")))
+	(let loop ((dir cwd))
+	  (let* ((path     (conc "/" (string-intersperse dir "/")))
+		 (fullpath (conc path "/" configname)))
+	    (if (file-exists? fullpath)
+		(list path fullpath configname)
+		(let ((remcwd (take dir (- (length dir) 1))))
+		  (if (null? remcwd)
+		      (list #f #f #f) ;;  #f #f) 
+		  (loop remcwd)))))))))
+
+(define (common:setup)
+  (let* ((configf (find-config "megatest.config"))
+	 (config  (if configf (read-config configf #f #t) #f)))
+    (if config
+	(setenv "RUN_AREA_HOME" (pathname-directory configf)))
+    config))

Index: commonstructs
==================================================================
--- commonstructs
+++ commonstructs
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: configf.scm
==================================================================
--- configf.scm
+++ configf.scm
@@ -25,25 +25,26 @@
 (use regex regex-case) ;;  directory-utils)
 (declare (unit configf))
 (declare (uses process))
 (declare (uses env))
 (declare (uses keys))
+(declare (uses common))
 
 (include "common_records.scm")
 
 ;; return list (path fullpath configname)
 (define (find-config configname #!key (toppath #f))
   (if toppath
       (let ((cfname (conc toppath "/" configname)))
-	(if (common:file-exists? cfname)
+	(if (file-exists? cfname)
 	    (list toppath cfname configname)
 	    (list #f      #f     #f)))
       (let* ((cwd (string-split (current-directory) "/")))
 	(let loop ((dir cwd))
 	  (let* ((path     (conc "/" (string-intersperse dir "/")))
 		 (fullpath (conc path "/" configname)))
-	    (if (common:file-exists? fullpath)
+	    (if (file-exists? fullpath)
 		(list path fullpath configname)
 		(let ((remcwd (take dir (- (length dir) 1))))
 		  (if (null? remcwd)
 		      (list #f #f #f) ;;  #f #f) 
 		  (loop remcwd)))))))))
@@ -242,10 +243,45 @@
 			  (hash-table-set! ht section (config:assoc-safe-add (hash-table-ref ht section) key val metadata: meta))))
 		      vars)))))
          (hash-table-keys ht))))
   ht)
 
+;;======================================================================
+;; Extended config lines, allows storing more hierarchial data in the config lines
+;;   ABC a=1; b=hello world; c=a
+;;
+;; NOTE: implementation is quite limited. You currently cannot have
+;;       semicolons in your string values.
+;;======================================================================
+
+;; convert string a=1; b=2; c=a silly thing; d=
+;; to '((a . 1)(b . 2)(c . "a silly thing")(d . ""))
+;;
+(define (configf:val->alist val #!key (convert #f))
+  (let ((val-list (string-split-fields ";\\s*" val #:infix)))
+    (if val-list
+	(map (lambda (x)
+	       (let ((f (string-split-fields "\\s*=\\s*" x #:infix)))
+		 (case (length f)
+		   ((0) `(,#f))  ;; null string case
+		   ((1) `(,(string->symbol (car f))))
+		   ((2) `(,(string->symbol (car f)) . ,(let ((inval (cadr f)))
+							 (if convert (common:lazy-convert inval) inval))))
+		   (else f))))
+	     val-list)
+	'())))
+
+;; I don't want configf to turn into a weak yaml format but this extention is really useful
+;;
+(define (configf:section->val-alist cfgdat section-name #!key (convert #f))
+  (let ((section (configf:get-section cfgdat section-name)))
+    (map (lambda (item)
+           (let ((key (car item))
+                 (val (cadr item))) ;; BUG IN WAIT. sections are not returned as proper alists, should fix this.
+             (cons key (configf:val->alist val convert: convert))))
+         section)))
+  
 ;; read a config file, returns hash table of alists
 
 ;; read a config file, returns hash table of alists
 ;; adds to ht if given (must be #f otherwise)
 ;; allow-system:
@@ -269,11 +305,11 @@
 ;;       				  ((port?   path) "port")
 ;;       				  (else (conc path))))
 ;;                        (T      . configf))
 ;;       	       *configdat* #t add-only: #t))
   (if (and (not (port? path))
-	   (not (common:file-exists? path))) ;; for case where we are handed a port
+	   (not (file-exists? path))) ;; for case where we are handed a port
       (begin 
 	(debug:print-info 1 *default-log-port* "read-config - file not found " path " current path: " (current-directory))
 	;; WARNING: This is a risky change but really, we should not return an empty hash table if no file read?
 	#f) ;; (if (not ht)(make-hash-table) ht))
       (let ((inp        (if (string? path)
@@ -330,11 +366,11 @@
                                                              (common:nice-path 
                                                               (conc (if curr-conf-dir
                                                                         curr-conf-dir
                                                                         ".")
                                                                     "/" include-file)))))
-                                     (if (common:file-exists? full-conf)
+                                     (if (file-exists? full-conf)
                                          (begin
                                            ;; (push-directory conf-dir)
                                            (debug:print 9 *default-log-port* "Including: " full-conf)
                                            (read-config full-conf res allow-system environ-patt: environ-patt
                                                         curr-section: curr-section-name sections: sections settings: settings
@@ -349,11 +385,11 @@
 	       (configf:script-rx ( x include-script params);; handle-exceptions
                                   ;;    exn
                                   ;;    (begin
                                   ;;      (debug:print '(0 2 9) #f "INFO: include from script " include-script " failed.")
                                   ;;      (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings) curr-section-name #f #f))
-                                  (if (and (common:file-exists? include-script)(file-execute-access? include-script))
+                                  (if (and (file-exists? include-script)(file-execute-access? include-script))
                                       (let* ((local-allow-system  (calc-allow-system allow-system curr-section-name sections))
                                              (env-delta  (configf:cfgdat->env-alist curr-section-name res local-allow-system))
                                              (new-inp-port
                                               (common:with-env-vars
                                                env-delta
@@ -595,11 +631,11 @@
 	  (if (null? tal)
 	      newres
 	      (loop (car tal)(cdr tal) newres))))))
 
 (define (configf:file->list fname)
-  (if (common:file-exists? fname)
+  (if (file-exists? fname)
       (let ((inp (open-input-file fname)))
 	(let loop ((inl (read-line inp))
 		   (res '()))
 	  (if (eof-object? inl)
 	      (begin
@@ -648,11 +684,11 @@
 					    (set! new hed) ;; will append this at the bottom of the loop
 					    (set! secname section-name)
 					    ))
 	   ;; No need to process key cmd, let it fall though to key val
 	   (configf:key-val-pr ( x key val      )
-		       (let ((newval (config-lookup indat sec key)))
+		       (let ((newval (config-lookup indat secname key))) ;; secname was sec. I think that was
 			 ;; can handle newval == #f here => that means key is removed
 			 (cond 
 			  ((equal? newval val)
 			   (set! res (append res (list hed))))
 			  ((not newval) ;; key has been removed
@@ -699,11 +735,11 @@
 
 ;; reads a refdb into an assoc array of assoc arrays
 ;;   returns (list dat msg)
 (define (configf:read-refdb refdb-path)
   (let ((sheets-file  (conc refdb-path "/sheet-names.cfg")))
-    (if (not (common:file-exists? sheets-file))
+    (if (not (file-exists? sheets-file))
 	(list #f (conc "ERROR: no refdb found at " refdb-path))
 	(if (not (file-read-access? sheets-file))
 	    (list #f (conc "ERROR: refdb file not readable at " refdb-path))
 	    (let* ((sheets (with-input-from-file sheets-file
 			     (lambda ()
@@ -780,11 +816,11 @@
           (begin
             (with-output-to-file fname ;; first write out the file
               (lambda ()
                 (pp dat)))
             
-            (if (common:file-exists? fname)   ;; now verify it is readable
+            (if (file-exists? fname)   ;; now verify it is readable
                 (if (configf:read-alist fname)
                     #t ;; data is good.
                     (begin
                       (handle-exceptions
                        exn

Index: dashboard-context-menu.scm
==================================================================
--- dashboard-context-menu.scm
+++ dashboard-context-menu.scm
@@ -45,19 +45,24 @@
 (include "common_records.scm")
 (include "db_records.scm")
 (include "run_records.scm")
 
 (define (dboard:launch-testpanel run-id test-id)
-  (let* (;; (cfg-sh  (conc *common:this-exe-dir* "/cfg.sh"))
+  (let* ((exepath (common:get-this-exe-fullpath))
+         (exedir  (pathname-directory exepath))
+
+         ;; (cfg-sh  (conc *common:this-exe-dir* "/cfg.sh"))
          ;; (cmd (conc
-         ;;       (if (common:file-exists? cfg-sh)
+         ;;       (if (file-exists? cfg-sh)
          ;;           (conc "source "cfg-sh" && ")
          ;;           "")
          ;;       *common:this-exe-fullpath*
          ;;       " -test " run-id "," test-id
          ;;       " &"))
-         (cmd (conc *common:this-exe-dir*"/../dashboard "
+
+         ;; (cmd (conc *common:this-exe-dir*"/../dashboard "
+         (cmd (conc exedir "/../dashboard "
                     "-test " run-id "," test-id
                     " &")))
     (system cmd)))
 
 
@@ -185,11 +190,11 @@
                          (status   (vector-ref step 3)))
                      (iup:menu-item
                       (conc stepname "/" (if (string=? logfile "") "no log!" logfile) " (" status ")")
                       #:action (lambda (obj)
                                  (let ((fullfile (conc rundir "/" logfile)))
-                                   (if (common:file-exists? fullfile)
+                                   (if (file-exists? fullfile)
                                        (dcommon:run-html-viewer fullfile)
                                        (message-window (conc "file " fullfile " not found"))))))))
                  steps)))))
 
 (define (dashboard:toplevel-menu-items  run-id test-id target runname test-name testpatt item-test-path test-info)
@@ -245,11 +250,11 @@
      #:action
      (lambda (obj)
        (let* ((rundir    (db:test-get-rundir      test-info))
               (logf      (db:test-get-final_logf  test-info))
               (fullfile  (conc rundir "/" logf)))
-         (if (common:file-exists? fullfile)
+         (if (file-exists? fullfile)
              (dcommon:run-html-viewer fullfile)
              (message-window (conc "file " fullfile " not found.")))))
      )
     ))
 ;; example section for megatest.config:

Index: dashboard-tests.scm
==================================================================
--- dashboard-tests.scm
+++ dashboard-tests.scm
@@ -255,11 +255,11 @@
 ;; if there is a submegatest create a button to launch dashboard in that area
 ;;
 (define (submegatest-panel dbstruct keydat testdat runname testconfig)
   (let* ((test-run-dir      (db:test-get-rundir testdat))
 	 (subarea           (subrun:get-runarea test-run-dir))
-	 (area-exists       (and subarea (common:file-exists? subarea silent: #t))))
+	 (area-exists       (and subarea (file-exists? subarea silent: #t))))
     (if subarea
 	(iup:frame 
 	 #:title "Megatest Run Info" ; #:expand "YES"
 	 (iup:button
 	  "Launch Dashboard"
@@ -478,11 +478,11 @@
 			    "/"))
 	       (item-path  (db:test-get-item-path testdat))
 	       ;; this next block was added to fix a bug where variables were
                ;; needed. Revisit this.
 	       (runconfig  (let ((runconfigf (conc  *toppath* "/runconfigs.config"))) ;; no rush but it would be good to convert this call to use runconfig:read
-	 		     (if (common:file-exists? runconfigf)
+	 		     (if (file-exists? runconfigf)
 	 			 (handle-exceptions
                                    exn
                                    #f  ;; do nothing, just keep on trucking ....
                                    (setup-env-defaults runconfigf run-id (make-hash-table) keydat environ-patt: keystring))
 	 			 (make-hash-table))))
@@ -492,18 +492,18 @@
 				(handle-exceptions
 				 exn  ;; NOTE: I've no idea why this was written this way. Research, study and fix needed!
 				 (tests:get-testconfig (db:test-get-testname testdat) (db:test-get-item-path testdat) test-registry #f allow-write-cache: #f)
 				 (tests:get-testconfig (db:test-get-testname testdat) item-path test-registry #t allow-write-cache: #f))))
 	       (viewlog    (lambda (x)
-			     (if (common:file-exists? logfile)
+			     (if (file-exists? logfile)
 					;(system (conc "firefox " logfile "&"))
 				 (dcommon:run-html-viewer logfile)
 				 (message-window (conc "File " logfile " not found")))))
 	       (view-a-log (lambda (lfile) 
 			     (let ((lfilename (conc rundir "/" lfile)))
 			       ;; (print "lfilename: " lfilename)
-			       (if (common:file-exists? lfilename)
+			       (if (file-exists? lfilename)
 					;(system (conc "firefox " logfile "&"))
 				   (dcommon:run-html-viewer lfilename)
 				   (message-window (conc "File " lfilename " not found"))))))
 	       (xterm      (lambda (x)
 			     (if (directory-exists? rundir)
@@ -516,11 +516,11 @@
 				    "MT_.*"))
 				 (message-window  (conc "Directory " rundir " not found")))))
 	       (widgets    (make-hash-table))
 	       (refreshdat (lambda ()
 			     (let* ((curr-mod-time (file-modification-time db-path))
-				                   ;;     (max ..... (if (common:file-exists? testdat-path)
+				                   ;;     (max ..... (if (file-exists? testdat-path)
 						   ;;      	      (file-modification-time testdat-path)
 						   ;;      	      (begin
 						   ;;      		(set! testdat-path (conc rundir "/testdat.db"))
 						   ;;      		0))))
 				    (need-update   (or (and (>= curr-mod-time db-mod-time)

Index: dashboard.scm
==================================================================
--- dashboard.scm
+++ dashboard.scm
@@ -1950,11 +1950,11 @@
   (let* ((success #t) ;; at any stage of the process set this flag to #f to skip downstream steps. Intention here is to recover gracefully if user provided tabs fail to load.
 	 (source  (configf:lookup views-cfgdat view-name "source"))
 	 (viewgen (configf:lookup views-cfgdat view-name "viewgen"))
 	 (updater (configf:lookup views-cfgdat view-name "updater"))
 	 (result-child #f))
-    (if (and (common:file-exists? source)
+    (if (and (file-exists? source)
 	     (file-read-access? source))
 	(handle-exceptions
 	 exn
 	 (begin
 	   (print-call-chain)
@@ -2703,11 +2703,11 @@
 		    (glob (conc dbdir "/*.db*"))))))
 
 (define (dashboard:monitor-changed? commondat tabdat)
   (let* ((run-update-time (current-seconds))
 	 (monitor-db-path (dboard:tabdat-monitor-db-path tabdat))
-	 (monitor-modtime (if (and monitor-db-path (common:file-exists? monitor-db-path))
+	 (monitor-modtime (if (and monitor-db-path (file-exists? monitor-db-path))
 			      (file-modification-time monitor-db-path)
 			      -1)))
     (if (and (eq? (dboard:commondat-curr-tab-num commondat) 0)
 	     (or (> monitor-modtime *last-monitor-update-time*)
 		 (> (- run-update-time *last-monitor-update-time*) 5))) ;; update every 1/2 minute just in case
@@ -3418,11 +3418,11 @@
 ;; The heavy lifting starts here
 ;;======================================================================
 
 (define (main)
   (let ((mtdb-path (conc *toppath* "/megatest.db"))) ;; 
-    (if (and (common:file-exists? mtdb-path)
+    (if (and (file-exists? mtdb-path)
 	     (file-write-access? mtdb-path))
 	(if (not (args:get-arg "-skip-version-check"))
             (common:exit-on-version-changed)))
     (let* ((commondat       (dboard:commondat-make)))
       ;; Move this stuff to db.scm? I'm not sure that is the right thing to do...
@@ -3477,12 +3477,12 @@
 	(thread-start! th2)
 	(thread-join! th2)))))
 
 ;; ease debugging by loading ~/.dashboardrc
 (let ((debugcontrolf (conc (get-environment-variable "HOME") "/.dashboardrc")))
-  (if (common:file-exists? debugcontrolf)
+  (if (file-exists? debugcontrolf)
       (load debugcontrolf)))
 
 (if (args:get-arg "-repl")
     (repl)
     (main))
 

Index: datashare-testing/.sd.config
==================================================================
--- datashare-testing/.sd.config
+++ datashare-testing/.sd.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: datashare-testing/.spublish.config
==================================================================
--- datashare-testing/.spublish.config
+++ datashare-testing/.spublish.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: datashare-testing/.sretrieve.config
==================================================================
--- datashare-testing/.sretrieve.config
+++ datashare-testing/.sretrieve.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: datashare-testing/NOTES
==================================================================
--- datashare-testing/NOTES
+++ datashare-testing/NOTES
@@ -1,3 +1,20 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 To test sretrieve first publish megatest as v1.60 at least twice to get
 iterations 0 and 1
 

Index: datashare-testing/megatest.config
==================================================================
--- datashare-testing/megatest.config
+++ datashare-testing/megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: datashare-testing/packages.config
==================================================================
--- datashare-testing/packages.config
+++ datashare-testing/packages.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: datashare.scm
==================================================================
--- datashare.scm
+++ datashare.scm
@@ -234,11 +234,11 @@
     (if (and path
 	     (directory? path)
 	     (file-read-access? path))
 	(let* ((dbpath    (conc path "/datashare.db"))
 	       (writeable (file-write-access? dbpath))
-	       (dbexists  (common:file-exists? dbpath))
+	       (dbexists  (file-exists? dbpath))
 	       (handler   (make-busy-timeout 136000)))
 	  (handle-exceptions
 	   exn
 	   (begin
 	     (debug:print 2 *default-log-port* "ERROR: problem accessing db " dbpath
@@ -421,11 +421,11 @@
 	paths))
 
 ;; remove existing link and if possible ...
 ;; create path to next of tip of target, create link back to source
 (define (datashare:build-dir-make-link source target)
-  (if (common:file-exists? target)(datashare:backup-move target))
+  (if (file-exists? target)(datashare:backup-move target))
   (create-directory (pathname-directory target) #t)
   (create-symbolic-link source target))
 
 (define (datashare:backup-move path)
   (let* ((trashdir  (conc (pathname-directory path) "/.trash"))
@@ -526,11 +526,11 @@
 (define (datashare:path->lst path)
   (string-split path "/"))
 
 (define (datashare:pathdat-apply-heuristics configdat path)
   (cond
-   ((common:file-exists? path) "found")
+   ((file-exists? path) "found")
    (else (conc path " not installed"))))
 
 (define (datashare:get-view configdat)
   (iup:vbox
    (iup:hbox
@@ -700,11 +700,11 @@
 (define (datashare:find name paths)
   (if (null? paths)
       #f
       (let loop ((hed (car paths))
 		 (tal (cdr paths)))
-	(if (common:file-exists? (conc hed "/" name))
+	(if (file-exists? (conc hed "/" name))
 	    hed
 	    (if (null? tal)
 		#f
 		(loop (car tal)(cdr tal)))))))
 
@@ -714,11 +714,11 @@
 
 (define (datashare:load-config exe-dir exe-name)
   (let* ((fname   (conc exe-dir "/." exe-name ".config")))
     (ini:property-separator-patt " *  *")
     (ini:property-separator #\space)
-    (if (common:file-exists? fname)
+    (if (file-exists? fname)
 	;; (ini:read-ini fname)
 	(read-config fname #f #t)
 	(make-hash-table))))
 
 (define (datashare:process-action configdat action . args)
@@ -793,11 +793,11 @@
 	    versions)
        (sqlite3:finalize! db)))))
 
 ;; ease debugging by loading ~/.dashboardrc - REMOVE FROM PRODUCTION!
 (let ((debugcontrolf (conc (get-environment-variable "HOME") "/.datasharerc")))
-  (if (common:file-exists? debugcontrolf)
+  (if (file-exists? debugcontrolf)
       (load debugcontrolf)))
 
 (define (main)
   (let* ((args      (argv))
 	 (prog      (car args))

Index: db.scm
==================================================================
--- db.scm
+++ db.scm
@@ -213,20 +213,20 @@
 
 (define (db:lock-create-open fname initproc)
   (let* ((parent-dir   (or (pathname-directory fname)(current-directory))) ;; no parent? go local
          (raw-fname    (pathname-file fname))
 	 (dir-writable (file-write-access? parent-dir))
-	 (file-exists  (common:file-exists? fname))
+	 (file-exists  (file-exists? fname))
 	 (file-write   (if file-exists
 			   (file-write-access? fname)
 			   dir-writable )))
     ;; (mutex-lock! *db-open-mutex*) ;; tried this mutex, not clear it helped.
     (if file-write ;; dir-writable
 	(condition-case
          (let* ((lockfname   (conc fname ".lock"))
                 (readyfname  (conc parent-dir "/.ready-" raw-fname))
-                (readyexists (common:file-exists? readyfname)))
+                (readyexists (file-exists? readyfname)))
            (if (not readyexists)
                (common:simple-file-lock-and-wait lockfname))
            (let ((db      (sqlite3:open-database fname)))
              (sqlite3:set-busy-handler! db (make-busy-timeout 136000))
              (sqlite3:execute db "PRAGMA synchronous = 0;")
@@ -274,11 +274,11 @@
 
 ;; ;; This routine creates the db. It is only called if the db is not already opened
 ;; ;; 
 ;; (define (db:open-rundb dbstruct run-id #!key (attemptnum 0)(do-not-open #f)) ;;  (conc *toppath* "/megatest.db") (car *configinfo*)))
 ;;   (let* ((dbfile       (db:dbfile-path run-id)) ;; (conc toppath "/db/" run-id ".db"))
-;;          (dbexists     (common:file-exists? dbfile))
+;;          (dbexists     (file-exists? dbfile))
 ;;          (db           (db:lock-create-open dbfile (lambda (db)
 ;;                                                      (handle-exceptions
 ;;                                                       exn
 ;;                                                       (begin
 ;;                                                         ;; (release-dot-lock dbpath)
@@ -314,14 +314,14 @@
 (define (db:open-db dbstruct #!key (areapath #f)(do-sync #t)) ;; TODO: actually use areapath
   (let ((tmpdb-stack (dbr:dbstruct-dbstack dbstruct))) ;; RA => Returns the first reference in dbstruct
     (if (stack? tmpdb-stack)
 	(db:get-db tmpdb-stack) ;; get previously opened db (will create new db handle if all in the stack are already used
         (let* ((dbpath       (db:dbfile-path ))      ;; path to tmp db area
-               (dbexists     (common:file-exists? dbpath))
+               (dbexists     (file-exists? dbpath))
 	       (tmpdbfname   (conc dbpath "/megatest.db"))
-	       (dbfexists    (common:file-exists? tmpdbfname))  ;; (conc dbpath "/megatest.db")))
-               (mtdbexists   (common:file-exists? (conc *toppath* "/megatest.db")))
+	       (dbfexists    (file-exists? tmpdbfname))  ;; (conc dbpath "/megatest.db")))
+               (mtdbexists   (file-exists? (conc *toppath* "/megatest.db")))
                
                (mtdb         (db:open-megatest-db))
                (mtdbpath     (db:dbdat-get-path mtdb))
                (tmpdb        (db:open-megatest-db path: dbpath)) ;; lock-create-open dbpath db:initialize-main-db))
                (refndb       (db:open-megatest-db path: dbpath name: "megatest_ref.db"))
@@ -383,11 +383,11 @@
 ;;   NOTE: returns a dbdat not a dbstruct!
 ;;
 (define (db:open-megatest-db #!key (path #f)(name #f))
   (let* ((dbdir        (or path *toppath*))
          (dbpath       (conc  dbdir "/" (or name "megatest.db")))
-	 (dbexists     (common:file-exists? dbpath))
+	 (dbexists     (file-exists? dbpath))
 	 (db           (db:lock-create-open dbpath
 					    (lambda (db)
                                               (db:initialize-main-db db)
 					      ;;(db:initialize-run-id-db db)
 					      )))
@@ -558,11 +558,11 @@
 	 (tmpname  (conc fname "." (current-process-id)))
 	 (tmpjnl   (conc fnamejnl "." (current-process-id))))
     (debug:print-error 0 *default-log-port* "" fname " appears corrupted. Making backup \"old/" fname "\"")
     (system (conc "cd " dbdir ";mkdir -p old;cat " fname " > old/" tmpname))
     (system (conc "rm -f " dbpath))
-    (if (common:file-exists? fnamejnl)
+    (if (file-exists? fnamejnl)
 	(begin
 	  (debug:print-error 0 *default-log-port* "" fnamejnl " found, moving it to old dir as " tmpjnl)
 	  (system (conc "cd " dbdir ";mkdir -p old;cat " fnamejnl " > old/" tmpjnl))
 	  (system (conc "rm -f " dbdir "/" fnamejnl))))
     ;; attempt to recreate database
@@ -932,11 +932,11 @@
 (define (db:cache-for-read-only source target #!key (use-last-update #f))
   (if (and (hash-table-ref/default *global-db-store* target #f)
 	   (>= (file-modification-time target)(file-modification-time source)))
       (hash-table-ref *global-db-store* target)
       (let* ((toppath   (launch:setup))
-	     (targ-db-last-mod (if (common:file-exists? target)
+	     (targ-db-last-mod (if (file-exists? target)
 				   (file-modification-time target)
 				   0))
 	     (cache-db  (or (hash-table-ref/default *global-db-store* target #f)
 			    (db:open-megatest-db path: target)))
 	     (source-db (db:open-megatest-db path: source))
@@ -964,11 +964,11 @@
 ;; 	(begin
 ;; 	  (debug:print 0 *default-log-port* "ERROR: Failed to find an area to write the cache db")
 ;; 	  (exit 1))
 ;; 	(let* ((th1      (make-thread
 ;; 			  (lambda ()
-;; 			    (if (and (common:file-exists? megatest-db)
+;; 			    (if (and (file-exists? megatest-db)
 ;; 				     (file-write-access? megatest-db))
 ;; 				(begin
 ;; 				  (db:sync-to-megatest.db dbstruct 'timestamps) ;; internally mutexes on *db-local-sync*
 ;; 				  (debug:print-info 2 *default-log-port* "Done syncing to megatest.db"))))
 ;; 			  "call-with-cached-db sync-to-megatest.db"))
@@ -1144,11 +1144,11 @@
 
 (define (db:initialize-main-db dbdat)
   (when (not *configinfo*)
            (launch:setup)) ;; added because Elena was getting stack dump because *configinfo* below was #f.
   (let* ((configdat (car *configinfo*))  ;; tut tut, global warning...
-	 (keys     (keys:config-get-fields configdat))
+	 (keys     (common:get-fields configdat))
 	 (havekeys (> (length keys) 0))
 	 (keystr   (keys->keystr keys))
 	 (fieldstr (keys:make-key/field-string configdat))
 	 (db       (db:dbdat-get-db dbdat)))
     (for-each (lambda (key)
@@ -1498,11 +1498,11 @@
 ;; L O G G I N G    D B 
 ;;======================================================================
 
 (define (open-logging-db)
   (let* ((dbpath    (conc (if *toppath* (conc *toppath* "/") "") "logging.db")) ;; fname)
-	 (dbexists  (common:file-exists? dbpath))
+	 (dbexists  (file-exists? dbpath))
 	 (db        (sqlite3:open-database dbpath))
 	 (handler   (make-busy-timeout (if (args:get-arg "-override-timeout")
 					   (string->number (args:get-arg "-override-timeout"))
 					   136000)))) ;; 136000)))
     (sqlite3:set-busy-handler! db handler)
@@ -1654,11 +1654,11 @@
        ;;
        ;; (db:delay-if-busy dbdat)
        (let* (;; (min-incompleted (filter (lambda (x)
               ;;      		      (let* ((testpath (cadr x))
               ;;      			     (tdatpath (conc testpath "/testdat.db"))
-              ;;      			     (dbexists (common:file-exists? tdatpath)))
+              ;;      			     (dbexists (file-exists? tdatpath)))
               ;;      			(or (not dbexists) ;; if no file then something wrong - mark as incomplete
               ;;      			    (> (- (current-seconds)(file-modification-time tdatpath)) 600)))) ;; no change in 10 minutes to testdat.db - she's dead Jim
               ;;      		    incompleted))
               (min-incompleted-ids (map car incompleted)) ;; do 'em all
               (all-ids             (append min-incompleted-ids (map car oldlaunched))))
@@ -1885,11 +1885,11 @@
 ;;======================================================================
 
 (define (db:open-no-sync-db)
   (let* ((dbpath (db:dbfile-path))
 	 (dbname (conc dbpath "/no-sync.db"))
-	 (db-exists (common:file-exists? dbname))
+	 (db-exists (file-exists? dbname))
 	 (db     (sqlite3:open-database dbname)))
     (sqlite3:set-busy-handler! db (make-busy-timeout 136000))
     (if (not db-exists)
 	(begin
 	  (sqlite3:execute db "PRAGMA synchronous = 0;")
@@ -1960,11 +1960,11 @@
 ;; use a global for some primitive caching, it is just silly to
 ;; re-read the db over and over again for the keys since they never
 ;; change
 
 ;; why get the keys from the db? why not get from the *configdat*
-;; using keys:config-get-fields?
+;; using common:get-fields?
 
 (define (db:get-keys dbstruct)
   (if *db-keys* *db-keys* 
       (let ((res '()))
 	(db:with-db dbstruct #f #f
@@ -4106,11 +4106,11 @@
 		 exn
 		 (begin
 		   (debug:print-info 0 *default-log-port* "WARNING: failed to test for existance of " dbfj)
 		   (thread-sleep! 1)
 		   (db:delay-if-busy count (- count 1))) 
-		 (common:file-exists? dbfj))
+		 (file-exists? dbfj))
 		(case count
 		  ((6)
 		   (thread-sleep! 0.2)
 		   (db:delay-if-busy count: 5))
 		  ((5)
@@ -4540,12 +4540,12 @@
 					       (testname  (vector-ref vb (+  2 numkeys)))
 					       (item-path (vector-ref vb (+  3 numkeys)))
 					       (final-log (vector-ref vb (+  7 numkeys)))
 					       (run-dir   (vector-ref vb (+ 18 numkeys)))
 					       (log-fpath (conc run-dir "/"  final-log))) ;; (string-intersperse keyvals "/") "/" testname "/" item-path "/"
-					  (debug:print 4 *default-log-port* "log: " log-fpath " exists: " (common:file-exists? log-fpath))
-					  (vector-set! vb (+ 7 numkeys) (if (common:file-exists? log-fpath)
+					  (debug:print 4 *default-log-port* "log: " log-fpath " exists: " (file-exists? log-fpath))
+					  (vector-set! vb (+ 7 numkeys) (if (file-exists? log-fpath)
 									    (let ((newpath (conc pathmod "/"
 												 (string-intersperse keyvals "/")
 												 "/" runname "/" testname "/"
 												 (if (string=? item-path "") "" (conc "/" item-path))
 												 final-log)))

Index: db_records.scm
==================================================================
--- db_records.scm
+++ db_records.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: diff-report.scm
==================================================================
--- diff-report.scm
+++ diff-report.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: docs/Makefile
==================================================================
--- docs/Makefile
+++ docs/Makefile
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/api.txt
==================================================================
--- docs/api.txt
+++ docs/api.txt
@@ -16,10 +16,12 @@
 
 The Megatest Web App aims to make as much of the power of the dashboard available to the web based user.
 
 :numbered:
 
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/architecture-brainstorming.fig
==================================================================
--- docs/architecture-brainstorming.fig
+++ docs/architecture-brainstorming.fig
@@ -4,10 +4,12 @@
 Inches
 Letter  
 100.00
 Single
 -2
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/inprogress/graph-draw-arch.fig
==================================================================
--- docs/inprogress/graph-draw-arch.fig
+++ docs/inprogress/graph-draw-arch.fig
@@ -5,10 +5,12 @@
 Letter  
 100.00
 Single
 -2
 1200 2
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/inprogress/megatest-architecture-2.fig
==================================================================
--- docs/inprogress/megatest-architecture-2.fig
+++ docs/inprogress/megatest-architecture-2.fig
@@ -5,10 +5,12 @@
 Letter  
 100.00
 Single
 -2
 1200 2
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/inprogress/megatest-architecture-proposed-2.fig
==================================================================
--- docs/inprogress/megatest-architecture-proposed-2.fig
+++ docs/inprogress/megatest-architecture-proposed-2.fig
@@ -5,10 +5,12 @@
 Letter  
 100.00
 Single
 -2
 1200 2
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/inprogress/megatest-architecture-proposed.fig
==================================================================
--- docs/inprogress/megatest-architecture-proposed.fig
+++ docs/inprogress/megatest-architecture-proposed.fig
@@ -5,10 +5,12 @@
 Letter  
 100.00
 Single
 -2
 1200 2
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/inprogress/megatest-architecture.fig
==================================================================
--- docs/inprogress/megatest-architecture.fig
+++ docs/inprogress/megatest-architecture.fig
@@ -5,10 +5,12 @@
 Letter  
 100.00
 Single
 -2
 1200 2
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/inprogress/megatest-query-view.fig
==================================================================
--- docs/inprogress/megatest-query-view.fig
+++ docs/inprogress/megatest-query-view.fig
@@ -5,10 +5,12 @@
 Letter  
 100.00
 Single
 -2
 1200 2
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/inprogress/megatest_qa.fig
==================================================================
--- docs/inprogress/megatest_qa.fig
+++ docs/inprogress/megatest_qa.fig
@@ -5,10 +5,12 @@
 Letter  
 100.00
 Single
 -2
 1200 2
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/Makefile
==================================================================
--- docs/manual/Makefile
+++ docs/manual/Makefile
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/client.dot
==================================================================
--- docs/manual/client.dot
+++ docs/manual/client.dot
@@ -1,5 +1,7 @@
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/complex-itemmap.dot
==================================================================
--- docs/manual/complex-itemmap.dot
+++ docs/manual/complex-itemmap.dot
@@ -1,5 +1,7 @@
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/getting_started.in
==================================================================
--- docs/manual/getting_started.in
+++ docs/manual/getting_started.in
@@ -1,5 +1,7 @@
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/howto.in
==================================================================
--- docs/manual/howto.in
+++ docs/manual/howto.in
@@ -1,5 +1,7 @@
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/installation.txt
==================================================================
--- docs/manual/installation.txt
+++ docs/manual/installation.txt
@@ -1,5 +1,7 @@
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/itemmap.fig
==================================================================
--- docs/manual/itemmap.fig
+++ docs/manual/itemmap.fig
@@ -38,10 +38,12 @@
 0 60 #000049
 0 61 #797979
 0 62 #303430
 0 63 #414141
 0 64 #c7b696
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/plan.in
==================================================================
--- docs/manual/plan.in
+++ docs/manual/plan.in
@@ -1,8 +1,10 @@
 Road Map
 --------
 
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/reference.in
==================================================================
--- docs/manual/reference.in
+++ docs/manual/reference.in
@@ -1,5 +1,7 @@
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/server.dot
==================================================================
--- docs/manual/server.dot
+++ docs/manual/server.dot
@@ -1,5 +1,7 @@
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/thoughts.fig
==================================================================
--- docs/manual/thoughts.fig
+++ docs/manual/thoughts.fig
@@ -4,10 +4,12 @@
 Inches
 Letter  
 100.00
 Single
 -2
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: docs/manual/writing_tests.txt
==================================================================
--- docs/manual/writing_tests.txt
+++ docs/manual/writing_tests.txt
@@ -1,5 +1,7 @@
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/megatest-state-status.dot
==================================================================
--- docs/megatest-state-status.dot
+++ docs/megatest-state-status.dot
@@ -1,5 +1,7 @@
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: docs/pkts.dot
==================================================================
--- docs/pkts.dot
+++ docs/pkts.dot
@@ -1,5 +1,7 @@
+//  Copyright 2006-2017, Matthew Welland.
+// 
 // This file is part of Megatest.
 // 
 //     Megatest is free software: you can redistribute it and/or modify
 //     it under the terms of the GNU General Public License as published by
 //     the Free Software Foundation, either version 3 of the License, or

Index: env.scm
==================================================================
--- env.scm
+++ env.scm
@@ -17,15 +17,16 @@
 ;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
 
 ;;======================================================================
 
 (declare (unit env))
+(declare (uses common))
 
 (use sql-de-lite) ;; srfi-1 posix regex regex-case srfi-69 srfi-18 call-with-environment-variables)
 
 (define (env:open-db fname)
-  (let* ((db-exists (common:file-exists? fname))
+  (let* ((db-exists (file-exists? fname))
 	 (db        (open-database fname)))
     (if (not db-exists)
 	(begin
 	  (exec (sql db "CREATE TABLE envvars (
                     id INTEGER PRIMARY KEY,

ADDED   example/README
Index: example/README
==================================================================
--- /dev/null
+++ example/README
@@ -0,0 +1,21 @@
+;;======================================================================
+;; Copyright 2006-2012, Matthew Welland.
+;; 
+;; This file is part of Megatest.
+;; 
+;;     Megatest is free software: you can redistribute it and/or modify
+;;     it under the terms of the GNU General Public License as published by
+;;     the Free Software Foundation, either version 3 of the License, or
+;;     (at your option) any later version.
+;; 
+;;     Megatest is distributed in the hope that it will be useful,
+;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
+;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;     GNU General Public License for more details.
+;; 
+;;     You should have received a copy of the GNU General Public License
+;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
+You can get the example from the Megatest tests fossil at:
+
+    http://www.kiatoa.com/fossils/megatest_qa

DELETED example/cfg/machines.dat
Index: example/cfg/machines.dat
==================================================================
--- example/cfg/machines.dat
+++ /dev/null
@@ -1,30 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-[]
-[maxload]
-zeus 0.40000000000000002
-xena 0.20000000000000001
-myth2 0.01
-hades 1
-[minfree]
-zeus 1000
-xena 20000
-myth2 300000
-hades 4000000
-[reqprocs]
-zeus mfsmount mythbackend mfschunkserver
-xena mfsmount
-myth2 mfsmount mythfrontend mfschunkserver
-hades mfsmount mfsmetalogger mfschunkserver

DELETED example/cfg/sheet-names.cfg
Index: example/cfg/sheet-names.cfg
==================================================================
--- example/cfg/sheet-names.cfg
+++ /dev/null
@@ -1,1 +0,0 @@
-machines

DELETED example/cfg/sxml/_sheets.sxml
Index: example/cfg/sxml/_sheets.sxml
==================================================================
--- example/cfg/sxml/_sheets.sxml
+++ /dev/null
@@ -1,47 +0,0 @@
-((@ (http://www.w3.org/2001/XMLSchema-instance:schemaLocation
-      "http://www.gnumeric.org/v9.xsd"))
- (http://www.gnumeric.org/v10.dtd:Version
-   (@ (Minor "17") (Major "10") (Full "1.10.17") (Epoch "1")))
- (http://www.gnumeric.org/v10.dtd:Attributes
-   (http://www.gnumeric.org/v10.dtd:Attribute
-     (http://www.gnumeric.org/v10.dtd:type "4")
-     (http://www.gnumeric.org/v10.dtd:name
-       "WorkbookView::show_horizontal_scrollbar")
-     (http://www.gnumeric.org/v10.dtd:value "TRUE"))
-   (http://www.gnumeric.org/v10.dtd:Attribute
-     (http://www.gnumeric.org/v10.dtd:type "4")
-     (http://www.gnumeric.org/v10.dtd:name
-       "WorkbookView::show_vertical_scrollbar")
-     (http://www.gnumeric.org/v10.dtd:value "TRUE"))
-   (http://www.gnumeric.org/v10.dtd:Attribute
-     (http://www.gnumeric.org/v10.dtd:type "4")
-     (http://www.gnumeric.org/v10.dtd:name "WorkbookView::show_notebook_tabs")
-     (http://www.gnumeric.org/v10.dtd:value "TRUE"))
-   (http://www.gnumeric.org/v10.dtd:Attribute
-     (http://www.gnumeric.org/v10.dtd:type "4")
-     (http://www.gnumeric.org/v10.dtd:name "WorkbookView::do_auto_completion")
-     (http://www.gnumeric.org/v10.dtd:value "TRUE"))
-   (http://www.gnumeric.org/v10.dtd:Attribute
-     (http://www.gnumeric.org/v10.dtd:type "4")
-     (http://www.gnumeric.org/v10.dtd:name "WorkbookView::is_protected")
-     (http://www.gnumeric.org/v10.dtd:value "FALSE")))
- (urn:oasis:names:tc:opendocument:xmlns:office:1.0:document-meta
-   (@ (urn:oasis:names:tc:opendocument:xmlns:office:1.0:version "1.2"))
-   (urn:oasis:names:tc:opendocument:xmlns:office:1.0:meta
-     (http://purl.org/dc/elements/1.1/:date "2014-02-14T06:16:26Z")
-     (urn:oasis:names:tc:opendocument:xmlns:meta:1.0:creation-date
-       "2014-02-14T06:16:17Z")))
- (http://www.gnumeric.org/v10.dtd:Calculation
-   (@ (MaxIterations "100")
-      (ManualRecalc "0")
-      (IterationTolerance "0.001")
-      (FloatRadix "2")
-      (FloatDigits "53")
-      (EnableIteration "1")))
- (http://www.gnumeric.org/v10.dtd:SheetNameIndex
-   (http://www.gnumeric.org/v10.dtd:SheetName
-     (@ (http://www.gnumeric.org/v10.dtd:Rows "65536")
-        (http://www.gnumeric.org/v10.dtd:Cols "256"))
-     "machines"))
- (http://www.gnumeric.org/v10.dtd:Geometry (@ (Width "835") (Height "320")))
- (http://www.gnumeric.org/v10.dtd:UIData (@ (SelectedTab "0"))))

DELETED example/cfg/sxml/_workbook.sxml
Index: example/cfg/sxml/_workbook.sxml
==================================================================
--- example/cfg/sxml/_workbook.sxml
+++ /dev/null
@@ -1,1 +0,0 @@
-(*TOP* (*PI* xml "version=\"1.0\" encoding=\"UTF-8\""))

DELETED example/cfg/sxml/machines.sxml
Index: example/cfg/sxml/machines.sxml
==================================================================
--- example/cfg/sxml/machines.sxml
+++ /dev/null
@@ -1,105 +0,0 @@
-(http://www.gnumeric.org/v10.dtd:Sheet
-  (@ (Visibility "GNM_SHEET_VISIBILITY_VISIBLE")
-     (OutlineSymbolsRight "1")
-     (OutlineSymbolsBelow "1")
-     (HideZero "0")
-     (HideRowHeader "0")
-     (HideGrid "0")
-     (HideColHeader "0")
-     (GridColor "0:0:0")
-     (DisplayOutlines "1")
-     (DisplayFormulas "0"))
-  (http://www.gnumeric.org/v10.dtd:MaxCol "3")
-  (http://www.gnumeric.org/v10.dtd:MaxRow "4")
-  (http://www.gnumeric.org/v10.dtd:Zoom "1")
-  (http://www.gnumeric.org/v10.dtd:Names
-    (http://www.gnumeric.org/v10.dtd:Name
-      (http://www.gnumeric.org/v10.dtd:name "Print_Area")
-      (http://www.gnumeric.org/v10.dtd:value "#REF!")
-      (http://www.gnumeric.org/v10.dtd:position "A1"))
-    (http://www.gnumeric.org/v10.dtd:Name
-      (http://www.gnumeric.org/v10.dtd:name "Sheet_Title")
-      (http://www.gnumeric.org/v10.dtd:value "\"machines\"")
-      (http://www.gnumeric.org/v10.dtd:position "A1")))
-  (http://www.gnumeric.org/v10.dtd:PrintInformation
-    (http://www.gnumeric.org/v10.dtd:Margins
-      (http://www.gnumeric.org/v10.dtd:top (@ (PrefUnit "mm") (Points "120")))
-      (http://www.gnumeric.org/v10.dtd:bottom
-        (@ (PrefUnit "mm") (Points "120")))
-      (http://www.gnumeric.org/v10.dtd:left (@ (PrefUnit "mm") (Points "72")))
-      (http://www.gnumeric.org/v10.dtd:right (@ (PrefUnit "mm") (Points "72")))
-      (http://www.gnumeric.org/v10.dtd:header
-        (@ (PrefUnit "mm") (Points "72")))
-      (http://www.gnumeric.org/v10.dtd:footer
-        (@ (PrefUnit "mm") (Points "72"))))
-    (http://www.gnumeric.org/v10.dtd:Scale
-      (@ (type "percentage") (percentage "100")))
-    (http://www.gnumeric.org/v10.dtd:vcenter (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:hcenter (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:grid (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:even_if_only_styles (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:monochrome (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:draft (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:titles (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:do_not_print (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:print_range (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:order "d_then_r")
-    (http://www.gnumeric.org/v10.dtd:orientation "portrait")
-    (http://www.gnumeric.org/v10.dtd:Header
-      (@ (Right "") (Middle "&[TAB]") (Left "")))
-    (http://www.gnumeric.org/v10.dtd:Footer
-      (@ (Right "") (Middle "Page &[PAGE]") (Left "")))
-    (http://www.gnumeric.org/v10.dtd:paper "na_letter")
-    (http://www.gnumeric.org/v10.dtd:comments "in_place")
-    (http://www.gnumeric.org/v10.dtd:errors "as_displayed"))
-  (http://www.gnumeric.org/v10.dtd:Styles
-    (http://www.gnumeric.org/v10.dtd:StyleRegion
-      (@ (startRow "0") (startCol "0") (endRow "65535") (endCol "255"))
-      (http://www.gnumeric.org/v10.dtd:Style
-        (@ (WrapText "0")
-           (VAlign "2")
-           (ShrinkToFit "0")
-           (Shade "0")
-           (Rotation "0")
-           (PatternColor "0:0:0")
-           (Locked "1")
-           (Indent "0")
-           (Hidden "0")
-           (HAlign "1")
-           (Format "General")
-           (Fore "0:0:0")
-           (Back "FFFF:FFFF:FFFF"))
-        (http://www.gnumeric.org/v10.dtd:Font
-          (@ (Unit "10")
-             (Underline "0")
-             (StrikeThrough "0")
-             (Script "0")
-             (Italic "0")
-             (Bold "0"))
-          "Sans"))))
-  (http://www.gnumeric.org/v10.dtd:Cols
-    (@ (DefaultSizePts "48"))
-    (http://www.gnumeric.org/v10.dtd:ColInfo (@ (Unit "48") (No "0")))
-    (http://www.gnumeric.org/v10.dtd:ColInfo
-      (@ (Unit "52.5") (No "1") (HardSize "1")))
-    (http://www.gnumeric.org/v10.dtd:ColInfo (@ (Unit "48") (No "2")))
-    (http://www.gnumeric.org/v10.dtd:ColInfo
-      (@ (Unit "182.2") (No "3") (HardSize "1"))))
-  (http://www.gnumeric.org/v10.dtd:Rows
-    (@ (DefaultSizePts "12.75"))
-    (http://www.gnumeric.org/v10.dtd:RowInfo
-      (@ (Unit "13.5") (No "0") (Count "5"))))
-  (http://www.gnumeric.org/v10.dtd:Selections
-    (@ (CursorRow "4") (CursorCol "0"))
-    (http://www.gnumeric.org/v10.dtd:Selection
-      (@ (startRow "4") (startCol "0") (endRow "4") (endCol "0"))))
-  (http://www.gnumeric.org/v10.dtd:SheetLayout (@ (TopLeft "A1")))
-  (http://www.gnumeric.org/v10.dtd:Solver
-    (@ (ProgramR "0")
-       (ProblemType "0")
-       (NonNeg "1")
-       (ModelType "0")
-       (MaxTime "60")
-       (MaxIter "1000")
-       (Discr "0")
-       (AutoScale "0"))))

DELETED example/megatest.config
Index: example/megatest.config
==================================================================
--- example/megatest.config
+++ /dev/null
@@ -1,36 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-[fields]
-CFG_TYPE This is the refdb to use.
-RUN_TYPE Can be: full or quick
-
-[setup]
-# Adjust max_concurrent_jobs to limit parallel jobs
-max_concurrent_jobs 50
-
-# This is your link path, best to set it and then not change it
-linktree #{getenv MT_RUN_AREA_HOME}/linktree
-
-# Job tools control how your jobs are launched
-[jobtools]
-launcher nbfake
-
-# As you run more tests you may need to add additional disks 
-# the names are arbitrary but must be unique
-[disks]
-disk0 #{getenv MT_RUN_AREA_HOME}/runs
-
-[include local.megatest.config]
-

DELETED example/q/threaded-queue.scm
Index: example/q/threaded-queue.scm
==================================================================
--- example/q/threaded-queue.scm
+++ /dev/null
@@ -1,368 +0,0 @@
-#!/opt/chicken/bin/csi -s
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-
-(use mailbox-threads typed-records matchable mailbox posix)
-
-;;; create a threaded job queue
-;;; submit job
-;;;   - command line
-;;;   - working dir / default pwd
-;;;   - env hash    / default current env
-;;;   - callback on exit 0 / default noop
-;;;   - callback on nonzero exit / default noop
-;; tjq == threaded job queue; a job is a unix command
-(define getenv get-environment-variable)
-(defstruct tjq:job
-    id  ;; assigned at construction time when added to waiting q
-  state ;; assigned at construction time when added to waiting q
-  (pid #f) ;; assigned when moved from ready q to running q
-  (threadobj #f)
-  (normal-exit #f)
-  (exit-code #f) ;; assigned when moved from running to done
-  (time-entered-waiting #f)
-  (time-entered-ready   #f)
-  (time-entered-running #f)
-  (time-entered-done    #f)
-  ;; following are key options to submit method
-  (work-dir     (getenv "PWD")) ;; where to execute job
-  (setenvs     '())            ;; alist of envvars to set when running job
-  (cmdline     "/bin/true")    ;; job command line; if string, run in subshell, if list, exec.
-  (success-cb  (lambda () #t)) ;; fires when exitcode is 0
-  (fail-cb     (lambda () #t)));; fires when exitcode is not 0
-
- 
-             
-
-(define (tjq:exception e)
-  (print "Exception: "e)
-  ;;(print-call-chain)
-  (exit 1))
-
-(define (tjq:job-thread job-id job dispatch-thread timeout-seconds)
-  ;;(print "job-thread setup for jobid "job-id)
-  (letrec
-      ((this-thread
-        (make-thread
-         (lambda ()
-           (tjq:job-threadobj-set! job this-thread)
-           ;;(print "job-thread started for jobid "job-id)
-           (let loop ((pid #f))
-             ;;(print "job-thr("job-id")> loop top.")
-             (match (thread-receive timeout-seconds 'timeout)
-               ('timeout
-                ;;(print "job-thr("job-id")> timeout; pid="pid" before cond1")
-                (cond
-                 ((number? pid) ;; check if still running
-                  ;;(print "job-thr("job-id")> timeout; pid="pid" cond1 pid-is-number branch")
-                  (let-values (((pid-or-zero normal-exit exitcode-or-signal)
-                                (process-wait pid #t)))
-
-
-                    ;; can get for large number of parallel threads (~ >= 42)
-                    ;;                     Warning (#<thread: anonymous>): in thread: (process-wait) waiting for child process failed - No child processes: 11322
-                    
-                    ;; 	Call history:
-                    
-                    ;; 	threaded-queue.scm:56: ##sys#call-with-values	  
-                    ;; 	threaded-queue.scm:57: process-wait	  	<--
-                    
-                    ;; Warning (#<thread: anonymous>): in thread: (process-wait) waiting for child process failed - No child processes: 11323did job 467
-                    ;; did job 464
-                    
-                    ;; Warning (#<thread: anonymous>): in thread: (process-wait) waiting for child process failed - No child processes: 11318
-                    
-                    ;; 	Call history:
-                    
-                    ;; 	threaded-queue.scm:56: ##sys#call-with-values	  
-                    ;; 	threaded-queue.scm:57: process-wait	  	<--
-                    
-
-                    ;;(print "job-thr("job-id")> pid-or-zero="pid-or-zero)
-                    (cond
-                     ((zero? pid-or-zero)
-                      ;;(print "job-thr("job-id")> timeout; pid="pid" cond2 pid-or-zero is zero branch")
-                      ;;(print "job-thr("job-id")> zero; loop.")
-                      (loop pid))
-                     (else
-                      ;;(print "job-thr("job-id")> timeout; pid="pid" cond2 else branch")
-                      (tjq:job-normal-exit-set! job
-                                                (if normal-exit 'normal 'signal))
-                      (tjq:job-exit-code-set! job exitcode-or-signal)
-                      
-                      (thread-send dispatch-thread (list 'job-now-done job-id))))
-                    ;;(print "job-thr("job-id")> after cond2")
-                    ))
-                 (else
-                  ;;(print "job-thr("job-id")> timeout; pid="pid" cond1 else branch")
-                  ;;(print "job-thr("job-id")> no action; loop")
-                  (thread-sleep! timeout-seconds)
-                  (loop pid))))
-               ('run
-                ;;(print "job-thr("job-id")> run called")
-                (let* ((cmdline (tjq:job-cmdline job))
-                       (newpid (if (list? cmdline)
-                                (process-run (car cmdline) (cdr cmdline))
-                                (process-run cmdline))))
-                  (tjq:job-pid-set! job newpid)
-                  (thread-send dispatch-thread
-                               (list 'job-now-running job-id))
-                  (loop newpid)))
-               (e
-                (print "tjq:job-thread("job-id") illegal message received:")
-                (pp e)
-               (exit 1))))
-           ;;(print "job-thread finished for jobid "job-id)
-           #f))))
-    this-thread))
-       
-       
-(define (tjq:dispatcher-thread qname job-hash sync-job-cap obj #!key
-                               (job-thread-timeout-seconds 0.1)
-                               (timeout-seconds 0.1)
-                               )
-  (letrec
-   (;; options to configure behavior of dispatcher
-    (stop #f)
-    ;;(timeout-seconds 0.5)
-    ;;(job-thread-timeout-seconds 0.5)
-    ;; define long-running thread which receives requests and coordinates
-    ;; job execution
-    (this-thread
-     (make-thread
-      (lambda ()
-        (let loop ((next-job-id 0)
-                   ;; four job queues holding job mbox-type threads
-                   ;; they advance from one to the next
-                   ;; once in done, the thread has completed.
-                   (waiting '()) ;; stay here until count(running) < sync-job-cap
-                   (ready   '()) ;; launch jobs in here
-                   (running '()) ;; wait for pid to complete, then move do done
-                   (done    '())) ;; 
-          ;;(print "loop top")
-          (match (thread-receive timeout-seconds 'timeout)
-              ;; (let ((res (thread-receive timeout-seconds 'timeout)
-              ;;        (if (not stop)
-                         
-              ;;            'done)))
-              ;;   res)
-            ('timeout
-             ;;(print "to: "stop" ; next-job-id="next-job-id)
-             (if (and
-                  (not next-job-id) ;; we're draining jobs
-                  (null? waiting)
-                  (null? ready)
-                  (null? running)
-                  )
-                 (begin
-                   (print "Drained.  Done.")
-                   (set! stop #t)
-                   #f)
-                 ;;*** when timeout happens, examine job queues
-                 ;;    and move jobs thru their lifecycle
-                 ;;** count waitings
-                 ;; move min(sync-job-cap - running total, waiting total) to ready
-                 ;; foreach ready, run it
-                 ;;(print "disp: ready="ready)
-                 (begin
-                   (for-each (lambda (job-id)
-                               (let* ((job (hash-table-ref job-hash job-id))
-                                      (job-thread (tjq:job-threadobj job)))
-                                 (tjq:job-state-set! job 'ready)
-                                 (thread-send job-thread 'run)))
-                             ready)
-                   (let* ((new-running (flatten ready running))
-                          (avail-slots (- sync-job-cap (length new-running)))
-                          (queueable-count (min avail-slots (length waiting))))
-                     (let-values (((new-ready new-waiting)
-                                   (split-at waiting queueable-count)))
-                       (loop next-job-id new-waiting new-ready new-running done))))))
-
-            (('job-now-running job-id)
-             (let ((job (hash-table-ref job-hash job-id)))
-               (tjq:job-state-set! job 'running)
-               (loop next-job-id waiting ready running done)))
-            (('job-now-done job-id)
-             (let* ((job (hash-table-ref job-hash job-id))
-                   (successful
-                    (and
-                     (eq? 'normal (tjq:job-normal-exit job))
-                     (zero? (tjq:job-exit-code job))))
-                   (new-running (filter
-                                 (lambda (x) (not (eq? x job-id)))
-                                 running))
-                   (new-done    (cons job-id done)))
-               (tjq:job-state-set! job 'done)
-               (loop next-job-id waiting ready new-running new-done)))
-            (('method 'ping '() return-mbox)
-             (print "got ping")
-             (mailbox-send! return-mbox 'pong)
-             (loop next-job-id waiting ready running done))
-            
-            (('method 'submit args return-mbox)
-             (if (not next-job-id)
-                 (begin
-                   (print "refuse to submit new job -- draining jobs now.")
-                   (mailbox-send! return-mbox #f)
-                   (loop #f waiting ready running done))
-                 (let* ((job-id next-job-id)
-                        (job (apply
-                              make-tjq:job
-                              id: job-id
-                              time-entered-waiting: (current-seconds)
-                              state: 'waiting
-                              args))
-                        (job-thread (tjq:job-thread job-id job this-thread job-thread-timeout-seconds)))
-                   (hash-table-set! job-hash job-id job)
-                   (thread-start! job-thread)
-                   (mailbox-send! return-mbox job-id)
-                   (loop
-                    (add1 next-job-id)
-                    (cons job-id waiting)
-                    ready running done))))
-
-            (('method 'kill)
-             ;; (for-each (job-id)
-             ;;  (lambda (job-id)
-             ;;    (let* ((job (hash-table-ref job-hash job-id))
-             ;;           (job-thread (tjq:job-threadobj job)))
-             ;;      (thread-send job-thread 'abort))
-             )
-            
-            (('method 'drain args return-mbox)
-             (mailbox-send! return-mbox 'drain)
-             (loop #f waiting ready running done))
-                
-                       
-            ;; (for-each
-            ;;   (lambda (job-id)
-            ;;     (let* ((job (hash-table-ref job-hash job-id))
-            ;;            (job-thread (tjq:job-threadobj job)))
-            ;;       (thread-join! job-thread)))
-            ;;   '() ;; FIXME
-            ;;  )
-            
-            (e
-             (print "tjq:dispatcher-thread> no matching pattern.  dispatcher received: ")
-             (pp e)
-             (exit 1))
-            (('method x args return-mbox)
-             (mailbox-send! return-mbox (list 'missing-method))
-             (loop next-job-id waiting ready running done))
-            ) ;; end match
-          ;;(print "Done dispatch thread")
-          #f
-          )))))
-   this-thread))
-  
-
-       
-(define (tjq:new #!key (qname (gensym)) (sync-job-cap 100))
-  (let* ((job-hash (make-hash-table))
-         (obj-mbox (make-mailbox)))
-    (letrec
-        ((dispatch-thread
-          (tjq:dispatcher-thread
-           job-thread-timeout-seconds: 0.01
-           timeout-seconds: 0.01
-
-           qname job-hash sync-job-cap obj))
-         (obj
-          (lambda (op . args)
-            (cond
-             ((eq? op 'event-loop)
-              (print "got event-loop")
-              (thread-join! dispatch-thread)
-              (print "after thread-join dispatch-thread")
-              )
-             ((eq? op 'drain)
-              (thread-send dispatch-thread (list 'method op args obj-mbox))
-              (thread-join! dispatch-thread)
-              (print "Done with queue "qname)
-              #t)
-             (else
-              ;;(print "send method op="op)
-              (thread-send dispatch-thread (list 'method op args obj-mbox))
-              (let* ((res (mailbox-receive! obj-mbox)))
-                (if (eq? res 'missing-method)
-                    (begin
-                      (print "missing method "op" called.")
-                      (tjq:exception 'missing-method))
-                    res)))))
-
-          ) ;; end obj binding
-         ); end letrec bindings
-      (thread-start! dispatch-thread)
-      obj)))
-         
-                            
-(define (test-tjq-simple)
-  (let* ((q (tjq:new qname: 'test-q sync-job-cap: 3)))
-    ;(q 'submit "ls -l")
-    ;(q 'drain)
-
-    (pp (q 'ping))
-    (pp (q 'ping))
-    (thread-sleep! 0.1)
-    ;(q 'event-loop)
-    )
-  )
-
-(define (test-submit)
-  (let* ((q (tjq:new qname: 'test-q sync-job-cap: 3)))
-    (q 'submit cmdline: "sleep 2; echo job well done")
-    (thread-sleep! 4)))
-
-
-(define (test-drain-simple)
-  (let* ((q (tjq:new qname: 'test-q sync-job-cap: 3)))
-    ;(q 'submit cmdline: "sleep 2; echo job well done")
-    (thread-sleep! 1)
-    (q 'drain)))
-  
-
-(define (test-submit-bunch)
-  (let* ((q (tjq:new qname: 'test-q sync-job-cap: 3)))
-    (for-each (lambda (x)
-                (let* ((cmd (conc "echo did job "x)))
-                  (print "submit it--"x)
-                  (q 'submit cmdline: cmd))
-               )
-             (iota 6))
-    ;;(thread-sleep! 10)
-    (q 'drain)
-    ;;(q 'event-loop)
-    ))
-
-(define (test-submit-bunch2)
-  (let* ((q (tjq:new qname: 'test-q sync-job-cap: 20 )))
-    (for-each (lambda (x)
-                ;;(let* ((cmd (conc "echo did job "x)))
-                (let* ((cmd "/bin/true"))
-                  ;;(print "submit it--"x)
-                  (q 'submit cmdline: cmd))
-               )
-             (iota 6000))
-    ;;(thread-sleep! 10)
-    (q 'drain)
-    ;;(q 'event-loop)
-    ))
-
-;(test-tjq-simple)
-;;(test-submit)
-;;(test-drain-simple)
-(print "top")
-(test-submit-bunch)

DELETED example/runconfigs.config
Index: example/runconfigs.config
==================================================================
--- example/runconfigs.config
+++ /dev/null
@@ -1,23 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-[default]
-ALLTESTS see this variable
-
-# Your variables here are grouped by targets [SYSTEM/RELEASE]
-[cfg/default]
-ANOTHERVAR only defined if target is SYSTEM_val/RELEASE_val
-
-[include local.runconfigs.config]
-

DELETED example/tests/diskspace/diskspace.logpro
Index: example/tests/diskspace/diskspace.logpro
==================================================================
--- example/tests/diskspace/diskspace.logpro
+++ /dev/null
@@ -1,21 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; Analyze the output from diskspace.sh
-;;
-(expect:error in    "LogFileBody" = 0 "Insufficient space" #/ERROR: available space is less/)
-(expect:error in    "LogFileBody" = 0 "Any error"         #/err/i)
-(expect:required in "LogFileBody" > 1 "Sucess signature"  #/INFO: space available/)
-

DELETED example/tests/diskspace/diskspace.sh
Index: example/tests/diskspace/diskspace.sh
==================================================================
--- example/tests/diskspace/diskspace.sh
+++ /dev/null
@@ -1,39 +0,0 @@
-#!/bin/bash -e
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-filter=`refdb lookup $MT_RUN_AREA_HOME/$CFG_TYPE machines $TARGETHOST filter`
-
-echo "Using filter: $filter"
-
-diskareas=`mount | egrep 'ext|mfs|nfs'| egrep -v "$filter" | awk '{print $3}'`
-
-for dirname in $diskareas;do
-
-    echo "dirname: $dirname"
-
-    # measure the free space
-    freespace=`df -P -k $dirname | grep $dirname | awk '{print $4}'`
-
-    # get the minfree allowed from the refdb
-    minfree=`refdb lookup $MT_RUN_AREA_HOME/$CFG_TYPE machines $TARGETHOST minfree`
-
-    if [[ "$freespace" -lt "$minfree" ]];then
-	echo "ERROR: available space $freespace is less than minimum allowed of $minfree on $dirname"
-    else
-	echo "INFO: space available of $freespace k on $dirname meets required minimum of $minfree."
-    fi
-done

DELETED example/tests/diskspace/hostname.logpro
Index: example/tests/diskspace/hostname.logpro
==================================================================
--- example/tests/diskspace/hostname.logpro
+++ /dev/null
@@ -1,19 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(define hostname (get-host-name))
-
-(expect:required in "LogFileBody" > 0 (conc "Hostname matches " hostname) (regexp (conc "^" hostname "$")))
-

DELETED example/tests/diskspace/testconfig
Index: example/tests/diskspace/testconfig
==================================================================
--- example/tests/diskspace/testconfig
+++ /dev/null
@@ -1,27 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add steps here. Format is "stepname script"
-[ezsteps]
-hostname  hostname
-diskspace diskspace.sh
-
-[requirements]
-waiton ping
-mode itemwait
-
-# Iteration for your tests are controlled by the items section
-[items]
-TARGETHOST [system refdb getrownames $CFG_TYPE machines]

DELETED example/tests/ping/ping.logpro
Index: example/tests/ping/ping.logpro
==================================================================
--- example/tests/ping/ping.logpro
+++ /dev/null
@@ -1,18 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:error in    "LogFileBody" = 0 "Any error"         #/err/i)
-(expect:required in "LogFileBody" = 5 "Successful pings"  #/bytes from.*/)
-

DELETED example/tests/ping/testconfig
Index: example/tests/ping/testconfig
==================================================================
--- example/tests/ping/testconfig
+++ /dev/null
@@ -1,21 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-# Add steps here. Format is "stepname script"
-[ezsteps]
-ping ping -c 5 $PINGHOST
-
-# Iteration for your tests are controlled by the items section
-[items]
-PINGHOST [system refdb getrownames $CFG_TYPE machines]

Index: ezsteps.scm
==================================================================
--- ezsteps.scm
+++ ezsteps.scm
@@ -45,19 +45,19 @@
 	 (test-id       (db:test-get-id testdat))
 	 (run-id        (db:test-get-run_id testdat))
 	 (test-name     (db:test-get-testname testdat))
 	 (kill-job      #f)) ;; for future use (on re-factoring with launch.scm code
     (let loop ((count 5))
-      (if (common:file-exists? test-run-dir)
+      (if (file-exists? test-run-dir)
 	  (push-directory test-run-dir)
 	  (if (> count 0)
 	      (begin
 		(debug:print 0 *default-log-port* "WARNING: ezsteps attempting to run but test run directory " test-run-dir " is not there. Waiting and trying again " count " more times")
 		(sleep 3)
 		(loop (- count 1))))))
     (debug:print-info 0 *default-log-port* "Running in directory " test-run-dir)
-    (if (not (common:file-exists? ".ezsteps"))(create-directory ".ezsteps"))
+    (if (not (file-exists? ".ezsteps"))(create-directory ".ezsteps"))
     ;; if ezsteps was defined then we are sure to have at least one step but check anyway
     (if (not (> (length ezstepslst) 0))
 	(message-window "ERROR: You can only re-run steps defined via ezsteps")
 	(begin
 	  (let loop ((ezstep   (car ezstepslst))
@@ -83,11 +83,11 @@
 			      (loop (car tal)(cdr tal) stepname #f))))
 
 		  (debug:print 4 *default-log-port* "ezsteps:\n stepname: " stepname " stepinfo: " stepinfo " stepparts: " stepparts
 			       " stepparms: " stepparms " stepcmd: " stepcmd)
 		  
-		  (if (common:file-exists? (conc stepname ".logpro"))(set! logpro-used #t))
+		  (if (file-exists? (conc stepname ".logpro"))(set! logpro-used #t))
 		  
 		  ;; call the command using mt_ezstep
 		  (set! script (conc "mt_ezstep " stepname " " (if prevstep prevstep "-") " " stepcmd))
 		  
 		  (debug:print 4 *default-log-port* "script: " script)

Index: fdb_records.scm
==================================================================
--- fdb_records.scm
+++ fdb_records.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: filedb.scm
==================================================================
--- filedb.scm
+++ filedb.scm
@@ -19,17 +19,18 @@
 ;; (require-extension synch sqlite3 posix srfi-13 srfi-1 utils regex)
 (use sqlite3 srfi-1 posix regex srfi-69 srfi-13 posix-extras)
 (import (prefix sqlite3 sqlite3:))
 
 (declare (unit filedb))
+(declare (uses common))
 
 (include "fdb_records.scm")
 ;; (include "settings.scm")
 
 (define (filedb:open-db dbpath)
   (let* ((fdb      (make-filedb:fdb))
-	 (dbexists (common:file-exists? dbpath))
+	 (dbexists (file-exists? dbpath))
 	 (db (sqlite3:open-database dbpath)))
     (filedb:fdb-set-db!        fdb db)
     (filedb:fdb-set-dbpath!    fdb dbpath)
     (filedb:fdb-set-pathcache! fdb (make-hash-table))
     (filedb:fdb-set-idcache!   fdb (make-hash-table))

Index: gen-data-for-graph.scm
==================================================================
--- gen-data-for-graph.scm
+++ gen-data-for-graph.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: genexample.scm
==================================================================
--- genexample.scm
+++ genexample.scm
@@ -17,10 +17,11 @@
 ;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
 
 ;;======================================================================
 
 (declare (unit genexample))
+(declare (uses common))
 (use posix regex)
 
 (define genexample:example-logpro
 #<<EOF
   ;; You should have at least one expect:required. This ensures that your process ran
@@ -65,11 +66,11 @@
 	(begin
 	  (print "The path " path " does not exist or is not a directory. Attempting to create it now")
 	  (create-directory path #t)))
 
     ;; First check that the directory is empty!
-    (if (and (common:file-exists? path)
+    (if (and (file-exists? path)
 	     (not (null? (glob (conc path "/*")))))
 	(begin
 	  (print "WARNING: directory " path " is not empty, are you sure you want to continue?")
 	  (display "Enter y/n: ")
 	  (if (equal? "y" (read-line))
@@ -219,22 +220,22 @@
 	(scripts  '())
 	(items    '())
 	(rel-path #f))
 
     (cond
-     ((common:file-exists? "megatest.config")         (set! rel-path "./"))
-     ((common:file-exists? "../megatest.config")      (set! rel-path "../"))
-     ((common:file-exists? "../../megatest.config")   (set! rel-path "../../"))
-     ((common:file-exists? "../../../megatest.config")(set! rel-path "../../../"))) ;; good enough dang it.
+     ((file-exists? "megatest.config")         (set! rel-path "./"))
+     ((file-exists? "../megatest.config")      (set! rel-path "../"))
+     ((file-exists? "../../megatest.config")   (set! rel-path "../../"))
+     ((file-exists? "../../../megatest.config")(set! rel-path "../../../"))) ;; good enough dang it.
 
     ;; Don't gather data or continue if a) megatest.config can't be found or b) testconfig already exists
     (if (not rel-path)
 	(begin
 	  (print "ERROR: I could not find megatest.config, please run -create-test in the top dir of your megatest area")
 	  (exit 1)))
 
-    (if (common:file-exists? (conc rel-path "tests/" testname "/testconfig"))
+    (if (file-exists? (conc rel-path "tests/" testname "/testconfig"))
 	(begin
 	  (print "WARNING: You already have a testconfig in " rel-path "tests/" testname ", do you want to clobber your files?")
 	  (display "Enter y/n: ")
 	  (if (not (equal? "y" (read-line)))
 	      (begin

Index: gentargets.sh
==================================================================
--- gentargets.sh
+++ gentargets.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: get-config-settings.sh
==================================================================
--- get-config-settings.sh
+++ get-config-settings.sh
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: http-transport.scm
==================================================================
--- http-transport.scm
+++ http-transport.scm
@@ -551,11 +551,11 @@
          (cleanup-proc        (lambda (msg)
                                 (let* ((serv-fname      (conc "server-" (current-process-id) "-" (get-host-name) ".log"))
                                        (full-serv-fname (conc *toppath* "/logs/" serv-fname))
                                        (new-serv-fname  (conc *toppath* "/logs/" "defunct-" serv-fname)))
                                   (debug:print 0 *default-log-port* msg)
-                                  (if (common:file-exists? full-serv-fname)
+                                  (if (file-exists? full-serv-fname)
                                       (system (conc "sleep 1;mv -f " full-serv-fname " " new-serv-fname))
                                       (debug:print 0 *default-log-port* "INFO: cannot move " full-serv-fname " to " new-serv-fname))
                                   (exit)))))
     (if (and (not start-time-old) ;; last server start try was less than five seconds ago
 	     (not server-starting))

DELETED java-script-lib/jquery-3.1.0.slim.min.js
Index: java-script-lib/jquery-3.1.0.slim.min.js
==================================================================
--- java-script-lib/jquery-3.1.0.slim.min.js
+++ /dev/null
@@ -1,4 +0,0 @@
-/*! jQuery v3.1.0 -ajax,-ajax/jsonp,-ajax/load,-ajax/parseXML,-ajax/script,-ajax/var/location,-ajax/var/nonce,-ajax/var/rquery,-ajax/xhr,-manipulation/_evalUrl,-event/ajax,-effects,-effects/Tween,-effects/animatedSelector,-deprecated | (c) jQuery Foundation | jquery.org/license */
-!function(a,b){"use strict";"object"==typeof module&&"object"==typeof module.exports?module.exports=a.document?b(a,!0):function(a){if(!a.document)throw new Error("jQuery requires a window with a document");return b(a)}:b(a)}("undefined"!=typeof window?window:this,function(a,b){"use strict";var c=[],d=a.document,e=Object.getPrototypeOf,f=c.slice,g=c.concat,h=c.push,i=c.indexOf,j={},k=j.toString,l=j.hasOwnProperty,m=l.toString,n=m.call(Object),o={};function p(a,b){b=b||d;var c=b.createElement("script");c.text=a,b.head.appendChild(c).parentNode.removeChild(c)}var q="3.1.0 -ajax,-ajax/jsonp,-ajax/load,-ajax/parseXML,-ajax/script,-ajax/var/location,-ajax/var/nonce,-ajax/var/rquery,-ajax/xhr,-manipulation/_evalUrl,-event/ajax,-effects,-effects/Tween,-effects/animatedSelector,-deprecated",r=function(a,b){return new r.fn.init(a,b)},s=/^[\s\uFEFF\xA0]+|[\s\uFEFF\xA0]+$/g,t=/^-ms-/,u=/-([a-z])/g,v=function(a,b){return b.toUpperCase()};r.fn=r.prototype={jquery:q,constructor:r,length:0,toArray:function(){return f.call(this)},get:function(a){return null!=a?a<0?this[a+this.length]:this[a]:f.call(this)},pushStack:function(a){var b=r.merge(this.constructor(),a);return b.prevObject=this,b},each:function(a){return r.each(this,a)},map:function(a){return this.pushStack(r.map(this,function(b,c){return a.call(b,c,b)}))},slice:function(){return this.pushStack(f.apply(this,arguments))},first:function(){return this.eq(0)},last:function(){return this.eq(-1)},eq:function(a){var b=this.length,c=+a+(a<0?b:0);return this.pushStack(c>=0&&c<b?[this[c]]:[])},end:function(){return this.prevObject||this.constructor()},push:h,sort:c.sort,splice:c.splice},r.extend=r.fn.extend=function(){var a,b,c,d,e,f,g=arguments[0]||{},h=1,i=arguments.length,j=!1;for("boolean"==typeof g&&(j=g,g=arguments[h]||{},h++),"object"==typeof g||r.isFunction(g)||(g={}),h===i&&(g=this,h--);h<i;h++)if(null!=(a=arguments[h]))for(b in a)c=g[b],d=a[b],g!==d&&(j&&d&&(r.isPlainObject(d)||(e=r.isArray(d)))?(e?(e=!1,f=c&&r.isArray(c)?c:[]):f=c&&r.isPlainObject(c)?c:{},g[b]=r.extend(j,f,d)):void 0!==d&&(g[b]=d));return g},r.extend({expando:"jQuery"+(q+Math.random()).replace(/\D/g,""),isReady:!0,error:function(a){throw new Error(a)},noop:function(){},isFunction:function(a){return"function"===r.type(a)},isArray:Array.isArray,isWindow:function(a){return null!=a&&a===a.window},isNumeric:function(a){var b=r.type(a);return("number"===b||"string"===b)&&!isNaN(a-parseFloat(a))},isPlainObject:function(a){var b,c;return!(!a||"[object Object]"!==k.call(a))&&(!(b=e(a))||(c=l.call(b,"constructor")&&b.constructor,"function"==typeof c&&m.call(c)===n))},isEmptyObject:function(a){var b;for(b in a)return!1;return!0},type:function(a){return null==a?a+"":"object"==typeof a||"function"==typeof a?j[k.call(a)]||"object":typeof a},globalEval:function(a){p(a)},camelCase:function(a){return a.replace(t,"ms-").replace(u,v)},nodeName:function(a,b){return a.nodeName&&a.nodeName.toLowerCase()===b.toLowerCase()},each:function(a,b){var c,d=0;if(w(a)){for(c=a.length;d<c;d++)if(b.call(a[d],d,a[d])===!1)break}else for(d in a)if(b.call(a[d],d,a[d])===!1)break;return a},trim:function(a){return null==a?"":(a+"").replace(s,"")},makeArray:function(a,b){var c=b||[];return null!=a&&(w(Object(a))?r.merge(c,"string"==typeof a?[a]:a):h.call(c,a)),c},inArray:function(a,b,c){return null==b?-1:i.call(b,a,c)},merge:function(a,b){for(var c=+b.length,d=0,e=a.length;d<c;d++)a[e++]=b[d];return a.length=e,a},grep:function(a,b,c){for(var d,e=[],f=0,g=a.length,h=!c;f<g;f++)d=!b(a[f],f),d!==h&&e.push(a[f]);return e},map:function(a,b,c){var d,e,f=0,h=[];if(w(a))for(d=a.length;f<d;f++)e=b(a[f],f,c),null!=e&&h.push(e);else for(f in a)e=b(a[f],f,c),null!=e&&h.push(e);return g.apply([],h)},guid:1,proxy:function(a,b){var c,d,e;if("string"==typeof b&&(c=a[b],b=a,a=c),r.isFunction(a))return d=f.call(arguments,2),e=function(){return a.apply(b||this,d.concat(f.call(arguments)))},e.guid=a.guid=a.guid||r.guid++,e},now:Date.now,support:o}),"function"==typeof Symbol&&(r.fn[Symbol.iterator]=c[Symbol.iterator]),r.each("Boolean Number String Function Array Date RegExp Object Error Symbol".split(" "),function(a,b){j["[object "+b+"]"]=b.toLowerCase()});function w(a){var b=!!a&&"length"in a&&a.length,c=r.type(a);return"function"!==c&&!r.isWindow(a)&&("array"===c||0===b||"number"==typeof b&&b>0&&b-1 in a)}var x=function(a){var b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u="sizzle"+1*new Date,v=a.document,w=0,x=0,y=ha(),z=ha(),A=ha(),B=function(a,b){return a===b&&(l=!0),0},C={}.hasOwnProperty,D=[],E=D.pop,F=D.push,G=D.push,H=D.slice,I=function(a,b){for(var c=0,d=a.length;c<d;c++)if(a[c]===b)return c;return-1},J="checked|selected|async|autofocus|autoplay|controls|defer|disabled|hidden|ismap|loop|multiple|open|readonly|required|scoped",K="[\\x20\\t\\r\\n\\f]",L="(?:\\\\.|[\\w-]|[^\0-\\xa0])+",M="\\["+K+"*("+L+")(?:"+K+"*([*^$|!~]?=)"+K+"*(?:'((?:\\\\.|[^\\\\'])*)'|\"((?:\\\\.|[^\\\\\"])*)\"|("+L+"))|)"+K+"*\\]",N=":("+L+")(?:\\((('((?:\\\\.|[^\\\\'])*)'|\"((?:\\\\.|[^\\\\\"])*)\")|((?:\\\\.|[^\\\\()[\\]]|"+M+")*)|.*)\\)|)",O=new RegExp(K+"+","g"),P=new RegExp("^"+K+"+|((?:^|[^\\\\])(?:\\\\.)*)"+K+"+$","g"),Q=new RegExp("^"+K+"*,"+K+"*"),R=new RegExp("^"+K+"*([>+~]|"+K+")"+K+"*"),S=new RegExp("="+K+"*([^\\]'\"]*?)"+K+"*\\]","g"),T=new RegExp(N),U=new RegExp("^"+L+"$"),V={ID:new RegExp("^#("+L+")"),CLASS:new RegExp("^\\.("+L+")"),TAG:new RegExp("^("+L+"|[*])"),ATTR:new RegExp("^"+M),PSEUDO:new RegExp("^"+N),CHILD:new RegExp("^:(only|first|last|nth|nth-last)-(child|of-type)(?:\\("+K+"*(even|odd|(([+-]|)(\\d*)n|)"+K+"*(?:([+-]|)"+K+"*(\\d+)|))"+K+"*\\)|)","i"),bool:new RegExp("^(?:"+J+")$","i"),needsContext:new RegExp("^"+K+"*[>+~]|:(even|odd|eq|gt|lt|nth|first|last)(?:\\("+K+"*((?:-\\d)?\\d*)"+K+"*\\)|)(?=[^-]|$)","i")},W=/^(?:input|select|textarea|button)$/i,X=/^h\d$/i,Y=/^[^{]+\{\s*\[native \w/,Z=/^(?:#([\w-]+)|(\w+)|\.([\w-]+))$/,$=/[+~]/,_=new RegExp("\\\\([\\da-f]{1,6}"+K+"?|("+K+")|.)","ig"),aa=function(a,b,c){var d="0x"+b-65536;return d!==d||c?b:d<0?String.fromCharCode(d+65536):String.fromCharCode(d>>10|55296,1023&d|56320)},ba=/([\0-\x1f\x7f]|^-?\d)|^-$|[^\x80-\uFFFF\w-]/g,ca=function(a,b){return b?"\0"===a?"\ufffd":a.slice(0,-1)+"\\"+a.charCodeAt(a.length-1).toString(16)+" ":"\\"+a},da=function(){m()},ea=ta(function(a){return a.disabled===!0},{dir:"parentNode",next:"legend"});try{G.apply(D=H.call(v.childNodes),v.childNodes),D[v.childNodes.length].nodeType}catch(fa){G={apply:D.length?function(a,b){F.apply(a,H.call(b))}:function(a,b){var c=a.length,d=0;while(a[c++]=b[d++]);a.length=c-1}}}function ga(a,b,d,e){var f,h,j,k,l,o,r,s=b&&b.ownerDocument,w=b?b.nodeType:9;if(d=d||[],"string"!=typeof a||!a||1!==w&&9!==w&&11!==w)return d;if(!e&&((b?b.ownerDocument||b:v)!==n&&m(b),b=b||n,p)){if(11!==w&&(l=Z.exec(a)))if(f=l[1]){if(9===w){if(!(j=b.getElementById(f)))return d;if(j.id===f)return d.push(j),d}else if(s&&(j=s.getElementById(f))&&t(b,j)&&j.id===f)return d.push(j),d}else{if(l[2])return G.apply(d,b.getElementsByTagName(a)),d;if((f=l[3])&&c.getElementsByClassName&&b.getElementsByClassName)return G.apply(d,b.getElementsByClassName(f)),d}if(c.qsa&&!A[a+" "]&&(!q||!q.test(a))){if(1!==w)s=b,r=a;else if("object"!==b.nodeName.toLowerCase()){(k=b.getAttribute("id"))?k=k.replace(ba,ca):b.setAttribute("id",k=u),o=g(a),h=o.length;while(h--)o[h]="#"+k+" "+sa(o[h]);r=o.join(","),s=$.test(a)&&qa(b.parentNode)||b}if(r)try{return G.apply(d,s.querySelectorAll(r)),d}catch(x){}finally{k===u&&b.removeAttribute("id")}}}return i(a.replace(P,"$1"),b,d,e)}function ha(){var a=[];function b(c,e){return a.push(c+" ")>d.cacheLength&&delete b[a.shift()],b[c+" "]=e}return b}function ia(a){return a[u]=!0,a}function ja(a){var b=n.createElement("fieldset");try{return!!a(b)}catch(c){return!1}finally{b.parentNode&&b.parentNode.removeChild(b),b=null}}function ka(a,b){var c=a.split("|"),e=c.length;while(e--)d.attrHandle[c[e]]=b}function la(a,b){var c=b&&a,d=c&&1===a.nodeType&&1===b.nodeType&&a.sourceIndex-b.sourceIndex;if(d)return d;if(c)while(c=c.nextSibling)if(c===b)return-1;return a?1:-1}function ma(a){return function(b){var c=b.nodeName.toLowerCase();return"input"===c&&b.type===a}}function na(a){return function(b){var c=b.nodeName.toLowerCase();return("input"===c||"button"===c)&&b.type===a}}function oa(a){return function(b){return"label"in b&&b.disabled===a||"form"in b&&b.disabled===a||"form"in b&&b.disabled===!1&&(b.isDisabled===a||b.isDisabled!==!a&&("label"in b||!ea(b))!==a)}}function pa(a){return ia(function(b){return b=+b,ia(function(c,d){var e,f=a([],c.length,b),g=f.length;while(g--)c[e=f[g]]&&(c[e]=!(d[e]=c[e]))})})}function qa(a){return a&&"undefined"!=typeof a.getElementsByTagName&&a}c=ga.support={},f=ga.isXML=function(a){var b=a&&(a.ownerDocument||a).documentElement;return!!b&&"HTML"!==b.nodeName},m=ga.setDocument=function(a){var b,e,g=a?a.ownerDocument||a:v;return g!==n&&9===g.nodeType&&g.documentElement?(n=g,o=n.documentElement,p=!f(n),v!==n&&(e=n.defaultView)&&e.top!==e&&(e.addEventListener?e.addEventListener("unload",da,!1):e.attachEvent&&e.attachEvent("onunload",da)),c.attributes=ja(function(a){return a.className="i",!a.getAttribute("className")}),c.getElementsByTagName=ja(function(a){return a.appendChild(n.createComment("")),!a.getElementsByTagName("*").length}),c.getElementsByClassName=Y.test(n.getElementsByClassName),c.getById=ja(function(a){return o.appendChild(a).id=u,!n.getElementsByName||!n.getElementsByName(u).length}),c.getById?(d.find.ID=function(a,b){if("undefined"!=typeof b.getElementById&&p){var c=b.getElementById(a);return c?[c]:[]}},d.filter.ID=function(a){var b=a.replace(_,aa);return function(a){return a.getAttribute("id")===b}}):(delete d.find.ID,d.filter.ID=function(a){var b=a.replace(_,aa);return function(a){var c="undefined"!=typeof a.getAttributeNode&&a.getAttributeNode("id");return c&&c.value===b}}),d.find.TAG=c.getElementsByTagName?function(a,b){return"undefined"!=typeof b.getElementsByTagName?b.getElementsByTagName(a):c.qsa?b.querySelectorAll(a):void 0}:function(a,b){var c,d=[],e=0,f=b.getElementsByTagName(a);if("*"===a){while(c=f[e++])1===c.nodeType&&d.push(c);return d}return f},d.find.CLASS=c.getElementsByClassName&&function(a,b){if("undefined"!=typeof b.getElementsByClassName&&p)return b.getElementsByClassName(a)},r=[],q=[],(c.qsa=Y.test(n.querySelectorAll))&&(ja(function(a){o.appendChild(a).innerHTML="<a id='"+u+"'></a><select id='"+u+"-\r\\' msallowcapture=''><option selected=''></option></select>",a.querySelectorAll("[msallowcapture^='']").length&&q.push("[*^$]="+K+"*(?:''|\"\")"),a.querySelectorAll("[selected]").length||q.push("\\["+K+"*(?:value|"+J+")"),a.querySelectorAll("[id~="+u+"-]").length||q.push("~="),a.querySelectorAll(":checked").length||q.push(":checked"),a.querySelectorAll("a#"+u+"+*").length||q.push(".#.+[+~]")}),ja(function(a){a.innerHTML="<a href='' disabled='disabled'></a><select disabled='disabled'><option/></select>";var b=n.createElement("input");b.setAttribute("type","hidden"),a.appendChild(b).setAttribute("name","D"),a.querySelectorAll("[name=d]").length&&q.push("name"+K+"*[*^$|!~]?="),2!==a.querySelectorAll(":enabled").length&&q.push(":enabled",":disabled"),o.appendChild(a).disabled=!0,2!==a.querySelectorAll(":disabled").length&&q.push(":enabled",":disabled"),a.querySelectorAll("*,:x"),q.push(",.*:")})),(c.matchesSelector=Y.test(s=o.matches||o.webkitMatchesSelector||o.mozMatchesSelector||o.oMatchesSelector||o.msMatchesSelector))&&ja(function(a){c.disconnectedMatch=s.call(a,"*"),s.call(a,"[s!='']:x"),r.push("!=",N)}),q=q.length&&new RegExp(q.join("|")),r=r.length&&new RegExp(r.join("|")),b=Y.test(o.compareDocumentPosition),t=b||Y.test(o.contains)?function(a,b){var c=9===a.nodeType?a.documentElement:a,d=b&&b.parentNode;return a===d||!(!d||1!==d.nodeType||!(c.contains?c.contains(d):a.compareDocumentPosition&&16&a.compareDocumentPosition(d)))}:function(a,b){if(b)while(b=b.parentNode)if(b===a)return!0;return!1},B=b?function(a,b){if(a===b)return l=!0,0;var d=!a.compareDocumentPosition-!b.compareDocumentPosition;return d?d:(d=(a.ownerDocument||a)===(b.ownerDocument||b)?a.compareDocumentPosition(b):1,1&d||!c.sortDetached&&b.compareDocumentPosition(a)===d?a===n||a.ownerDocument===v&&t(v,a)?-1:b===n||b.ownerDocument===v&&t(v,b)?1:k?I(k,a)-I(k,b):0:4&d?-1:1)}:function(a,b){if(a===b)return l=!0,0;var c,d=0,e=a.parentNode,f=b.parentNode,g=[a],h=[b];if(!e||!f)return a===n?-1:b===n?1:e?-1:f?1:k?I(k,a)-I(k,b):0;if(e===f)return la(a,b);c=a;while(c=c.parentNode)g.unshift(c);c=b;while(c=c.parentNode)h.unshift(c);while(g[d]===h[d])d++;return d?la(g[d],h[d]):g[d]===v?-1:h[d]===v?1:0},n):n},ga.matches=function(a,b){return ga(a,null,null,b)},ga.matchesSelector=function(a,b){if((a.ownerDocument||a)!==n&&m(a),b=b.replace(S,"='$1']"),c.matchesSelector&&p&&!A[b+" "]&&(!r||!r.test(b))&&(!q||!q.test(b)))try{var d=s.call(a,b);if(d||c.disconnectedMatch||a.document&&11!==a.document.nodeType)return d}catch(e){}return ga(b,n,null,[a]).length>0},ga.contains=function(a,b){return(a.ownerDocument||a)!==n&&m(a),t(a,b)},ga.attr=function(a,b){(a.ownerDocument||a)!==n&&m(a);var e=d.attrHandle[b.toLowerCase()],f=e&&C.call(d.attrHandle,b.toLowerCase())?e(a,b,!p):void 0;return void 0!==f?f:c.attributes||!p?a.getAttribute(b):(f=a.getAttributeNode(b))&&f.specified?f.value:null},ga.escape=function(a){return(a+"").replace(ba,ca)},ga.error=function(a){throw new Error("Syntax error, unrecognized expression: "+a)},ga.uniqueSort=function(a){var b,d=[],e=0,f=0;if(l=!c.detectDuplicates,k=!c.sortStable&&a.slice(0),a.sort(B),l){while(b=a[f++])b===a[f]&&(e=d.push(f));while(e--)a.splice(d[e],1)}return k=null,a},e=ga.getText=function(a){var b,c="",d=0,f=a.nodeType;if(f){if(1===f||9===f||11===f){if("string"==typeof a.textContent)return a.textContent;for(a=a.firstChild;a;a=a.nextSibling)c+=e(a)}else if(3===f||4===f)return a.nodeValue}else while(b=a[d++])c+=e(b);return c},d=ga.selectors={cacheLength:50,createPseudo:ia,match:V,attrHandle:{},find:{},relative:{">":{dir:"parentNode",first:!0}," ":{dir:"parentNode"},"+":{dir:"previousSibling",first:!0},"~":{dir:"previousSibling"}},preFilter:{ATTR:function(a){return a[1]=a[1].replace(_,aa),a[3]=(a[3]||a[4]||a[5]||"").replace(_,aa),"~="===a[2]&&(a[3]=" "+a[3]+" "),a.slice(0,4)},CHILD:function(a){return a[1]=a[1].toLowerCase(),"nth"===a[1].slice(0,3)?(a[3]||ga.error(a[0]),a[4]=+(a[4]?a[5]+(a[6]||1):2*("even"===a[3]||"odd"===a[3])),a[5]=+(a[7]+a[8]||"odd"===a[3])):a[3]&&ga.error(a[0]),a},PSEUDO:function(a){var b,c=!a[6]&&a[2];return V.CHILD.test(a[0])?null:(a[3]?a[2]=a[4]||a[5]||"":c&&T.test(c)&&(b=g(c,!0))&&(b=c.indexOf(")",c.length-b)-c.length)&&(a[0]=a[0].slice(0,b),a[2]=c.slice(0,b)),a.slice(0,3))}},filter:{TAG:function(a){var b=a.replace(_,aa).toLowerCase();return"*"===a?function(){return!0}:function(a){return a.nodeName&&a.nodeName.toLowerCase()===b}},CLASS:function(a){var b=y[a+" "];return b||(b=new RegExp("(^|"+K+")"+a+"("+K+"|$)"))&&y(a,function(a){return b.test("string"==typeof a.className&&a.className||"undefined"!=typeof a.getAttribute&&a.getAttribute("class")||"")})},ATTR:function(a,b,c){return function(d){var e=ga.attr(d,a);return null==e?"!="===b:!b||(e+="","="===b?e===c:"!="===b?e!==c:"^="===b?c&&0===e.indexOf(c):"*="===b?c&&e.indexOf(c)>-1:"$="===b?c&&e.slice(-c.length)===c:"~="===b?(" "+e.replace(O," ")+" ").indexOf(c)>-1:"|="===b&&(e===c||e.slice(0,c.length+1)===c+"-"))}},CHILD:function(a,b,c,d,e){var f="nth"!==a.slice(0,3),g="last"!==a.slice(-4),h="of-type"===b;return 1===d&&0===e?function(a){return!!a.parentNode}:function(b,c,i){var j,k,l,m,n,o,p=f!==g?"nextSibling":"previousSibling",q=b.parentNode,r=h&&b.nodeName.toLowerCase(),s=!i&&!h,t=!1;if(q){if(f){while(p){m=b;while(m=m[p])if(h?m.nodeName.toLowerCase()===r:1===m.nodeType)return!1;o=p="only"===a&&!o&&"nextSibling"}return!0}if(o=[g?q.firstChild:q.lastChild],g&&s){m=q,l=m[u]||(m[u]={}),k=l[m.uniqueID]||(l[m.uniqueID]={}),j=k[a]||[],n=j[0]===w&&j[1],t=n&&j[2],m=n&&q.childNodes[n];while(m=++n&&m&&m[p]||(t=n=0)||o.pop())if(1===m.nodeType&&++t&&m===b){k[a]=[w,n,t];break}}else if(s&&(m=b,l=m[u]||(m[u]={}),k=l[m.uniqueID]||(l[m.uniqueID]={}),j=k[a]||[],n=j[0]===w&&j[1],t=n),t===!1)while(m=++n&&m&&m[p]||(t=n=0)||o.pop())if((h?m.nodeName.toLowerCase()===r:1===m.nodeType)&&++t&&(s&&(l=m[u]||(m[u]={}),k=l[m.uniqueID]||(l[m.uniqueID]={}),k[a]=[w,t]),m===b))break;return t-=e,t===d||t%d===0&&t/d>=0}}},PSEUDO:function(a,b){var c,e=d.pseudos[a]||d.setFilters[a.toLowerCase()]||ga.error("unsupported pseudo: "+a);return e[u]?e(b):e.length>1?(c=[a,a,"",b],d.setFilters.hasOwnProperty(a.toLowerCase())?ia(function(a,c){var d,f=e(a,b),g=f.length;while(g--)d=I(a,f[g]),a[d]=!(c[d]=f[g])}):function(a){return e(a,0,c)}):e}},pseudos:{not:ia(function(a){var b=[],c=[],d=h(a.replace(P,"$1"));return d[u]?ia(function(a,b,c,e){var f,g=d(a,null,e,[]),h=a.length;while(h--)(f=g[h])&&(a[h]=!(b[h]=f))}):function(a,e,f){return b[0]=a,d(b,null,f,c),b[0]=null,!c.pop()}}),has:ia(function(a){return function(b){return ga(a,b).length>0}}),contains:ia(function(a){return a=a.replace(_,aa),function(b){return(b.textContent||b.innerText||e(b)).indexOf(a)>-1}}),lang:ia(function(a){return U.test(a||"")||ga.error("unsupported lang: "+a),a=a.replace(_,aa).toLowerCase(),function(b){var c;do if(c=p?b.lang:b.getAttribute("xml:lang")||b.getAttribute("lang"))return c=c.toLowerCase(),c===a||0===c.indexOf(a+"-");while((b=b.parentNode)&&1===b.nodeType);return!1}}),target:function(b){var c=a.location&&a.location.hash;return c&&c.slice(1)===b.id},root:function(a){return a===o},focus:function(a){return a===n.activeElement&&(!n.hasFocus||n.hasFocus())&&!!(a.type||a.href||~a.tabIndex)},enabled:oa(!1),disabled:oa(!0),checked:function(a){var b=a.nodeName.toLowerCase();return"input"===b&&!!a.checked||"option"===b&&!!a.selected},selected:function(a){return a.parentNode&&a.parentNode.selectedIndex,a.selected===!0},empty:function(a){for(a=a.firstChild;a;a=a.nextSibling)if(a.nodeType<6)return!1;return!0},parent:function(a){return!d.pseudos.empty(a)},header:function(a){return X.test(a.nodeName)},input:function(a){return W.test(a.nodeName)},button:function(a){var b=a.nodeName.toLowerCase();return"input"===b&&"button"===a.type||"button"===b},text:function(a){var b;return"input"===a.nodeName.toLowerCase()&&"text"===a.type&&(null==(b=a.getAttribute("type"))||"text"===b.toLowerCase())},first:pa(function(){return[0]}),last:pa(function(a,b){return[b-1]}),eq:pa(function(a,b,c){return[c<0?c+b:c]}),even:pa(function(a,b){for(var c=0;c<b;c+=2)a.push(c);return a}),odd:pa(function(a,b){for(var c=1;c<b;c+=2)a.push(c);return a}),lt:pa(function(a,b,c){for(var d=c<0?c+b:c;--d>=0;)a.push(d);return a}),gt:pa(function(a,b,c){for(var d=c<0?c+b:c;++d<b;)a.push(d);return a})}},d.pseudos.nth=d.pseudos.eq;for(b in{radio:!0,checkbox:!0,file:!0,password:!0,image:!0})d.pseudos[b]=ma(b);for(b in{submit:!0,reset:!0})d.pseudos[b]=na(b);function ra(){}ra.prototype=d.filters=d.pseudos,d.setFilters=new ra,g=ga.tokenize=function(a,b){var c,e,f,g,h,i,j,k=z[a+" "];if(k)return b?0:k.slice(0);h=a,i=[],j=d.preFilter;while(h){c&&!(e=Q.exec(h))||(e&&(h=h.slice(e[0].length)||h),i.push(f=[])),c=!1,(e=R.exec(h))&&(c=e.shift(),f.push({value:c,type:e[0].replace(P," ")}),h=h.slice(c.length));for(g in d.filter)!(e=V[g].exec(h))||j[g]&&!(e=j[g](e))||(c=e.shift(),f.push({value:c,type:g,matches:e}),h=h.slice(c.length));if(!c)break}return b?h.length:h?ga.error(a):z(a,i).slice(0)};function sa(a){for(var b=0,c=a.length,d="";b<c;b++)d+=a[b].value;return d}function ta(a,b,c){var d=b.dir,e=b.next,f=e||d,g=c&&"parentNode"===f,h=x++;return b.first?function(b,c,e){while(b=b[d])if(1===b.nodeType||g)return a(b,c,e)}:function(b,c,i){var j,k,l,m=[w,h];if(i){while(b=b[d])if((1===b.nodeType||g)&&a(b,c,i))return!0}else while(b=b[d])if(1===b.nodeType||g)if(l=b[u]||(b[u]={}),k=l[b.uniqueID]||(l[b.uniqueID]={}),e&&e===b.nodeName.toLowerCase())b=b[d]||b;else{if((j=k[f])&&j[0]===w&&j[1]===h)return m[2]=j[2];if(k[f]=m,m[2]=a(b,c,i))return!0}}}function ua(a){return a.length>1?function(b,c,d){var e=a.length;while(e--)if(!a[e](b,c,d))return!1;return!0}:a[0]}function va(a,b,c){for(var d=0,e=b.length;d<e;d++)ga(a,b[d],c);return c}function wa(a,b,c,d,e){for(var f,g=[],h=0,i=a.length,j=null!=b;h<i;h++)(f=a[h])&&(c&&!c(f,d,e)||(g.push(f),j&&b.push(h)));return g}function xa(a,b,c,d,e,f){return d&&!d[u]&&(d=xa(d)),e&&!e[u]&&(e=xa(e,f)),ia(function(f,g,h,i){var j,k,l,m=[],n=[],o=g.length,p=f||va(b||"*",h.nodeType?[h]:h,[]),q=!a||!f&&b?p:wa(p,m,a,h,i),r=c?e||(f?a:o||d)?[]:g:q;if(c&&c(q,r,h,i),d){j=wa(r,n),d(j,[],h,i),k=j.length;while(k--)(l=j[k])&&(r[n[k]]=!(q[n[k]]=l))}if(f){if(e||a){if(e){j=[],k=r.length;while(k--)(l=r[k])&&j.push(q[k]=l);e(null,r=[],j,i)}k=r.length;while(k--)(l=r[k])&&(j=e?I(f,l):m[k])>-1&&(f[j]=!(g[j]=l))}}else r=wa(r===g?r.splice(o,r.length):r),e?e(null,g,r,i):G.apply(g,r)})}function ya(a){for(var b,c,e,f=a.length,g=d.relative[a[0].type],h=g||d.relative[" "],i=g?1:0,k=ta(function(a){return a===b},h,!0),l=ta(function(a){return I(b,a)>-1},h,!0),m=[function(a,c,d){var e=!g&&(d||c!==j)||((b=c).nodeType?k(a,c,d):l(a,c,d));return b=null,e}];i<f;i++)if(c=d.relative[a[i].type])m=[ta(ua(m),c)];else{if(c=d.filter[a[i].type].apply(null,a[i].matches),c[u]){for(e=++i;e<f;e++)if(d.relative[a[e].type])break;return xa(i>1&&ua(m),i>1&&sa(a.slice(0,i-1).concat({value:" "===a[i-2].type?"*":""})).replace(P,"$1"),c,i<e&&ya(a.slice(i,e)),e<f&&ya(a=a.slice(e)),e<f&&sa(a))}m.push(c)}return ua(m)}function za(a,b){var c=b.length>0,e=a.length>0,f=function(f,g,h,i,k){var l,o,q,r=0,s="0",t=f&&[],u=[],v=j,x=f||e&&d.find.TAG("*",k),y=w+=null==v?1:Math.random()||.1,z=x.length;for(k&&(j=g===n||g||k);s!==z&&null!=(l=x[s]);s++){if(e&&l){o=0,g||l.ownerDocument===n||(m(l),h=!p);while(q=a[o++])if(q(l,g||n,h)){i.push(l);break}k&&(w=y)}c&&((l=!q&&l)&&r--,f&&t.push(l))}if(r+=s,c&&s!==r){o=0;while(q=b[o++])q(t,u,g,h);if(f){if(r>0)while(s--)t[s]||u[s]||(u[s]=E.call(i));u=wa(u)}G.apply(i,u),k&&!f&&u.length>0&&r+b.length>1&&ga.uniqueSort(i)}return k&&(w=y,j=v),t};return c?ia(f):f}return h=ga.compile=function(a,b){var c,d=[],e=[],f=A[a+" "];if(!f){b||(b=g(a)),c=b.length;while(c--)f=ya(b[c]),f[u]?d.push(f):e.push(f);f=A(a,za(e,d)),f.selector=a}return f},i=ga.select=function(a,b,e,f){var i,j,k,l,m,n="function"==typeof a&&a,o=!f&&g(a=n.selector||a);if(e=e||[],1===o.length){if(j=o[0]=o[0].slice(0),j.length>2&&"ID"===(k=j[0]).type&&c.getById&&9===b.nodeType&&p&&d.relative[j[1].type]){if(b=(d.find.ID(k.matches[0].replace(_,aa),b)||[])[0],!b)return e;n&&(b=b.parentNode),a=a.slice(j.shift().value.length)}i=V.needsContext.test(a)?0:j.length;while(i--){if(k=j[i],d.relative[l=k.type])break;if((m=d.find[l])&&(f=m(k.matches[0].replace(_,aa),$.test(j[0].type)&&qa(b.parentNode)||b))){if(j.splice(i,1),a=f.length&&sa(j),!a)return G.apply(e,f),e;break}}}return(n||h(a,o))(f,b,!p,e,!b||$.test(a)&&qa(b.parentNode)||b),e},c.sortStable=u.split("").sort(B).join("")===u,c.detectDuplicates=!!l,m(),c.sortDetached=ja(function(a){return 1&a.compareDocumentPosition(n.createElement("fieldset"))}),ja(function(a){return a.innerHTML="<a href='#'></a>","#"===a.firstChild.getAttribute("href")})||ka("type|href|height|width",function(a,b,c){if(!c)return a.getAttribute(b,"type"===b.toLowerCase()?1:2)}),c.attributes&&ja(function(a){return a.innerHTML="<input/>",a.firstChild.setAttribute("value",""),""===a.firstChild.getAttribute("value")})||ka("value",function(a,b,c){if(!c&&"input"===a.nodeName.toLowerCase())return a.defaultValue}),ja(function(a){return null==a.getAttribute("disabled")})||ka(J,function(a,b,c){var d;if(!c)return a[b]===!0?b.toLowerCase():(d=a.getAttributeNode(b))&&d.specified?d.value:null}),ga}(a);r.find=x,r.expr=x.selectors,r.expr[":"]=r.expr.pseudos,r.uniqueSort=r.unique=x.uniqueSort,r.text=x.getText,r.isXMLDoc=x.isXML,r.contains=x.contains,r.escapeSelector=x.escape;var y=function(a,b,c){var d=[],e=void 0!==c;while((a=a[b])&&9!==a.nodeType)if(1===a.nodeType){if(e&&r(a).is(c))break;d.push(a)}return d},z=function(a,b){for(var c=[];a;a=a.nextSibling)1===a.nodeType&&a!==b&&c.push(a);return c},A=r.expr.match.needsContext,B=/^<([a-z][^\/\0>:\x20\t\r\n\f]*)[\x20\t\r\n\f]*\/?>(?:<\/\1>|)$/i,C=/^.[^:#\[\.,]*$/;function D(a,b,c){if(r.isFunction(b))return r.grep(a,function(a,d){return!!b.call(a,d,a)!==c});if(b.nodeType)return r.grep(a,function(a){return a===b!==c});if("string"==typeof b){if(C.test(b))return r.filter(b,a,c);b=r.filter(b,a)}return r.grep(a,function(a){return i.call(b,a)>-1!==c&&1===a.nodeType})}r.filter=function(a,b,c){var d=b[0];return c&&(a=":not("+a+")"),1===b.length&&1===d.nodeType?r.find.matchesSelector(d,a)?[d]:[]:r.find.matches(a,r.grep(b,function(a){return 1===a.nodeType}))},r.fn.extend({find:function(a){var b,c,d=this.length,e=this;if("string"!=typeof a)return this.pushStack(r(a).filter(function(){for(b=0;b<d;b++)if(r.contains(e[b],this))return!0}));for(c=this.pushStack([]),b=0;b<d;b++)r.find(a,e[b],c);return d>1?r.uniqueSort(c):c},filter:function(a){return this.pushStack(D(this,a||[],!1))},not:function(a){return this.pushStack(D(this,a||[],!0))},is:function(a){return!!D(this,"string"==typeof a&&A.test(a)?r(a):a||[],!1).length}});var E,F=/^(?:\s*(<[\w\W]+>)[^>]*|#([\w-]+))$/,G=r.fn.init=function(a,b,c){var e,f;if(!a)return this;if(c=c||E,"string"==typeof a){if(e="<"===a[0]&&">"===a[a.length-1]&&a.length>=3?[null,a,null]:F.exec(a),!e||!e[1]&&b)return!b||b.jquery?(b||c).find(a):this.constructor(b).find(a);if(e[1]){if(b=b instanceof r?b[0]:b,r.merge(this,r.parseHTML(e[1],b&&b.nodeType?b.ownerDocument||b:d,!0)),B.test(e[1])&&r.isPlainObject(b))for(e in b)r.isFunction(this[e])?this[e](b[e]):this.attr(e,b[e]);return this}return f=d.getElementById(e[2]),f&&(this[0]=f,this.length=1),this}return a.nodeType?(this[0]=a,this.length=1,this):r.isFunction(a)?void 0!==c.ready?c.ready(a):a(r):r.makeArray(a,this)};G.prototype=r.fn,E=r(d);var H=/^(?:parents|prev(?:Until|All))/,I={children:!0,contents:!0,next:!0,prev:!0};r.fn.extend({has:function(a){var b=r(a,this),c=b.length;return this.filter(function(){for(var a=0;a<c;a++)if(r.contains(this,b[a]))return!0})},closest:function(a,b){var c,d=0,e=this.length,f=[],g="string"!=typeof a&&r(a);if(!A.test(a))for(;d<e;d++)for(c=this[d];c&&c!==b;c=c.parentNode)if(c.nodeType<11&&(g?g.index(c)>-1:1===c.nodeType&&r.find.matchesSelector(c,a))){f.push(c);break}return this.pushStack(f.length>1?r.uniqueSort(f):f)},index:function(a){return a?"string"==typeof a?i.call(r(a),this[0]):i.call(this,a.jquery?a[0]:a):this[0]&&this[0].parentNode?this.first().prevAll().length:-1},add:function(a,b){return this.pushStack(r.uniqueSort(r.merge(this.get(),r(a,b))))},addBack:function(a){return this.add(null==a?this.prevObject:this.prevObject.filter(a))}});function J(a,b){while((a=a[b])&&1!==a.nodeType);return a}r.each({parent:function(a){var b=a.parentNode;return b&&11!==b.nodeType?b:null},parents:function(a){return y(a,"parentNode")},parentsUntil:function(a,b,c){return y(a,"parentNode",c)},next:function(a){return J(a,"nextSibling")},prev:function(a){return J(a,"previousSibling")},nextAll:function(a){return y(a,"nextSibling")},prevAll:function(a){return y(a,"previousSibling")},nextUntil:function(a,b,c){return y(a,"nextSibling",c)},prevUntil:function(a,b,c){return y(a,"previousSibling",c)},siblings:function(a){return z((a.parentNode||{}).firstChild,a)},children:function(a){return z(a.firstChild)},contents:function(a){return a.contentDocument||r.merge([],a.childNodes)}},function(a,b){r.fn[a]=function(c,d){var e=r.map(this,b,c);return"Until"!==a.slice(-5)&&(d=c),d&&"string"==typeof d&&(e=r.filter(d,e)),this.length>1&&(I[a]||r.uniqueSort(e),H.test(a)&&e.reverse()),this.pushStack(e)}});var K=/\S+/g;function L(a){var b={};return r.each(a.match(K)||[],function(a,c){b[c]=!0}),b}r.Callbacks=function(a){a="string"==typeof a?L(a):r.extend({},a);var b,c,d,e,f=[],g=[],h=-1,i=function(){for(e=a.once,d=b=!0;g.length;h=-1){c=g.shift();while(++h<f.length)f[h].apply(c[0],c[1])===!1&&a.stopOnFalse&&(h=f.length,c=!1)}a.memory||(c=!1),b=!1,e&&(f=c?[]:"")},j={add:function(){return f&&(c&&!b&&(h=f.length-1,g.push(c)),function d(b){r.each(b,function(b,c){r.isFunction(c)?a.unique&&j.has(c)||f.push(c):c&&c.length&&"string"!==r.type(c)&&d(c)})}(arguments),c&&!b&&i()),this},remove:function(){return r.each(arguments,function(a,b){var c;while((c=r.inArray(b,f,c))>-1)f.splice(c,1),c<=h&&h--}),this},has:function(a){return a?r.inArray(a,f)>-1:f.length>0},empty:function(){return f&&(f=[]),this},disable:function(){return e=g=[],f=c="",this},disabled:function(){return!f},lock:function(){return e=g=[],c||b||(f=c=""),this},locked:function(){return!!e},fireWith:function(a,c){return e||(c=c||[],c=[a,c.slice?c.slice():c],g.push(c),b||i()),this},fire:function(){return j.fireWith(this,arguments),this},fired:function(){return!!d}};return j};function M(a){return a}function N(a){throw a}function O(a,b,c){var d;try{a&&r.isFunction(d=a.promise)?d.call(a).done(b).fail(c):a&&r.isFunction(d=a.then)?d.call(a,b,c):b.call(void 0,a)}catch(a){c.call(void 0,a)}}r.extend({Deferred:function(b){var c=[["notify","progress",r.Callbacks("memory"),r.Callbacks("memory"),2],["resolve","done",r.Callbacks("once memory"),r.Callbacks("once memory"),0,"resolved"],["reject","fail",r.Callbacks("once memory"),r.Callbacks("once memory"),1,"rejected"]],d="pending",e={state:function(){return d},always:function(){return f.done(arguments).fail(arguments),this},"catch":function(a){return e.then(null,a)},pipe:function(){var a=arguments;return r.Deferred(function(b){r.each(c,function(c,d){var e=r.isFunction(a[d[4]])&&a[d[4]];f[d[1]](function(){var a=e&&e.apply(this,arguments);a&&r.isFunction(a.promise)?a.promise().progress(b.notify).done(b.resolve).fail(b.reject):b[d[0]+"With"](this,e?[a]:arguments)})}),a=null}).promise()},then:function(b,d,e){var f=0;function g(b,c,d,e){return function(){var h=this,i=arguments,j=function(){var a,j;if(!(b<f)){if(a=d.apply(h,i),a===c.promise())throw new TypeError("Thenable self-resolution");j=a&&("object"==typeof a||"function"==typeof a)&&a.then,r.isFunction(j)?e?j.call(a,g(f,c,M,e),g(f,c,N,e)):(f++,j.call(a,g(f,c,M,e),g(f,c,N,e),g(f,c,M,c.notifyWith))):(d!==M&&(h=void 0,i=[a]),(e||c.resolveWith)(h,i))}},k=e?j:function(){try{j()}catch(a){r.Deferred.exceptionHook&&r.Deferred.exceptionHook(a,k.stackTrace),b+1>=f&&(d!==N&&(h=void 0,i=[a]),c.rejectWith(h,i))}};b?k():(r.Deferred.getStackHook&&(k.stackTrace=r.Deferred.getStackHook()),a.setTimeout(k))}}return r.Deferred(function(a){c[0][3].add(g(0,a,r.isFunction(e)?e:M,a.notifyWith)),c[1][3].add(g(0,a,r.isFunction(b)?b:M)),c[2][3].add(g(0,a,r.isFunction(d)?d:N))}).promise()},promise:function(a){return null!=a?r.extend(a,e):e}},f={};return r.each(c,function(a,b){var g=b[2],h=b[5];e[b[1]]=g.add,h&&g.add(function(){d=h},c[3-a][2].disable,c[0][2].lock),g.add(b[3].fire),f[b[0]]=function(){return f[b[0]+"With"](this===f?void 0:this,arguments),this},f[b[0]+"With"]=g.fireWith}),e.promise(f),b&&b.call(f,f),f},when:function(a){var b=arguments.length,c=b,d=Array(c),e=f.call(arguments),g=r.Deferred(),h=function(a){return function(c){d[a]=this,e[a]=arguments.length>1?f.call(arguments):c,--b||g.resolveWith(d,e)}};if(b<=1&&(O(a,g.done(h(c)).resolve,g.reject),"pending"===g.state()||r.isFunction(e[c]&&e[c].then)))return g.then();while(c--)O(e[c],h(c),g.reject);return g.promise()}});var P=/^(Eval|Internal|Range|Reference|Syntax|Type|URI)Error$/;r.Deferred.exceptionHook=function(b,c){a.console&&a.console.warn&&b&&P.test(b.name)&&a.console.warn("jQuery.Deferred exception: "+b.message,b.stack,c)},r.readyException=function(b){a.setTimeout(function(){throw b})};var Q=r.Deferred();r.fn.ready=function(a){return Q.then(a)["catch"](function(a){r.readyException(a)}),this},r.extend({isReady:!1,readyWait:1,holdReady:function(a){a?r.readyWait++:r.ready(!0)},ready:function(a){(a===!0?--r.readyWait:r.isReady)||(r.isReady=!0,a!==!0&&--r.readyWait>0||Q.resolveWith(d,[r]))}}),r.ready.then=Q.then;function R(){d.removeEventListener("DOMContentLoaded",R),a.removeEventListener("load",R),r.ready()}"complete"===d.readyState||"loading"!==d.readyState&&!d.documentElement.doScroll?a.setTimeout(r.ready):(d.addEventListener("DOMContentLoaded",R),
-a.addEventListener("load",R));var S=function(a,b,c,d,e,f,g){var h=0,i=a.length,j=null==c;if("object"===r.type(c)){e=!0;for(h in c)S(a,b,h,c[h],!0,f,g)}else if(void 0!==d&&(e=!0,r.isFunction(d)||(g=!0),j&&(g?(b.call(a,d),b=null):(j=b,b=function(a,b,c){return j.call(r(a),c)})),b))for(;h<i;h++)b(a[h],c,g?d:d.call(a[h],h,b(a[h],c)));return e?a:j?b.call(a):i?b(a[0],c):f},T=function(a){return 1===a.nodeType||9===a.nodeType||!+a.nodeType};function U(){this.expando=r.expando+U.uid++}U.uid=1,U.prototype={cache:function(a){var b=a[this.expando];return b||(b={},T(a)&&(a.nodeType?a[this.expando]=b:Object.defineProperty(a,this.expando,{value:b,configurable:!0}))),b},set:function(a,b,c){var d,e=this.cache(a);if("string"==typeof b)e[r.camelCase(b)]=c;else for(d in b)e[r.camelCase(d)]=b[d];return e},get:function(a,b){return void 0===b?this.cache(a):a[this.expando]&&a[this.expando][r.camelCase(b)]},access:function(a,b,c){return void 0===b||b&&"string"==typeof b&&void 0===c?this.get(a,b):(this.set(a,b,c),void 0!==c?c:b)},remove:function(a,b){var c,d=a[this.expando];if(void 0!==d){if(void 0!==b){r.isArray(b)?b=b.map(r.camelCase):(b=r.camelCase(b),b=b in d?[b]:b.match(K)||[]),c=b.length;while(c--)delete d[b[c]]}(void 0===b||r.isEmptyObject(d))&&(a.nodeType?a[this.expando]=void 0:delete a[this.expando])}},hasData:function(a){var b=a[this.expando];return void 0!==b&&!r.isEmptyObject(b)}};var V=new U,W=new U,X=/^(?:\{[\w\W]*\}|\[[\w\W]*\])$/,Y=/[A-Z]/g;function Z(a,b,c){var d;if(void 0===c&&1===a.nodeType)if(d="data-"+b.replace(Y,"-$&").toLowerCase(),c=a.getAttribute(d),"string"==typeof c){try{c="true"===c||"false"!==c&&("null"===c?null:+c+""===c?+c:X.test(c)?JSON.parse(c):c)}catch(e){}W.set(a,b,c)}else c=void 0;return c}r.extend({hasData:function(a){return W.hasData(a)||V.hasData(a)},data:function(a,b,c){return W.access(a,b,c)},removeData:function(a,b){W.remove(a,b)},_data:function(a,b,c){return V.access(a,b,c)},_removeData:function(a,b){V.remove(a,b)}}),r.fn.extend({data:function(a,b){var c,d,e,f=this[0],g=f&&f.attributes;if(void 0===a){if(this.length&&(e=W.get(f),1===f.nodeType&&!V.get(f,"hasDataAttrs"))){c=g.length;while(c--)g[c]&&(d=g[c].name,0===d.indexOf("data-")&&(d=r.camelCase(d.slice(5)),Z(f,d,e[d])));V.set(f,"hasDataAttrs",!0)}return e}return"object"==typeof a?this.each(function(){W.set(this,a)}):S(this,function(b){var c;if(f&&void 0===b){if(c=W.get(f,a),void 0!==c)return c;if(c=Z(f,a),void 0!==c)return c}else this.each(function(){W.set(this,a,b)})},null,b,arguments.length>1,null,!0)},removeData:function(a){return this.each(function(){W.remove(this,a)})}}),r.extend({queue:function(a,b,c){var d;if(a)return b=(b||"fx")+"queue",d=V.get(a,b),c&&(!d||r.isArray(c)?d=V.access(a,b,r.makeArray(c)):d.push(c)),d||[]},dequeue:function(a,b){b=b||"fx";var c=r.queue(a,b),d=c.length,e=c.shift(),f=r._queueHooks(a,b),g=function(){r.dequeue(a,b)};"inprogress"===e&&(e=c.shift(),d--),e&&("fx"===b&&c.unshift("inprogress"),delete f.stop,e.call(a,g,f)),!d&&f&&f.empty.fire()},_queueHooks:function(a,b){var c=b+"queueHooks";return V.get(a,c)||V.access(a,c,{empty:r.Callbacks("once memory").add(function(){V.remove(a,[b+"queue",c])})})}}),r.fn.extend({queue:function(a,b){var c=2;return"string"!=typeof a&&(b=a,a="fx",c--),arguments.length<c?r.queue(this[0],a):void 0===b?this:this.each(function(){var c=r.queue(this,a,b);r._queueHooks(this,a),"fx"===a&&"inprogress"!==c[0]&&r.dequeue(this,a)})},dequeue:function(a){return this.each(function(){r.dequeue(this,a)})},clearQueue:function(a){return this.queue(a||"fx",[])},promise:function(a,b){var c,d=1,e=r.Deferred(),f=this,g=this.length,h=function(){--d||e.resolveWith(f,[f])};"string"!=typeof a&&(b=a,a=void 0),a=a||"fx";while(g--)c=V.get(f[g],a+"queueHooks"),c&&c.empty&&(d++,c.empty.add(h));return h(),e.promise(b)}});var $=/[+-]?(?:\d*\.|)\d+(?:[eE][+-]?\d+|)/.source,_=new RegExp("^(?:([+-])=|)("+$+")([a-z%]*)$","i"),aa=["Top","Right","Bottom","Left"],ba=function(a,b){return a=b||a,"none"===a.style.display||""===a.style.display&&r.contains(a.ownerDocument,a)&&"none"===r.css(a,"display")},ca=function(a,b,c,d){var e,f,g={};for(f in b)g[f]=a.style[f],a.style[f]=b[f];e=c.apply(a,d||[]);for(f in b)a.style[f]=g[f];return e};function da(a,b,c,d){var e,f=1,g=20,h=d?function(){return d.cur()}:function(){return r.css(a,b,"")},i=h(),j=c&&c[3]||(r.cssNumber[b]?"":"px"),k=(r.cssNumber[b]||"px"!==j&&+i)&&_.exec(r.css(a,b));if(k&&k[3]!==j){j=j||k[3],c=c||[],k=+i||1;do f=f||".5",k/=f,r.style(a,b,k+j);while(f!==(f=h()/i)&&1!==f&&--g)}return c&&(k=+k||+i||0,e=c[1]?k+(c[1]+1)*c[2]:+c[2],d&&(d.unit=j,d.start=k,d.end=e)),e}var ea={};function fa(a){var b,c=a.ownerDocument,d=a.nodeName,e=ea[d];return e?e:(b=c.body.appendChild(c.createElement(d)),e=r.css(b,"display"),b.parentNode.removeChild(b),"none"===e&&(e="block"),ea[d]=e,e)}function ga(a,b){for(var c,d,e=[],f=0,g=a.length;f<g;f++)d=a[f],d.style&&(c=d.style.display,b?("none"===c&&(e[f]=V.get(d,"display")||null,e[f]||(d.style.display="")),""===d.style.display&&ba(d)&&(e[f]=fa(d))):"none"!==c&&(e[f]="none",V.set(d,"display",c)));for(f=0;f<g;f++)null!=e[f]&&(a[f].style.display=e[f]);return a}r.fn.extend({show:function(){return ga(this,!0)},hide:function(){return ga(this)},toggle:function(a){return"boolean"==typeof a?a?this.show():this.hide():this.each(function(){ba(this)?r(this).show():r(this).hide()})}});var ha=/^(?:checkbox|radio)$/i,ia=/<([a-z][^\/\0>\x20\t\r\n\f]+)/i,ja=/^$|\/(?:java|ecma)script/i,ka={option:[1,"<select multiple='multiple'>","</select>"],thead:[1,"<table>","</table>"],col:[2,"<table><colgroup>","</colgroup></table>"],tr:[2,"<table><tbody>","</tbody></table>"],td:[3,"<table><tbody><tr>","</tr></tbody></table>"],_default:[0,"",""]};ka.optgroup=ka.option,ka.tbody=ka.tfoot=ka.colgroup=ka.caption=ka.thead,ka.th=ka.td;function la(a,b){var c="undefined"!=typeof a.getElementsByTagName?a.getElementsByTagName(b||"*"):"undefined"!=typeof a.querySelectorAll?a.querySelectorAll(b||"*"):[];return void 0===b||b&&r.nodeName(a,b)?r.merge([a],c):c}function ma(a,b){for(var c=0,d=a.length;c<d;c++)V.set(a[c],"globalEval",!b||V.get(b[c],"globalEval"))}var na=/<|&#?\w+;/;function oa(a,b,c,d,e){for(var f,g,h,i,j,k,l=b.createDocumentFragment(),m=[],n=0,o=a.length;n<o;n++)if(f=a[n],f||0===f)if("object"===r.type(f))r.merge(m,f.nodeType?[f]:f);else if(na.test(f)){g=g||l.appendChild(b.createElement("div")),h=(ia.exec(f)||["",""])[1].toLowerCase(),i=ka[h]||ka._default,g.innerHTML=i[1]+r.htmlPrefilter(f)+i[2],k=i[0];while(k--)g=g.lastChild;r.merge(m,g.childNodes),g=l.firstChild,g.textContent=""}else m.push(b.createTextNode(f));l.textContent="",n=0;while(f=m[n++])if(d&&r.inArray(f,d)>-1)e&&e.push(f);else if(j=r.contains(f.ownerDocument,f),g=la(l.appendChild(f),"script"),j&&ma(g),c){k=0;while(f=g[k++])ja.test(f.type||"")&&c.push(f)}return l}!function(){var a=d.createDocumentFragment(),b=a.appendChild(d.createElement("div")),c=d.createElement("input");c.setAttribute("type","radio"),c.setAttribute("checked","checked"),c.setAttribute("name","t"),b.appendChild(c),o.checkClone=b.cloneNode(!0).cloneNode(!0).lastChild.checked,b.innerHTML="<textarea>x</textarea>",o.noCloneChecked=!!b.cloneNode(!0).lastChild.defaultValue}();var pa=d.documentElement,qa=/^key/,ra=/^(?:mouse|pointer|contextmenu|drag|drop)|click/,sa=/^([^.]*)(?:\.(.+)|)/;function ta(){return!0}function ua(){return!1}function va(){try{return d.activeElement}catch(a){}}function wa(a,b,c,d,e,f){var g,h;if("object"==typeof b){"string"!=typeof c&&(d=d||c,c=void 0);for(h in b)wa(a,h,c,d,b[h],f);return a}if(null==d&&null==e?(e=c,d=c=void 0):null==e&&("string"==typeof c?(e=d,d=void 0):(e=d,d=c,c=void 0)),e===!1)e=ua;else if(!e)return a;return 1===f&&(g=e,e=function(a){return r().off(a),g.apply(this,arguments)},e.guid=g.guid||(g.guid=r.guid++)),a.each(function(){r.event.add(this,b,e,d,c)})}r.event={global:{},add:function(a,b,c,d,e){var f,g,h,i,j,k,l,m,n,o,p,q=V.get(a);if(q){c.handler&&(f=c,c=f.handler,e=f.selector),e&&r.find.matchesSelector(pa,e),c.guid||(c.guid=r.guid++),(i=q.events)||(i=q.events={}),(g=q.handle)||(g=q.handle=function(b){return"undefined"!=typeof r&&r.event.triggered!==b.type?r.event.dispatch.apply(a,arguments):void 0}),b=(b||"").match(K)||[""],j=b.length;while(j--)h=sa.exec(b[j])||[],n=p=h[1],o=(h[2]||"").split(".").sort(),n&&(l=r.event.special[n]||{},n=(e?l.delegateType:l.bindType)||n,l=r.event.special[n]||{},k=r.extend({type:n,origType:p,data:d,handler:c,guid:c.guid,selector:e,needsContext:e&&r.expr.match.needsContext.test(e),namespace:o.join(".")},f),(m=i[n])||(m=i[n]=[],m.delegateCount=0,l.setup&&l.setup.call(a,d,o,g)!==!1||a.addEventListener&&a.addEventListener(n,g)),l.add&&(l.add.call(a,k),k.handler.guid||(k.handler.guid=c.guid)),e?m.splice(m.delegateCount++,0,k):m.push(k),r.event.global[n]=!0)}},remove:function(a,b,c,d,e){var f,g,h,i,j,k,l,m,n,o,p,q=V.hasData(a)&&V.get(a);if(q&&(i=q.events)){b=(b||"").match(K)||[""],j=b.length;while(j--)if(h=sa.exec(b[j])||[],n=p=h[1],o=(h[2]||"").split(".").sort(),n){l=r.event.special[n]||{},n=(d?l.delegateType:l.bindType)||n,m=i[n]||[],h=h[2]&&new RegExp("(^|\\.)"+o.join("\\.(?:.*\\.|)")+"(\\.|$)"),g=f=m.length;while(f--)k=m[f],!e&&p!==k.origType||c&&c.guid!==k.guid||h&&!h.test(k.namespace)||d&&d!==k.selector&&("**"!==d||!k.selector)||(m.splice(f,1),k.selector&&m.delegateCount--,l.remove&&l.remove.call(a,k));g&&!m.length&&(l.teardown&&l.teardown.call(a,o,q.handle)!==!1||r.removeEvent(a,n,q.handle),delete i[n])}else for(n in i)r.event.remove(a,n+b[j],c,d,!0);r.isEmptyObject(i)&&V.remove(a,"handle events")}},dispatch:function(a){var b=r.event.fix(a),c,d,e,f,g,h,i=new Array(arguments.length),j=(V.get(this,"events")||{})[b.type]||[],k=r.event.special[b.type]||{};for(i[0]=b,c=1;c<arguments.length;c++)i[c]=arguments[c];if(b.delegateTarget=this,!k.preDispatch||k.preDispatch.call(this,b)!==!1){h=r.event.handlers.call(this,b,j),c=0;while((f=h[c++])&&!b.isPropagationStopped()){b.currentTarget=f.elem,d=0;while((g=f.handlers[d++])&&!b.isImmediatePropagationStopped())b.rnamespace&&!b.rnamespace.test(g.namespace)||(b.handleObj=g,b.data=g.data,e=((r.event.special[g.origType]||{}).handle||g.handler).apply(f.elem,i),void 0!==e&&(b.result=e)===!1&&(b.preventDefault(),b.stopPropagation()))}return k.postDispatch&&k.postDispatch.call(this,b),b.result}},handlers:function(a,b){var c,d,e,f,g=[],h=b.delegateCount,i=a.target;if(h&&i.nodeType&&("click"!==a.type||isNaN(a.button)||a.button<1))for(;i!==this;i=i.parentNode||this)if(1===i.nodeType&&(i.disabled!==!0||"click"!==a.type)){for(d=[],c=0;c<h;c++)f=b[c],e=f.selector+" ",void 0===d[e]&&(d[e]=f.needsContext?r(e,this).index(i)>-1:r.find(e,this,null,[i]).length),d[e]&&d.push(f);d.length&&g.push({elem:i,handlers:d})}return h<b.length&&g.push({elem:this,handlers:b.slice(h)}),g},addProp:function(a,b){Object.defineProperty(r.Event.prototype,a,{enumerable:!0,configurable:!0,get:r.isFunction(b)?function(){if(this.originalEvent)return b(this.originalEvent)}:function(){if(this.originalEvent)return this.originalEvent[a]},set:function(b){Object.defineProperty(this,a,{enumerable:!0,configurable:!0,writable:!0,value:b})}})},fix:function(a){return a[r.expando]?a:new r.Event(a)},special:{load:{noBubble:!0},focus:{trigger:function(){if(this!==va()&&this.focus)return this.focus(),!1},delegateType:"focusin"},blur:{trigger:function(){if(this===va()&&this.blur)return this.blur(),!1},delegateType:"focusout"},click:{trigger:function(){if("checkbox"===this.type&&this.click&&r.nodeName(this,"input"))return this.click(),!1},_default:function(a){return r.nodeName(a.target,"a")}},beforeunload:{postDispatch:function(a){void 0!==a.result&&a.originalEvent&&(a.originalEvent.returnValue=a.result)}}}},r.removeEvent=function(a,b,c){a.removeEventListener&&a.removeEventListener(b,c)},r.Event=function(a,b){return this instanceof r.Event?(a&&a.type?(this.originalEvent=a,this.type=a.type,this.isDefaultPrevented=a.defaultPrevented||void 0===a.defaultPrevented&&a.returnValue===!1?ta:ua,this.target=a.target&&3===a.target.nodeType?a.target.parentNode:a.target,this.currentTarget=a.currentTarget,this.relatedTarget=a.relatedTarget):this.type=a,b&&r.extend(this,b),this.timeStamp=a&&a.timeStamp||r.now(),void(this[r.expando]=!0)):new r.Event(a,b)},r.Event.prototype={constructor:r.Event,isDefaultPrevented:ua,isPropagationStopped:ua,isImmediatePropagationStopped:ua,isSimulated:!1,preventDefault:function(){var a=this.originalEvent;this.isDefaultPrevented=ta,a&&!this.isSimulated&&a.preventDefault()},stopPropagation:function(){var a=this.originalEvent;this.isPropagationStopped=ta,a&&!this.isSimulated&&a.stopPropagation()},stopImmediatePropagation:function(){var a=this.originalEvent;this.isImmediatePropagationStopped=ta,a&&!this.isSimulated&&a.stopImmediatePropagation(),this.stopPropagation()}},r.each({altKey:!0,bubbles:!0,cancelable:!0,changedTouches:!0,ctrlKey:!0,detail:!0,eventPhase:!0,metaKey:!0,pageX:!0,pageY:!0,shiftKey:!0,view:!0,"char":!0,charCode:!0,key:!0,keyCode:!0,button:!0,buttons:!0,clientX:!0,clientY:!0,offsetX:!0,offsetY:!0,pointerId:!0,pointerType:!0,screenX:!0,screenY:!0,targetTouches:!0,toElement:!0,touches:!0,which:function(a){var b=a.button;return null==a.which&&qa.test(a.type)?null!=a.charCode?a.charCode:a.keyCode:!a.which&&void 0!==b&&ra.test(a.type)?1&b?1:2&b?3:4&b?2:0:a.which}},r.event.addProp),r.each({mouseenter:"mouseover",mouseleave:"mouseout",pointerenter:"pointerover",pointerleave:"pointerout"},function(a,b){r.event.special[a]={delegateType:b,bindType:b,handle:function(a){var c,d=this,e=a.relatedTarget,f=a.handleObj;return e&&(e===d||r.contains(d,e))||(a.type=f.origType,c=f.handler.apply(this,arguments),a.type=b),c}}}),r.fn.extend({on:function(a,b,c,d){return wa(this,a,b,c,d)},one:function(a,b,c,d){return wa(this,a,b,c,d,1)},off:function(a,b,c){var d,e;if(a&&a.preventDefault&&a.handleObj)return d=a.handleObj,r(a.delegateTarget).off(d.namespace?d.origType+"."+d.namespace:d.origType,d.selector,d.handler),this;if("object"==typeof a){for(e in a)this.off(e,b,a[e]);return this}return b!==!1&&"function"!=typeof b||(c=b,b=void 0),c===!1&&(c=ua),this.each(function(){r.event.remove(this,a,c,b)})}});var xa=/<(?!area|br|col|embed|hr|img|input|link|meta|param)(([a-z][^\/\0>\x20\t\r\n\f]*)[^>]*)\/>/gi,ya=/<script|<style|<link/i,za=/checked\s*(?:[^=]|=\s*.checked.)/i,Aa=/^true\/(.*)/,Ba=/^\s*<!(?:\[CDATA\[|--)|(?:\]\]|--)>\s*$/g;function Ca(a,b){return r.nodeName(a,"table")&&r.nodeName(11!==b.nodeType?b:b.firstChild,"tr")?a.getElementsByTagName("tbody")[0]||a:a}function Da(a){return a.type=(null!==a.getAttribute("type"))+"/"+a.type,a}function Ea(a){var b=Aa.exec(a.type);return b?a.type=b[1]:a.removeAttribute("type"),a}function Fa(a,b){var c,d,e,f,g,h,i,j;if(1===b.nodeType){if(V.hasData(a)&&(f=V.access(a),g=V.set(b,f),j=f.events)){delete g.handle,g.events={};for(e in j)for(c=0,d=j[e].length;c<d;c++)r.event.add(b,e,j[e][c])}W.hasData(a)&&(h=W.access(a),i=r.extend({},h),W.set(b,i))}}function Ga(a,b){var c=b.nodeName.toLowerCase();"input"===c&&ha.test(a.type)?b.checked=a.checked:"input"!==c&&"textarea"!==c||(b.defaultValue=a.defaultValue)}function Ha(a,b,c,d){b=g.apply([],b);var e,f,h,i,j,k,l=0,m=a.length,n=m-1,q=b[0],s=r.isFunction(q);if(s||m>1&&"string"==typeof q&&!o.checkClone&&za.test(q))return a.each(function(e){var f=a.eq(e);s&&(b[0]=q.call(this,e,f.html())),Ha(f,b,c,d)});if(m&&(e=oa(b,a[0].ownerDocument,!1,a,d),f=e.firstChild,1===e.childNodes.length&&(e=f),f||d)){for(h=r.map(la(e,"script"),Da),i=h.length;l<m;l++)j=e,l!==n&&(j=r.clone(j,!0,!0),i&&r.merge(h,la(j,"script"))),c.call(a[l],j,l);if(i)for(k=h[h.length-1].ownerDocument,r.map(h,Ea),l=0;l<i;l++)j=h[l],ja.test(j.type||"")&&!V.access(j,"globalEval")&&r.contains(k,j)&&(j.src?r._evalUrl&&r._evalUrl(j.src):p(j.textContent.replace(Ba,""),k))}return a}function Ia(a,b,c){for(var d,e=b?r.filter(b,a):a,f=0;null!=(d=e[f]);f++)c||1!==d.nodeType||r.cleanData(la(d)),d.parentNode&&(c&&r.contains(d.ownerDocument,d)&&ma(la(d,"script")),d.parentNode.removeChild(d));return a}r.extend({htmlPrefilter:function(a){return a.replace(xa,"<$1></$2>")},clone:function(a,b,c){var d,e,f,g,h=a.cloneNode(!0),i=r.contains(a.ownerDocument,a);if(!(o.noCloneChecked||1!==a.nodeType&&11!==a.nodeType||r.isXMLDoc(a)))for(g=la(h),f=la(a),d=0,e=f.length;d<e;d++)Ga(f[d],g[d]);if(b)if(c)for(f=f||la(a),g=g||la(h),d=0,e=f.length;d<e;d++)Fa(f[d],g[d]);else Fa(a,h);return g=la(h,"script"),g.length>0&&ma(g,!i&&la(a,"script")),h},cleanData:function(a){for(var b,c,d,e=r.event.special,f=0;void 0!==(c=a[f]);f++)if(T(c)){if(b=c[V.expando]){if(b.events)for(d in b.events)e[d]?r.event.remove(c,d):r.removeEvent(c,d,b.handle);c[V.expando]=void 0}c[W.expando]&&(c[W.expando]=void 0)}}}),r.fn.extend({detach:function(a){return Ia(this,a,!0)},remove:function(a){return Ia(this,a)},text:function(a){return S(this,function(a){return void 0===a?r.text(this):this.empty().each(function(){1!==this.nodeType&&11!==this.nodeType&&9!==this.nodeType||(this.textContent=a)})},null,a,arguments.length)},append:function(){return Ha(this,arguments,function(a){if(1===this.nodeType||11===this.nodeType||9===this.nodeType){var b=Ca(this,a);b.appendChild(a)}})},prepend:function(){return Ha(this,arguments,function(a){if(1===this.nodeType||11===this.nodeType||9===this.nodeType){var b=Ca(this,a);b.insertBefore(a,b.firstChild)}})},before:function(){return Ha(this,arguments,function(a){this.parentNode&&this.parentNode.insertBefore(a,this)})},after:function(){return Ha(this,arguments,function(a){this.parentNode&&this.parentNode.insertBefore(a,this.nextSibling)})},empty:function(){for(var a,b=0;null!=(a=this[b]);b++)1===a.nodeType&&(r.cleanData(la(a,!1)),a.textContent="");return this},clone:function(a,b){return a=null!=a&&a,b=null==b?a:b,this.map(function(){return r.clone(this,a,b)})},html:function(a){return S(this,function(a){var b=this[0]||{},c=0,d=this.length;if(void 0===a&&1===b.nodeType)return b.innerHTML;if("string"==typeof a&&!ya.test(a)&&!ka[(ia.exec(a)||["",""])[1].toLowerCase()]){a=r.htmlPrefilter(a);try{for(;c<d;c++)b=this[c]||{},1===b.nodeType&&(r.cleanData(la(b,!1)),b.innerHTML=a);b=0}catch(e){}}b&&this.empty().append(a)},null,a,arguments.length)},replaceWith:function(){var a=[];return Ha(this,arguments,function(b){var c=this.parentNode;r.inArray(this,a)<0&&(r.cleanData(la(this)),c&&c.replaceChild(b,this))},a)}}),r.each({appendTo:"append",prependTo:"prepend",insertBefore:"before",insertAfter:"after",replaceAll:"replaceWith"},function(a,b){r.fn[a]=function(a){for(var c,d=[],e=r(a),f=e.length-1,g=0;g<=f;g++)c=g===f?this:this.clone(!0),r(e[g])[b](c),h.apply(d,c.get());return this.pushStack(d)}});var Ja=/^margin/,Ka=new RegExp("^("+$+")(?!px)[a-z%]+$","i"),La=function(b){var c=b.ownerDocument.defaultView;return c&&c.opener||(c=a),c.getComputedStyle(b)};!function(){function b(){if(i){i.style.cssText="box-sizing:border-box;position:relative;display:block;margin:auto;border:1px;padding:1px;top:1%;width:50%",i.innerHTML="",pa.appendChild(h);var b=a.getComputedStyle(i);c="1%"!==b.top,g="2px"===b.marginLeft,e="4px"===b.width,i.style.marginRight="50%",f="4px"===b.marginRight,pa.removeChild(h),i=null}}var c,e,f,g,h=d.createElement("div"),i=d.createElement("div");i.style&&(i.style.backgroundClip="content-box",i.cloneNode(!0).style.backgroundClip="",o.clearCloneStyle="content-box"===i.style.backgroundClip,h.style.cssText="border:0;width:8px;height:0;top:0;left:-9999px;padding:0;margin-top:1px;position:absolute",h.appendChild(i),r.extend(o,{pixelPosition:function(){return b(),c},boxSizingReliable:function(){return b(),e},pixelMarginRight:function(){return b(),f},reliableMarginLeft:function(){return b(),g}}))}();function Ma(a,b,c){var d,e,f,g,h=a.style;return c=c||La(a),c&&(g=c.getPropertyValue(b)||c[b],""!==g||r.contains(a.ownerDocument,a)||(g=r.style(a,b)),!o.pixelMarginRight()&&Ka.test(g)&&Ja.test(b)&&(d=h.width,e=h.minWidth,f=h.maxWidth,h.minWidth=h.maxWidth=h.width=g,g=c.width,h.width=d,h.minWidth=e,h.maxWidth=f)),void 0!==g?g+"":g}function Na(a,b){return{get:function(){return a()?void delete this.get:(this.get=b).apply(this,arguments)}}}var Oa=/^(none|table(?!-c[ea]).+)/,Pa={position:"absolute",visibility:"hidden",display:"block"},Qa={letterSpacing:"0",fontWeight:"400"},Ra=["Webkit","Moz","ms"],Sa=d.createElement("div").style;function Ta(a){if(a in Sa)return a;var b=a[0].toUpperCase()+a.slice(1),c=Ra.length;while(c--)if(a=Ra[c]+b,a in Sa)return a}function Ua(a,b,c){var d=_.exec(b);return d?Math.max(0,d[2]-(c||0))+(d[3]||"px"):b}function Va(a,b,c,d,e){for(var f=c===(d?"border":"content")?4:"width"===b?1:0,g=0;f<4;f+=2)"margin"===c&&(g+=r.css(a,c+aa[f],!0,e)),d?("content"===c&&(g-=r.css(a,"padding"+aa[f],!0,e)),"margin"!==c&&(g-=r.css(a,"border"+aa[f]+"Width",!0,e))):(g+=r.css(a,"padding"+aa[f],!0,e),"padding"!==c&&(g+=r.css(a,"border"+aa[f]+"Width",!0,e)));return g}function Wa(a,b,c){var d,e=!0,f=La(a),g="border-box"===r.css(a,"boxSizing",!1,f);if(a.getClientRects().length&&(d=a.getBoundingClientRect()[b]),d<=0||null==d){if(d=Ma(a,b,f),(d<0||null==d)&&(d=a.style[b]),Ka.test(d))return d;e=g&&(o.boxSizingReliable()||d===a.style[b]),d=parseFloat(d)||0}return d+Va(a,b,c||(g?"border":"content"),e,f)+"px"}r.extend({cssHooks:{opacity:{get:function(a,b){if(b){var c=Ma(a,"opacity");return""===c?"1":c}}}},cssNumber:{animationIterationCount:!0,columnCount:!0,fillOpacity:!0,flexGrow:!0,flexShrink:!0,fontWeight:!0,lineHeight:!0,opacity:!0,order:!0,orphans:!0,widows:!0,zIndex:!0,zoom:!0},cssProps:{"float":"cssFloat"},style:function(a,b,c,d){if(a&&3!==a.nodeType&&8!==a.nodeType&&a.style){var e,f,g,h=r.camelCase(b),i=a.style;return b=r.cssProps[h]||(r.cssProps[h]=Ta(h)||h),g=r.cssHooks[b]||r.cssHooks[h],void 0===c?g&&"get"in g&&void 0!==(e=g.get(a,!1,d))?e:i[b]:(f=typeof c,"string"===f&&(e=_.exec(c))&&e[1]&&(c=da(a,b,e),f="number"),null!=c&&c===c&&("number"===f&&(c+=e&&e[3]||(r.cssNumber[h]?"":"px")),o.clearCloneStyle||""!==c||0!==b.indexOf("background")||(i[b]="inherit"),g&&"set"in g&&void 0===(c=g.set(a,c,d))||(i[b]=c)),void 0)}},css:function(a,b,c,d){var e,f,g,h=r.camelCase(b);return b=r.cssProps[h]||(r.cssProps[h]=Ta(h)||h),g=r.cssHooks[b]||r.cssHooks[h],g&&"get"in g&&(e=g.get(a,!0,c)),void 0===e&&(e=Ma(a,b,d)),"normal"===e&&b in Qa&&(e=Qa[b]),""===c||c?(f=parseFloat(e),c===!0||isFinite(f)?f||0:e):e}}),r.each(["height","width"],function(a,b){r.cssHooks[b]={get:function(a,c,d){if(c)return!Oa.test(r.css(a,"display"))||a.getClientRects().length&&a.getBoundingClientRect().width?Wa(a,b,d):ca(a,Pa,function(){return Wa(a,b,d)})},set:function(a,c,d){var e,f=d&&La(a),g=d&&Va(a,b,d,"border-box"===r.css(a,"boxSizing",!1,f),f);return g&&(e=_.exec(c))&&"px"!==(e[3]||"px")&&(a.style[b]=c,c=r.css(a,b)),Ua(a,c,g)}}}),r.cssHooks.marginLeft=Na(o.reliableMarginLeft,function(a,b){if(b)return(parseFloat(Ma(a,"marginLeft"))||a.getBoundingClientRect().left-ca(a,{marginLeft:0},function(){return a.getBoundingClientRect().left}))+"px"}),r.each({margin:"",padding:"",border:"Width"},function(a,b){r.cssHooks[a+b]={expand:function(c){for(var d=0,e={},f="string"==typeof c?c.split(" "):[c];d<4;d++)e[a+aa[d]+b]=f[d]||f[d-2]||f[0];return e}},Ja.test(a)||(r.cssHooks[a+b].set=Ua)}),r.fn.extend({css:function(a,b){return S(this,function(a,b,c){var d,e,f={},g=0;if(r.isArray(b)){for(d=La(a),e=b.length;g<e;g++)f[b[g]]=r.css(a,b[g],!1,d);return f}return void 0!==c?r.style(a,b,c):r.css(a,b)},a,b,arguments.length>1)}}),r.fn.delay=function(b,c){return b=r.fx?r.fx.speeds[b]||b:b,c=c||"fx",this.queue(c,function(c,d){var e=a.setTimeout(c,b);d.stop=function(){a.clearTimeout(e)}})},function(){var a=d.createElement("input"),b=d.createElement("select"),c=b.appendChild(d.createElement("option"));a.type="checkbox",o.checkOn=""!==a.value,o.optSelected=c.selected,a=d.createElement("input"),a.value="t",a.type="radio",o.radioValue="t"===a.value}();var Xa,Ya=r.expr.attrHandle;r.fn.extend({attr:function(a,b){return S(this,r.attr,a,b,arguments.length>1)},removeAttr:function(a){return this.each(function(){r.removeAttr(this,a)})}}),r.extend({attr:function(a,b,c){var d,e,f=a.nodeType;if(3!==f&&8!==f&&2!==f)return"undefined"==typeof a.getAttribute?r.prop(a,b,c):(1===f&&r.isXMLDoc(a)||(e=r.attrHooks[b.toLowerCase()]||(r.expr.match.bool.test(b)?Xa:void 0)),void 0!==c?null===c?void r.removeAttr(a,b):e&&"set"in e&&void 0!==(d=e.set(a,c,b))?d:(a.setAttribute(b,c+""),c):e&&"get"in e&&null!==(d=e.get(a,b))?d:(d=r.find.attr(a,b),null==d?void 0:d))},attrHooks:{type:{set:function(a,b){if(!o.radioValue&&"radio"===b&&r.nodeName(a,"input")){var c=a.value;return a.setAttribute("type",b),c&&(a.value=c),b}}}},removeAttr:function(a,b){var c,d=0,e=b&&b.match(K);if(e&&1===a.nodeType)while(c=e[d++])a.removeAttribute(c)}}),Xa={set:function(a,b,c){return b===!1?r.removeAttr(a,c):a.setAttribute(c,c),c}},r.each(r.expr.match.bool.source.match(/\w+/g),function(a,b){var c=Ya[b]||r.find.attr;Ya[b]=function(a,b,d){var e,f,g=b.toLowerCase();return d||(f=Ya[g],Ya[g]=e,e=null!=c(a,b,d)?g:null,Ya[g]=f),e}});var Za=/^(?:input|select|textarea|button)$/i,$a=/^(?:a|area)$/i;r.fn.extend({prop:function(a,b){return S(this,r.prop,a,b,arguments.length>1)},removeProp:function(a){return this.each(function(){delete this[r.propFix[a]||a]})}}),r.extend({prop:function(a,b,c){var d,e,f=a.nodeType;if(3!==f&&8!==f&&2!==f)return 1===f&&r.isXMLDoc(a)||(b=r.propFix[b]||b,e=r.propHooks[b]),void 0!==c?e&&"set"in e&&void 0!==(d=e.set(a,c,b))?d:a[b]=c:e&&"get"in e&&null!==(d=e.get(a,b))?d:a[b]},propHooks:{tabIndex:{get:function(a){var b=r.find.attr(a,"tabindex");return b?parseInt(b,10):Za.test(a.nodeName)||$a.test(a.nodeName)&&a.href?0:-1}}},propFix:{"for":"htmlFor","class":"className"}}),o.optSelected||(r.propHooks.selected={get:function(a){var b=a.parentNode;return b&&b.parentNode&&b.parentNode.selectedIndex,null},set:function(a){var b=a.parentNode;b&&(b.selectedIndex,b.parentNode&&b.parentNode.selectedIndex)}}),r.each(["tabIndex","readOnly","maxLength","cellSpacing","cellPadding","rowSpan","colSpan","useMap","frameBorder","contentEditable"],function(){r.propFix[this.toLowerCase()]=this});var _a=/[\t\r\n\f]/g;function ab(a){return a.getAttribute&&a.getAttribute("class")||""}r.fn.extend({addClass:function(a){var b,c,d,e,f,g,h,i=0;if(r.isFunction(a))return this.each(function(b){r(this).addClass(a.call(this,b,ab(this)))});if("string"==typeof a&&a){b=a.match(K)||[];while(c=this[i++])if(e=ab(c),d=1===c.nodeType&&(" "+e+" ").replace(_a," ")){g=0;while(f=b[g++])d.indexOf(" "+f+" ")<0&&(d+=f+" ");h=r.trim(d),e!==h&&c.setAttribute("class",h)}}return this},removeClass:function(a){var b,c,d,e,f,g,h,i=0;if(r.isFunction(a))return this.each(function(b){r(this).removeClass(a.call(this,b,ab(this)))});if(!arguments.length)return this.attr("class","");if("string"==typeof a&&a){b=a.match(K)||[];while(c=this[i++])if(e=ab(c),d=1===c.nodeType&&(" "+e+" ").replace(_a," ")){g=0;while(f=b[g++])while(d.indexOf(" "+f+" ")>-1)d=d.replace(" "+f+" "," ");h=r.trim(d),e!==h&&c.setAttribute("class",h)}}return this},toggleClass:function(a,b){var c=typeof a;return"boolean"==typeof b&&"string"===c?b?this.addClass(a):this.removeClass(a):r.isFunction(a)?this.each(function(c){r(this).toggleClass(a.call(this,c,ab(this),b),b)}):this.each(function(){var b,d,e,f;if("string"===c){d=0,e=r(this),f=a.match(K)||[];while(b=f[d++])e.hasClass(b)?e.removeClass(b):e.addClass(b)}else void 0!==a&&"boolean"!==c||(b=ab(this),b&&V.set(this,"__className__",b),this.setAttribute&&this.setAttribute("class",b||a===!1?"":V.get(this,"__className__")||""))})},hasClass:function(a){var b,c,d=0;b=" "+a+" ";while(c=this[d++])if(1===c.nodeType&&(" "+ab(c)+" ").replace(_a," ").indexOf(b)>-1)return!0;return!1}});var bb=/\r/g,cb=/[\x20\t\r\n\f]+/g;r.fn.extend({val:function(a){var b,c,d,e=this[0];{if(arguments.length)return d=r.isFunction(a),this.each(function(c){var e;1===this.nodeType&&(e=d?a.call(this,c,r(this).val()):a,null==e?e="":"number"==typeof e?e+="":r.isArray(e)&&(e=r.map(e,function(a){return null==a?"":a+""})),b=r.valHooks[this.type]||r.valHooks[this.nodeName.toLowerCase()],b&&"set"in b&&void 0!==b.set(this,e,"value")||(this.value=e))});if(e)return b=r.valHooks[e.type]||r.valHooks[e.nodeName.toLowerCase()],b&&"get"in b&&void 0!==(c=b.get(e,"value"))?c:(c=e.value,"string"==typeof c?c.replace(bb,""):null==c?"":c)}}}),r.extend({valHooks:{option:{get:function(a){var b=r.find.attr(a,"value");return null!=b?b:r.trim(r.text(a)).replace(cb," ")}},select:{get:function(a){for(var b,c,d=a.options,e=a.selectedIndex,f="select-one"===a.type,g=f?null:[],h=f?e+1:d.length,i=e<0?h:f?e:0;i<h;i++)if(c=d[i],(c.selected||i===e)&&!c.disabled&&(!c.parentNode.disabled||!r.nodeName(c.parentNode,"optgroup"))){if(b=r(c).val(),f)return b;g.push(b)}return g},set:function(a,b){var c,d,e=a.options,f=r.makeArray(b),g=e.length;while(g--)d=e[g],(d.selected=r.inArray(r.valHooks.option.get(d),f)>-1)&&(c=!0);return c||(a.selectedIndex=-1),f}}}}),r.each(["radio","checkbox"],function(){r.valHooks[this]={set:function(a,b){if(r.isArray(b))return a.checked=r.inArray(r(a).val(),b)>-1}},o.checkOn||(r.valHooks[this].get=function(a){return null===a.getAttribute("value")?"on":a.value})});var db=/^(?:focusinfocus|focusoutblur)$/;r.extend(r.event,{trigger:function(b,c,e,f){var g,h,i,j,k,m,n,o=[e||d],p=l.call(b,"type")?b.type:b,q=l.call(b,"namespace")?b.namespace.split("."):[];if(h=i=e=e||d,3!==e.nodeType&&8!==e.nodeType&&!db.test(p+r.event.triggered)&&(p.indexOf(".")>-1&&(q=p.split("."),p=q.shift(),q.sort()),k=p.indexOf(":")<0&&"on"+p,b=b[r.expando]?b:new r.Event(p,"object"==typeof b&&b),b.isTrigger=f?2:3,b.namespace=q.join("."),b.rnamespace=b.namespace?new RegExp("(^|\\.)"+q.join("\\.(?:.*\\.|)")+"(\\.|$)"):null,b.result=void 0,b.target||(b.target=e),c=null==c?[b]:r.makeArray(c,[b]),n=r.event.special[p]||{},f||!n.trigger||n.trigger.apply(e,c)!==!1)){if(!f&&!n.noBubble&&!r.isWindow(e)){for(j=n.delegateType||p,db.test(j+p)||(h=h.parentNode);h;h=h.parentNode)o.push(h),i=h;i===(e.ownerDocument||d)&&o.push(i.defaultView||i.parentWindow||a)}g=0;while((h=o[g++])&&!b.isPropagationStopped())b.type=g>1?j:n.bindType||p,m=(V.get(h,"events")||{})[b.type]&&V.get(h,"handle"),m&&m.apply(h,c),m=k&&h[k],m&&m.apply&&T(h)&&(b.result=m.apply(h,c),b.result===!1&&b.preventDefault());return b.type=p,f||b.isDefaultPrevented()||n._default&&n._default.apply(o.pop(),c)!==!1||!T(e)||k&&r.isFunction(e[p])&&!r.isWindow(e)&&(i=e[k],i&&(e[k]=null),r.event.triggered=p,e[p](),r.event.triggered=void 0,i&&(e[k]=i)),b.result}},simulate:function(a,b,c){var d=r.extend(new r.Event,c,{type:a,isSimulated:!0});r.event.trigger(d,null,b)}}),r.fn.extend({trigger:function(a,b){return this.each(function(){r.event.trigger(a,b,this)})},triggerHandler:function(a,b){var c=this[0];if(c)return r.event.trigger(a,b,c,!0)}}),r.each("blur focus focusin focusout resize scroll click dblclick mousedown mouseup mousemove mouseover mouseout mouseenter mouseleave change select submit keydown keypress keyup contextmenu".split(" "),function(a,b){r.fn[b]=function(a,c){return arguments.length>0?this.on(b,null,a,c):this.trigger(b)}}),r.fn.extend({hover:function(a,b){return this.mouseenter(a).mouseleave(b||a)}}),o.focusin="onfocusin"in a,o.focusin||r.each({focus:"focusin",blur:"focusout"},function(a,b){var c=function(a){r.event.simulate(b,a.target,r.event.fix(a))};r.event.special[b]={setup:function(){var d=this.ownerDocument||this,e=V.access(d,b);e||d.addEventListener(a,c,!0),V.access(d,b,(e||0)+1)},teardown:function(){var d=this.ownerDocument||this,e=V.access(d,b)-1;e?V.access(d,b,e):(d.removeEventListener(a,c,!0),V.remove(d,b))}}});var eb=/\[\]$/,fb=/\r?\n/g,gb=/^(?:submit|button|image|reset|file)$/i,hb=/^(?:input|select|textarea|keygen)/i;function ib(a,b,c,d){var e;if(r.isArray(b))r.each(b,function(b,e){c||eb.test(a)?d(a,e):ib(a+"["+("object"==typeof e&&null!=e?b:"")+"]",e,c,d)});else if(c||"object"!==r.type(b))d(a,b);else for(e in b)ib(a+"["+e+"]",b[e],c,d)}r.param=function(a,b){var c,d=[],e=function(a,b){var c=r.isFunction(b)?b():b;d[d.length]=encodeURIComponent(a)+"="+encodeURIComponent(null==c?"":c)};if(r.isArray(a)||a.jquery&&!r.isPlainObject(a))r.each(a,function(){e(this.name,this.value)});else for(c in a)ib(c,a[c],b,e);
-return d.join("&")},r.fn.extend({serialize:function(){return r.param(this.serializeArray())},serializeArray:function(){return this.map(function(){var a=r.prop(this,"elements");return a?r.makeArray(a):this}).filter(function(){var a=this.type;return this.name&&!r(this).is(":disabled")&&hb.test(this.nodeName)&&!gb.test(a)&&(this.checked||!ha.test(a))}).map(function(a,b){var c=r(this).val();return null==c?null:r.isArray(c)?r.map(c,function(a){return{name:b.name,value:a.replace(fb,"\r\n")}}):{name:b.name,value:c.replace(fb,"\r\n")}}).get()}}),r.fn.extend({wrapAll:function(a){var b;return this[0]&&(r.isFunction(a)&&(a=a.call(this[0])),b=r(a,this[0].ownerDocument).eq(0).clone(!0),this[0].parentNode&&b.insertBefore(this[0]),b.map(function(){var a=this;while(a.firstElementChild)a=a.firstElementChild;return a}).append(this)),this},wrapInner:function(a){return r.isFunction(a)?this.each(function(b){r(this).wrapInner(a.call(this,b))}):this.each(function(){var b=r(this),c=b.contents();c.length?c.wrapAll(a):b.append(a)})},wrap:function(a){var b=r.isFunction(a);return this.each(function(c){r(this).wrapAll(b?a.call(this,c):a)})},unwrap:function(a){return this.parent(a).not("body").each(function(){r(this).replaceWith(this.childNodes)}),this}}),r.expr.pseudos.hidden=function(a){return!r.expr.pseudos.visible(a)},r.expr.pseudos.visible=function(a){return!!(a.offsetWidth||a.offsetHeight||a.getClientRects().length)},o.createHTMLDocument=function(){var a=d.implementation.createHTMLDocument("").body;return a.innerHTML="<form></form><form></form>",2===a.childNodes.length}(),r.parseHTML=function(a,b,c){if("string"!=typeof a)return[];"boolean"==typeof b&&(c=b,b=!1);var e,f,g;return b||(o.createHTMLDocument?(b=d.implementation.createHTMLDocument(""),e=b.createElement("base"),e.href=d.location.href,b.head.appendChild(e)):b=d),f=B.exec(a),g=!c&&[],f?[b.createElement(f[1])]:(f=oa([a],b,g),g&&g.length&&r(g).remove(),r.merge([],f.childNodes))};function jb(a){return r.isWindow(a)?a:9===a.nodeType&&a.defaultView}r.offset={setOffset:function(a,b,c){var d,e,f,g,h,i,j,k=r.css(a,"position"),l=r(a),m={};"static"===k&&(a.style.position="relative"),h=l.offset(),f=r.css(a,"top"),i=r.css(a,"left"),j=("absolute"===k||"fixed"===k)&&(f+i).indexOf("auto")>-1,j?(d=l.position(),g=d.top,e=d.left):(g=parseFloat(f)||0,e=parseFloat(i)||0),r.isFunction(b)&&(b=b.call(a,c,r.extend({},h))),null!=b.top&&(m.top=b.top-h.top+g),null!=b.left&&(m.left=b.left-h.left+e),"using"in b?b.using.call(a,m):l.css(m)}},r.fn.extend({offset:function(a){if(arguments.length)return void 0===a?this:this.each(function(b){r.offset.setOffset(this,a,b)});var b,c,d,e,f=this[0];if(f)return f.getClientRects().length?(d=f.getBoundingClientRect(),d.width||d.height?(e=f.ownerDocument,c=jb(e),b=e.documentElement,{top:d.top+c.pageYOffset-b.clientTop,left:d.left+c.pageXOffset-b.clientLeft}):d):{top:0,left:0}},position:function(){if(this[0]){var a,b,c=this[0],d={top:0,left:0};return"fixed"===r.css(c,"position")?b=c.getBoundingClientRect():(a=this.offsetParent(),b=this.offset(),r.nodeName(a[0],"html")||(d=a.offset()),d={top:d.top+r.css(a[0],"borderTopWidth",!0),left:d.left+r.css(a[0],"borderLeftWidth",!0)}),{top:b.top-d.top-r.css(c,"marginTop",!0),left:b.left-d.left-r.css(c,"marginLeft",!0)}}},offsetParent:function(){return this.map(function(){var a=this.offsetParent;while(a&&"static"===r.css(a,"position"))a=a.offsetParent;return a||pa})}}),r.each({scrollLeft:"pageXOffset",scrollTop:"pageYOffset"},function(a,b){var c="pageYOffset"===b;r.fn[a]=function(d){return S(this,function(a,d,e){var f=jb(a);return void 0===e?f?f[b]:a[d]:void(f?f.scrollTo(c?f.pageXOffset:e,c?e:f.pageYOffset):a[d]=e)},a,d,arguments.length)}}),r.each(["top","left"],function(a,b){r.cssHooks[b]=Na(o.pixelPosition,function(a,c){if(c)return c=Ma(a,b),Ka.test(c)?r(a).position()[b]+"px":c})}),r.each({Height:"height",Width:"width"},function(a,b){r.each({padding:"inner"+a,content:b,"":"outer"+a},function(c,d){r.fn[d]=function(e,f){var g=arguments.length&&(c||"boolean"!=typeof e),h=c||(e===!0||f===!0?"margin":"border");return S(this,function(b,c,e){var f;return r.isWindow(b)?0===d.indexOf("outer")?b["inner"+a]:b.document.documentElement["client"+a]:9===b.nodeType?(f=b.documentElement,Math.max(b.body["scroll"+a],f["scroll"+a],b.body["offset"+a],f["offset"+a],f["client"+a])):void 0===e?r.css(b,c,h):r.style(b,c,e,h)},b,g?e:void 0,g)}})}),"function"==typeof define&&define.amd&&define("jquery",[],function(){return r});var kb=a.jQuery,lb=a.$;return r.noConflict=function(b){return a.$===r&&(a.$=lb),b&&a.jQuery===r&&(a.jQuery=kb),r},b||(a.jQuery=a.$=r),r});

Index: js-path.scm
==================================================================
--- js-path.scm
+++ js-path.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: keys.scm
==================================================================
--- keys.scm
+++ keys.scm
@@ -73,11 +73,11 @@
 
 ;;======================================================================
 ;; config file related routines
 ;;======================================================================
 
-(define keys:config-get-fields common:get-fields)
+;; (define keys:config-get-fields common:get-fields)
 (define (keys:make-key/field-string confdat)
   (let ((fields (configf:get-section confdat "fields")))
     (string-join
      (map (lambda (field)(conc (car field) " " (cadr field)))
 	  fields)

Index: launch.scm
==================================================================
--- launch.scm
+++ launch.scm
@@ -67,11 +67,11 @@
 ;; return (conc status ": " comment) from the final section so that
 ;;   the comment can be set in the step record in launch.scm
 ;;
 (define (launch:load-logpro-dat run-id test-id stepname)
   (let ((cname (conc stepname ".dat")))
-    (if (common:file-exists? cname)
+    (if (file-exists? cname)
 	(let* ((dat  (read-config cname #f #f))
 	       (csvr (db:logpro-dat->csv dat stepname))
 	       (csvt (let-values (((fmt-cell fmt-record fmt-csv) (make-format ",")))
 		       (fmt-csv (map list->csv-record csvr))))
 	       (status (configf:lookup dat "final" "exit-status"))
@@ -104,11 +104,11 @@
 	 (script         "") ; "#!/bin/bash\n") ;; yep, we depend on bin/bash FIXME!!!\
 	 (logpro-file    (conc stepname ".logpro"))
 	 (html-file      (conc stepname ".html"))
 	 (dat-file       (conc stepname ".dat"))
 	 (tconfig-logpro (configf:lookup testconfig "logpro" stepname))
-	 (logpro-used    (common:file-exists? logpro-file)))
+	 (logpro-used    (file-exists? logpro-file)))
 
     (debug:print 0 *default-log-port* "stepparts: " stepparts ", stepparams: " stepparams
                  ", paramparts: " paramparts ", subrun: " subrun ", stepcmd: " stepcmd)
     
     (if (and tconfig-logpro
@@ -126,11 +126,11 @@
 		 " stepparams: " stepparams " stepcmd: " stepcmd)
     
     ;; ;; first source the previous environment
     ;; (let ((prev-env (conc ".ezsteps/" prevstep (if (string-search (regexp "csh") 
     ;;      							 (get-environment-variable "SHELL")) ".csh" ".sh"))))
-    ;;   (if (and prevstep (common:file-exists? prev-env))
+    ;;   (if (and prevstep (file-exists? prev-env))
     ;;       (set! script (conc script "source " prev-env))))
     
     ;; call the command using mt_ezstep
     ;; (set! script (conc "mt_ezstep " stepname " " (if prevstep prevstep "x") " " stepcmd))
     
@@ -152,11 +152,11 @@
 	 
          (with-output-to-file "Makefile.ezsteps"
            (lambda ()
              (print stepname ".log :")
              (print "\t" cmd)
-             (if (common:file-exists? (conc stepname ".logpro"))
+             (if (file-exists? (conc stepname ".logpro"))
                  (print "\tlogpro " stepname ".logpro " stepname ".html < " stepname ".log"))
              (print)
              (print stepname " : " stepname ".log")
              (print))
            #:append)
@@ -196,11 +196,11 @@
 	  (logfna (if logpro-used (conc stepname ".html") ""))
 	  (comment #f))
       (if logpro-used
 	  (let ((datfile (conc stepname ".dat")))
 	    ;; load the .dat file into the test_data table if it exists
-	    (if (common:file-exists? datfile)
+	    (if (file-exists? datfile)
 		(set! comment (launch:load-logpro-dat run-id test-id stepname)))
 	    (rmt:test-set-log! run-id test-id (conc stepname ".html"))))
       (rmt:teststep-set-status! run-id test-id stepname "end" exinfo comment logfna))
     ;; set the test final status
     (let* ((process-exit-status (launch:einf-exit-code exit-info)) ;; (vector-ref exit-info 2))
@@ -342,11 +342,11 @@
                             (list (list "subrun" (conc "{subrun=true} " mt-cmd)))))))
 
 	;; process the ezsteps
 	(if ezsteps
 	    (begin
-	      (if (not (common:file-exists? ".ezsteps"))(create-directory ".ezsteps"))
+	      (if (not (file-exists? ".ezsteps"))(create-directory ".ezsteps"))
 	      ;; if ezsteps was defined then we are sure to have at least one step but check anyway
 	      (if (not (> (length ezstepslst) 0))
 		  (debug:print-error 0 *default-log-port* "ezsteps defined but ezstepslst is zero length")
 		  (let loop ((ezstep (car ezstepslst))
 			     (tal    (cdr ezstepslst))
@@ -355,11 +355,11 @@
 		    ;; check exit-info (vector-ref exit-info 1)
 		    (if (launch:einf-exit-status exit-info) ;; (vector-ref exit-info 1)
 			(let ((logpro-used (launch:runstep ezstep run-id test-id exit-info m tal testconfig))
 			      (stepname    (car ezstep)))
 			  ;; if logpro-used read in the stepname.dat file
-			  (if (and logpro-used (common:file-exists? (conc stepname ".dat")))
+			  (if (and logpro-used (file-exists? (conc stepname ".dat")))
 			      (launch:load-logpro-dat run-id test-id stepname))
 			  (if (steprun-good? logpro-used (launch:einf-exit-code exit-info))
 			      (if (not (null? tal))
 				  (loop (car tal) (cdr tal) stepname))
 			      (debug:print 0 *default-log-port* "WARNING: step " (car ezstep) " failed. Stopping")))
@@ -500,11 +500,11 @@
 	       (fullrunscript (if (not runscript)
                                   #f
                                   (if (substring-index "/" runscript)
                                       runscript ;; use unadultered if contains slashes
                                       (let ((fulln (conc work-area "/" runscript)))
-	                                  (if (and (common:file-exists? fulln)
+	                                  (if (and (file-exists? fulln)
                                                    (file-execute-access? fulln))
                                               fulln
                                               runscript))))) ;; assume it is on the path
                (check-work-area           (lambda ()
                                             ;; NFS might not have propagated the directory meta data to the run host - give it time if needed
@@ -661,11 +661,11 @@
 	     (list "default" target)))
           ;;(bb-check-path msg: "launch:execute post block 1")
 
 	  ;; NFS might not have propagated the directory meta data to the run host - give it time if needed
 	  (let loop ((count 0))
-	    (if (or (common:file-exists? work-area)
+	    (if (or (file-exists? work-area)
 		    (> count 10))
 		(change-directory work-area)
 		(begin
 		  (debug:print 0 *default-log-port* "INFO: Not starting job yet - directory " work-area " not found")
 		  (thread-sleep! 10)
@@ -738,11 +738,11 @@
 	  ;; (thread-sleep! 0.3) ;; NFS slowness has caused grief here
 
 	  (if (args:get-arg "-xterm")
 	      (set! fullrunscript "xterm")
 	      (if (and fullrunscript 
-		       (common:file-exists? fullrunscript)
+		       (file-exists? fullrunscript)
 		       (not (file-execute-access? fullrunscript)))
 		  (system (conc "chmod ug+x " fullrunscript))))
 
 	  ;; We are about to actually kick off the test
 	  ;; so this is a good place to remove the records for 
@@ -837,22 +837,22 @@
 			   (args:get-arg ":runname")
 			   (getenv "MT_RUNNAME")))
 	     (fulldir  (conc linktree "/"
 			     target "/"
 			     runname)))
-	(if (and linktree (common:file-exists? linktree)) ;; can't proceed without linktree
+	(if (and linktree (file-exists? linktree)) ;; can't proceed without linktree
 	    (begin
 	      (debug:print-info 0 *default-log-port* "Have -run with target=" target ", runname=" runname ", fulldir=" fulldir ", testpatt=" (or (args:get-arg "-testpatt") "%"))
-	      (if (not (common:file-exists? fulldir))
+	      (if (not (file-exists? fulldir))
 		  (create-directory fulldir #t)) ;; need to protect with exception handler 
 	      (if (and target
 		       runname
-		       (common:file-exists? fulldir))
+		       (file-exists? fulldir))
 		  (let ((tmpfile  (conc fulldir "/.megatest.cfg." (current-seconds)))
 			(targfile (conc fulldir "/.megatest.cfg-"  megatest-version "-" megatest-fossil-hash))
 			(rconfig  (conc fulldir "/.runconfig." megatest-version "-" megatest-fossil-hash)))
-		    (if (common:file-exists? rconfig) ;; only cache megatest.config AFTER runconfigs has been cached
+		    (if (file-exists? rconfig) ;; only cache megatest.config AFTER runconfigs has been cached
 			(begin
 			  (debug:print-info 0 *default-log-port* "Caching megatest.config in " tmpfile)
                           (if (not (common:in-running-test?))
                               (configf:write-alist *configdat* tmpfile))
 			  (system (conc "ln -sf " tmpfile " " targfile))))
@@ -930,21 +930,21 @@
 			     #f
 			     (car cachefiles))) ;; (and cachedir (conc cachedir "/" ".megatest.cfg-"  megatest-version "-" megatest-fossil-hash)))
 	     (rccachef   (if (null? cachefiles)
 			     #f
 			     (cdr cachefiles)))) ;; (and cachedir (conc cachedir "/" ".runconfigs.cfg-"  megatest-version "-" megatest-fossil-hash)))
-	      ;; (cancreate (and cachedir (common:file-exists? cachedir)(file-write-access? cachedir) (not (common:in-running-test?)))))
+	      ;; (cancreate (and cachedir (file-exists? cachedir)(file-write-access? cachedir) (not (common:in-running-test?)))))
 	(set! *toppath* toppath) ;; This is needed when we are running as a test using CMDINFO as a datasource
         ;;(BB> "launch:setup-body -- cachefiles="cachefiles)
 	(cond
 	 ;; if mtcachef exists just read it, however we need to assume toppath is available in $MT_RUN_AREA_HOME
 	 ((and (not force-reread)
 	       mtcachef  rccachef
 	       use-cache
 	       (get-environment-variable "MT_RUN_AREA_HOME")
-	       (common:file-exists? mtcachef)
-	       (common:file-exists? rccachef))
+	       (file-exists? mtcachef)
+	       (file-exists? rccachef))
           ;;(BB> "launch:setup-body -- cond branch 1 - use-cache")
           (set! *configdat*    (configf:read-alist mtcachef))
           ;;(BB> "launch:setup-body -- 1 set! *configdat*="*configdat*)
 	  (set! *runconfigdat* (configf:read-alist rccachef))
 	  (set! *configinfo*   (list *configdat*  (get-environment-variable "MT_RUN_AREA_HOME")))
@@ -1054,11 +1054,11 @@
 	;; additional house keeping
 	(let* ((linktree (or (common:get-linktree)
 			     (conc *toppath* "/lt"))))
 	  (if linktree
 	      (begin
-		(if (not (common:file-exists? linktree))
+		(if (not (file-exists? linktree))
 		    (begin
 		      (handle-exceptions
 			  exn
 			  (begin
 			    (debug:print-error 0 *default-log-port* "Something went wrong when trying to create linktree dir at " linktree)
@@ -1069,11 +1069,11 @@
 		    exn
 		    (begin
 		      (debug:print-error 0 *default-log-port* "Something went wrong when trying to create link to linktree at " *toppath*)
 		      (debug:print 0 *default-log-port* " message: " ((condition-property-accessor 'exn 'message) exn)))
 		  (let ((tlink (conc *toppath* "/lt")))
-		    (if (not (common:file-exists? tlink))
+		    (if (not (file-exists? tlink))
 			(create-symbolic-link linktree tlink)))))
 	      (begin
 		(debug:print-error 0 *default-log-port* "linktree not defined in [setup] section of megatest.config")
 		)))
 	(if (and *toppath*
@@ -1092,17 +1092,17 @@
                (rccachef     (cdr cachefiles)))
 
           ;; trap exception due to stale NFS handle -- Error: (open-output-file) cannot open file - Stale NFS file handle: "...somepath.../.runconfigs.cfg-1.6427-7d1e789cb3f62f9cde719a4865bb51b3c17ea853" - ticket 220546342
           ;; TODO - consider 1) using simple-lock to bracket cache write
           ;;                 2) cache in hash on server, since need to do rmt: anyway to lock.
-          (if (and rccachef *runconfigdat* (not (common:file-exists? rccachef)))
+          (if (and rccachef *runconfigdat* (not (file-exists? rccachef)))
               (common:fail-safe
                (lambda ()
                  (configf:write-alist *runconfigdat* rccachef))
                (conc "Could not write cache file - "rccachef))
               )
-          (if (and mtcachef *configdat*    (not (common:file-exists? mtcachef)))
+          (if (and mtcachef *configdat*    (not (file-exists? mtcachef)))
               (common:fail-safe
                (lambda ()
                  (configf:write-alist *configdat* mtcachef))
                (conc "Could not write cache file - "mtcachef))
               )
@@ -1196,17 +1196,17 @@
     ;; Update the rundir path in the test record for all, rundir=physical, shortdir=logical
     ;;                                                 rundir   shortdir
     (rmt:general-call 'test-set-rundir-shortdir run-id lnkpathf test-path testname item-path run-id)
 
     (debug:print 2 *default-log-port* "INFO:\n       lnkbase=" lnkbase "\n       lnkpath=" lnkpath "\n  toptest-path=" toptest-path "\n     test-path=" test-path)
-    (if (not (common:file-exists? linktree))
+    (if (not (file-exists? linktree))
 	(begin
 	  (debug:print 0 *default-log-port* "WARNING: linktree did not exist! Creating it now at " linktree)
 	  (create-directory linktree #t))) ;; (system (conc "mkdir -p " linktree))))
     ;; create the directory for the tests dir links, this is needed no matter what...
     (if (and (not (common:directory-exists? lnkbase))
-	     (not (common:file-exists? lnkbase)))
+	     (not (file-exists? lnkbase)))
 	(handle-exceptions
 	 exn
 	 (begin
 	   (debug:print-error 0 *default-log-port* "Problem creating linktree base at " lnkbase)
 	   (print-error-message exn (current-error-port)))
@@ -1237,11 +1237,11 @@
 	 (begin
 	   (debug:print-error 0 *default-log-port* " Failed to remove symlink " lnkpath ((condition-property-accessor 'exn 'message) exn) ", exiting")
 	   (exit 1))
 	 (delete-file lnkpath)))
 
-    (if (not (or (common:file-exists? lnkpath)
+    (if (not (or (file-exists? lnkpath)
 		 (symbolic-link? lnkpath)))
 	(handle-exceptions
 	 exn
 	 (begin
 	   (debug:print-error 0 *default-log-port* " Failed to create symlink " lnkpath ((condition-property-accessor 'exn 'message) exn) ", exiting")
@@ -1262,11 +1262,11 @@
 				   (db:test-get-rundir testinfo) ;; ) ;; )
 				   #f)))
 	  (hash-table-set! *toptest-paths* testname curr-test-path)
 	  ;; NB// Was this for the test or for the parent in an iterated test?
 	  (rmt:general-call 'test-set-rundir-shortdir run-id lnkpath 
-			    (if (common:file-exists? lnkpath)
+			    (if (file-exists? lnkpath)
 				;; (resolve-pathname lnkpath)
 				(common:nice-path lnkpath)
 				lnkpath)
 			    testname "" run-id)
 	  ;; (rmt:general-call 'test-set-rundir run-id lnkpath testname "") ;; toptest-path)
@@ -1301,11 +1301,11 @@
 	   exn
 	   (begin
 	     (debug:print-error 0 *default-log-port* " Failed to re-create link " lnktarget ((condition-property-accessor 'exn 'message) exn) ", exiting")
 	     (exit))
 	   (if (symbolic-link? lnktarget)     (delete-file lnktarget))
-	   (if (not (common:file-exists? lnktarget)) (create-symbolic-link test-path lnktarget)))))
+	   (if (not (file-exists? lnktarget)) (create-symbolic-link test-path lnktarget)))))
 
     (if (not (directory? test-path))
 	(create-directory test-path #t)) ;; this is a hack, I don't know why out of the blue this path does not exist sometimes
 
     (if (and test-src-path (directory? test-path))
@@ -1471,11 +1471,11 @@
 					(list 'mt-bindir-path mt-bindir-path))))))))
       
       ;; clean out step records from previous run if they exist
       ;; (rmt:delete-test-step-records run-id test-id)
       ;; if the dir does not exist we may have a itempath where individual variables are a path, launch anyway
-      (if (common:file-exists? work-area)
+      (if (file-exists? work-area)
 	  (change-directory work-area)) ;; so that log files from the launch process don't clutter the test dir
       (cond
        ;; ((and launcher hosts) ;; must be using ssh hostname
        ;;    (set! fullcmd (append launcher (car hosts)(list remote-megatest "-m" test-sig "-execute" cmdparms) debug-param)))
        ;; (set! fullcmd (append launcher (car hosts)(list remote-megatest test-sig "-execute" cmdparms))))

Index: lock-queue.scm
==================================================================
--- lock-queue.scm
+++ lock-queue.scm
@@ -41,11 +41,11 @@
   (let ((fname (lock-queue:db-dat-get-path dbdat)))
     (system (conc "rm -f " fname "*"))))
 
 (define (lock-queue:open-db fname #!key (count 10))
   (let* ((actualfname (conc fname ".lockdb"))
-	 (dbexists (common:file-exists? actualfname))
+	 (dbexists (file-exists? actualfname))
 	 (db       (sqlite3:open-database actualfname))
 	 (handler  (make-busy-timeout 136000)))
     (if dbexists
 	(vector db actualfname)
 	(begin
@@ -172,12 +172,12 @@
 	     ;; If we've tried ten times and failed there is a serious problem
 	     ;; try to remove the lock db and allow it to be recreated
 	     (handle-exceptions
 	      exn
 	      #f
-	      (if (common:file-exists? journal)(delete-file journal))
-	      (if (common:file-exists? fname)  (delete-file fname))
+	      (if (file-exists? journal)(delete-file journal))
+	      (if (file-exists? fname)  (delete-file fname))
 	      #f))))
      (sqlite3:execute (lock-queue:db-dat-get-db dbdat) "DELETE FROM runlocks WHERE test_id=?;" test-id)
      (sqlite3:finalize! (lock-queue:db-dat-get-db dbdat)))))
 
 (define (lock-queue:steal-lock dbdat test-id #!key (count 10))

Index: megatest-version.scm
==================================================================
--- megatest-version.scm
+++ megatest-version.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: megatest.config
==================================================================
--- megatest.config
+++ megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: megatest.scm
==================================================================
--- megatest.scm
+++ megatest.scm
@@ -51,12 +51,12 @@
 (declare (uses mt))
 (declare (uses api))
 (declare (uses tasks)) ;; only used for debugging.
 (declare (uses env))
 (declare (uses diff-report))
-(declare (uses ftail))
-(import ftail)
+;; (declare (uses ftail))
+;; (import ftail)
 
 (define *db* #f) ;; this is only for the repl, do not use in general!!!!
 
 (include "common_records.scm")
 (include "key_records.scm")
@@ -68,11 +68,11 @@
 (define *usage-use-seconds* #t) ;; for Epoc seconds in usage logging change this to #t in ~/.megatestrc file
 
 ;; load the ~/.megatestrc file, put (use trace)(trace-call-sites #t)(trace function-you-want-to-trace) in this file
 ;;
 (let ((debugcontrolf (conc (get-environment-variable "HOME") "/.megatestrc")))
-  (if (common:file-exists? debugcontrolf)
+  (if (file-exists? debugcontrolf)
       (load debugcontrolf)))
 
 ;; usage logging, careful with this, it is not designed to deal with all real world challenges!
 ;;
 (if (and *usage-log-file*
@@ -438,11 +438,11 @@
     (debug:print-error 0 *default-log-port* "Unrecognised arguments: " (string-intersperse (if (list? remargs) remargs (argv))  " ")))
 
 ;; before doing anything else change to the start-dir if provided
 ;;
 (if (args:get-arg "-start-dir")
-    (if (common:file-exists? (args:get-arg "-start-dir"))
+    (if (file-exists? (args:get-arg "-start-dir"))
         (let ((fullpath (common:real-path (args:get-arg "-start-dir"))))
           (setenv "PWD" fullpath)
           (change-directory fullpath))
 	(begin
 	  (debug:print-error 0 *default-log-port* "non-existant start dir " (args:get-arg "-start-dir") " specified, exiting.")
@@ -532,11 +532,11 @@
     (let* ((htmlviewercmd (or (configf:lookup *configdat* "setup" "htmlviewercmd")
 			      (common:which '("firefox" "arora"))))
 	   (install-home  (common:get-install-area))
 	   (manual-html   (conc install-home "/share/docs/megatest_manual.html")))
       (if (and install-home
-	       (common:file-exists? manual-html))
+	       (file-exists? manual-html))
 	  (system (conc "(" htmlviewercmd " " manual-html " ) &"))
 	  (system (conc "(" htmlviewercmd " http://www.kiatoa.com/cgi-bin/fossils/megatest/doc/tip/docs/manual/megatest_manual.html ) &")))
       (exit)))
 
 (if (args:get-arg "-version")
@@ -787,11 +787,11 @@
 				 (else
 				  (loop row (+ col 1) (append curr-row (list val)) result)))))))))
 		    (hash-table-keys results))))
 		((sqlite3)
 		 (let* ((db-file   (or out-file (pathname-file input-db)))
-			(db-exists (common:file-exists? db-file))
+			(db-exists (file-exists? db-file))
 			(db        (sqlite3:open-database db-file)))
 		   (if (not db-exists)(sqlite3:execute db "CREATE TABLE data (sheet,section,var,val);"))
 		   (configf:map-all-hier-alist
 		    data
 		    (lambda (sheetname sectionname varname val)
@@ -935,11 +935,11 @@
   (let* ((rundir (if (and (getenv "MT_LINKTREE")(getenv "MT_TARGET")(getenv "MT_RUNNAME"))
 		     (conc (getenv "MT_LINKTREE") "/" (getenv "MT_TARGET") "/" (getenv "MT_RUNNAME"))
 		     #f))
 	 (cfgf   (if rundir (conc rundir "/.runconfig." megatest-version "-" megatest-fossil-hash) #f)))
     (if (and cfgf
-	     (common:file-exists? cfgf)
+	     (file-exists? cfgf)
 	     (file-write-access? cfgf)
 	     (common:use-cache?))
 	(configf:read-alist cfgf)
 	(let* ((keys   (rmt:get-keys))
 	       (target (common:args-get-target))
@@ -1780,11 +1780,11 @@
 	  (let* ((keys     (rmt:get-keys))
 		 ;; db:test-get-paths must not be run remote
 		 (paths    (tests:test-get-paths-matching keys target (args:get-arg "-test-files"))))
 	    (set! *didsomething* #t)
 	    (for-each (lambda (path)
-			(if (common:file-exists? path)
+			(if (file-exists? path)
 			(print path)))	
 		      paths)))
 	;; else do a general-run-call
 	(general-run-call 
 	 "-test-files"

Index: minimal/manyservers.sh
==================================================================
--- minimal/manyservers.sh
+++ minimal/manyservers.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: minimal/megatest.config
==================================================================
--- minimal/megatest.config
+++ minimal/megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: minimal/runconfigs.config
==================================================================
--- minimal/runconfigs.config
+++ minimal/runconfigs.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: minimal/tests/tmpspace/testconfig
==================================================================
--- minimal/tests/tmpspace/testconfig
+++ minimal/tests/tmpspace/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: minimt/Makefile
==================================================================
--- minimt/Makefile
+++ minimt/Makefile
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: minimt/db.scm
==================================================================
--- minimt/db.scm
+++ minimt/db.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: minimt/direct.scm
==================================================================
--- minimt/direct.scm
+++ minimt/direct.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: minimt/minimt.scm
==================================================================
--- minimt/minimt.scm
+++ minimt/minimt.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: minimt/queued.scm
==================================================================
--- minimt/queued.scm
+++ minimt/queued.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: minimt/setup.scm
==================================================================
--- minimt/setup.scm
+++ minimt/setup.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/megatest.config
==================================================================
--- mkdeploy/megatest.config
+++ mkdeploy/megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/runconfigs.config
==================================================================
--- mkdeploy/runconfigs.config
+++ mkdeploy/runconfigs.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/checkspace/checkspace.logpro
==================================================================
--- mkdeploy/tests/checkspace/checkspace.logpro
+++ mkdeploy/tests/checkspace/checkspace.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/checkspace/checkspace.sh
==================================================================
--- mkdeploy/tests/checkspace/checkspace.sh
+++ mkdeploy/tests/checkspace/checkspace.sh
@@ -1,6 +1,8 @@
 #!/bin/bash -e
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/checkspace/testconfig
==================================================================
--- mkdeploy/tests/checkspace/testconfig
+++ mkdeploy/tests/checkspace/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/eggs/install.logpro
==================================================================
--- mkdeploy/tests/eggs/install.logpro
+++ mkdeploy/tests/eggs/install.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/eggs/install.sh
==================================================================
--- mkdeploy/tests/eggs/install.sh
+++ mkdeploy/tests/eggs/install.sh
@@ -1,6 +1,8 @@
 #!/bin/bash -e
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/eggs/testconfig
==================================================================
--- mkdeploy/tests/eggs/testconfig
+++ mkdeploy/tests/eggs/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/executables/addlibs.logpro
==================================================================
--- mkdeploy/tests/executables/addlibs.logpro
+++ mkdeploy/tests/executables/addlibs.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/executables/addlibs.sh
==================================================================
--- mkdeploy/tests/executables/addlibs.sh
+++ mkdeploy/tests/executables/addlibs.sh
@@ -1,7 +1,9 @@
 #!/bin/bash -e
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/executables/install.logpro
==================================================================
--- mkdeploy/tests/executables/install.logpro
+++ mkdeploy/tests/executables/install.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/executables/install.sh
==================================================================
--- mkdeploy/tests/executables/install.sh
+++ mkdeploy/tests/executables/install.sh
@@ -1,7 +1,9 @@
 #!/bin/bash -e
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/executables/linksrc.logpro
==================================================================
--- mkdeploy/tests/executables/linksrc.logpro
+++ mkdeploy/tests/executables/linksrc.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/executables/linksrc.sh
==================================================================
--- mkdeploy/tests/executables/linksrc.sh
+++ mkdeploy/tests/executables/linksrc.sh
@@ -1,6 +1,8 @@
 #!/bin/bash -e
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/executables/make_mt.logpro
==================================================================
--- mkdeploy/tests/executables/make_mt.logpro
+++ mkdeploy/tests/executables/make_mt.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/executables/testconfig
==================================================================
--- mkdeploy/tests/executables/testconfig
+++ mkdeploy/tests/executables/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/helpers/install.logpro
==================================================================
--- mkdeploy/tests/helpers/install.logpro
+++ mkdeploy/tests/helpers/install.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/helpers/install.sh
==================================================================
--- mkdeploy/tests/helpers/install.sh
+++ mkdeploy/tests/helpers/install.sh
@@ -1,6 +1,8 @@
 #!/bin/bash -e
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mkdeploy/tests/helpers/testconfig
==================================================================
--- mkdeploy/tests/helpers/testconfig
+++ mkdeploy/tests/helpers/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: mockup-cached-writes.scm
==================================================================
--- mockup-cached-writes.scm
+++ mockup-cached-writes.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: mt-pg.sql
==================================================================
--- mt-pg.sql
+++ mt-pg.sql
@@ -1,5 +1,7 @@
+--  Copyright 2006-2017, Matthew Welland.
+-- 
 -- This file is part of Megatest.
 -- 
 --     Megatest is free software: you can redistribute it and/or modify
 --     it under the terms of the GNU General Public License as published by
 --     the Free Software Foundation, either version 3 of the License, or

Index: mt-sqlite3.sql
==================================================================
--- mt-sqlite3.sql
+++ mt-sqlite3.sql
@@ -1,5 +1,7 @@
+--  Copyright 2006-2017, Matthew Welland.
+-- 
 -- This file is part of Megatest.
 -- 
 --     Megatest is free software: you can redistribute it and/or modify
 --     it under the terms of the GNU General Public License as published by
 --     the Free Software Foundation, either version 3 of the License, or

Index: mt.scm
==================================================================
--- mt.scm
+++ mt.scm
@@ -201,11 +201,11 @@
                                     "\n")
                  (print-call-chain (current-error-port))
                  #f)
                (if (and test-name
                         test-rundir)   ;; #f means no dir set yet
-                   ;; (common:file-exists? test-rundir)
+                   ;; (file-exists? test-rundir)
                    ;; (directory? test-rundir))
                    (call-with-environment-variables
                     (list (cons "MT_TEST_NAME"    (or test-name "no such test"))
                           (cons "MT_TEST_RUN_DIR" (or test-rundir "no test directory yet"))
                           (cons "MT_ITEMPATH"     (or item-path "")))
@@ -271,11 +271,11 @@
 	(let ((test-dirs (tests:get-tests-search-path *configdat*)))
 	  (let loop ((hed (car test-dirs))
 		     (tal (cdr test-dirs)))
 	    ;; Setting MT_LINKTREE here is almost certainly unnecessary. 
 	    (let ((tconfig-file (conc hed "/" test-name "/testconfig")))
-	      (if (and (common:file-exists? tconfig-file)
+	      (if (and (file-exists? tconfig-file)
 		       (file-read-access? tconfig-file))
 		  (let ((link-tree-path (common:get-linktree)) ;; (configf:lookup *configdat* "setup" "linktree"))
 			(old-link-tree  (get-environment-variable "MT_LINKTREE")))
 		    (if link-tree-path (setenv "MT_LINKTREE" link-tree-path))
 		    (let ((newtcfg (read-config tconfig-file #f #f))) ;; NOTE: Does NOT run [system ...]

Index: mtut.scm
==================================================================
--- mtut.scm
+++ mtut.scm
@@ -1,6 +1,6 @@
-; Copyright 2006-2017, Matthew Welland.
+;; Copyright 2006-2017, Matthew Welland.
 ;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
@@ -25,20 +25,24 @@
 (use srfi-1 posix srfi-69 readline ;;  regex regex-case srfi-69 apropos json http-client directory-utils rpc typed-records;; (srfi 18) extras)
      srfi-18 extras format pkts regex regex-case
      (prefix dbi dbi:)
      nanomsg)
 
-(declare (uses common))
+(declare (uses mtcommon))
 (declare (uses megatest-version))
 (declare (uses margs))
-(declare (uses configf))
-;; (declare (uses rmt))
+(declare (uses mtconfigf))
+(declare (uses mtdb)) ;; WARNING: This is NOT the db from megatest/db.scm, is it src/db.scm
 
 (include "megatest-fossil-hash.scm")
 
 (require-library stml)
 
+(import (prefix mtdb db:))
+(import (prefix mtcommon common:))
+(import (prefix mtconfigf configf:))
+
 ;; stuff for the mapper and checker functions
 ;;
 (define *target-mappers*  (make-hash-table)) 
 (define *runname-mappers* (make-hash-table)) 
 (define *area-checkers*   (make-hash-table)) 
@@ -91,14 +95,14 @@
 ;;  ii. Check that we are in a legal megatest area?
 ;; iii. Have some form of authentication or record of the md5sum or similar of the file?
 ;;  iv. Use compiled version in preference to .scm version. Thus there is a manual "blessing"
 ;;      required to use .mtutil.scm.
 ;;
-(if (common:file-exists? "megatest.config")
-    (if (common:file-exists? ".mtutil.so")
+(if (file-exists? "megatest.config")
+    (if (file-exists? ".mtutil.so")
 	(load ".mtutil.so")
-	(if (common:file-exists? ".mtutil.scm")
+	(if (file-exists? ".mtutil.scm")
             (load ".mtutil.scm"))))
 
 ;; main three types of run
 ;;  "-run"         => initiate a run
 ;;  "-rerun-clean" => set failed, aborted, killed, etc. (not pass/fail) to NOT_STARTED and kick off run
@@ -304,12 +308,10 @@
 (define (megatest-param->mtutil-param param)
   (let* ((mapping-alist (common:get-param-mapping flavor: 'switch-symbol)))
     (alist-ref (string->symbol param) mapping-alist eq? param)
     param))
 
-(define val->alist common:val->alist)
-
 (define (push-run-spec torun contour runkey spec)
   (configf:section-var-set! torun contour runkey
 			    (cons spec
 				  (or (configf:lookup torun contour runkey)
 				      '()))))
@@ -321,11 +323,11 @@
 	(print "ERROR: failed to create directory " dest-dir " message: " ((condition-property-accessor 'exn 'message) exn))
       (create-directory dest-dir #t))
     (handle-exceptions
 	exn
 	(print "ERROR: failed to clone or sync 1ossil " url " message: " ((condition-property-accessor 'exn 'message) exn))
-      (if (common:file-exists? targ-file)
+      (if (file-exists? targ-file)
 	  (system (conc "fossil pull --once " url " -R " targ-file))
 	  (system (conc "fossil clone " url " " targ-file))
 	  ))))
 
 (define (fossil:last-change-node-and-time fossils-dir fossil-name branch)
@@ -666,11 +668,11 @@
 ;; 
 (define (create-run-pkt mtconf action area runkey target runname mode-patt 
                         tag-expr pktsdir reason contour sched dbdest append-conf
                         runtrans)
   (let* ((good-val   (lambda (inval)(and inval (string? inval)(not (string-null? inval)))))
-	 (area-dat   (common:val->alist (or (configf:lookup mtconf "areas" area) "")))
+	 (area-dat   (configf:val->alist (or (configf:lookup mtconf "areas" area) "")))
 	 (area-path  (alist-ref 'path      area-dat))
 	 ;; (area-xlatr (alist-ref 'targtrans area-dat))
          ;; (xlatr-key  (if area-xlatr (string->symbol area-xlatr) #f))
          (new-runname (let* ((callname (if (string? runtrans)(string->symbol runtrans) #f))
 			     (mapper   (if callname (hash-table-ref/default *runname-mappers* callname #f) #f)))
@@ -765,11 +767,11 @@
 			(len-key    (length keyparts))
 			(ruletype   (if (> len-key 1)(cadr keyparts) #f))
 			(action     (if (> len-key 2)(caddr keyparts) #f))
 			(optional   (if (> len-key 3)(cadddr keyparts) #f))
 			;; (val-list   (string-split-fields ";\\s*" val #:infix)) ;; (string-split val)) ;; runname-rule params
-			(val-alist  (common:val->alist val))
+			(val-alist  (configf:val->alist val))
 			(runname    (make-runname "" ""))
 			(runtrans   (alist-ref 'runtrans val-alist))
 
 			;; these may or may not be defined and not all are used in each handler type in the case below
 			(run-name   (alist-ref 'run-name val-alist))
@@ -1010,11 +1012,11 @@
 	 
 	 ;; now have to run populated
 	 (for-each
 	  (lambda (contour)
 	    (let* ((cval       (or (configf:lookup mtconf "contours" contour) ""))
-		   (cval-alist (common:val->alist cval))                     ;; BEWARE ... NOT the same val-alist as above!
+		   (cval-alist (configf:val->alist cval))                     ;; BEWARE ... NOT the same val-alist as above!
 		   (areas      (val-alist->areas cval-alist))
 		   (selector   (alist-ref 'selector cval-alist))
 		   (mode-tag   (and selector (string-split-fields "/" selector #:infix)))
 		   (mode-patt  (and mode-tag (if (eq? (length mode-tag) 2)(cadr mode-tag) #f)))
 		   (tag-expr   (and mode-tag (if (null? mode-tag) #f (car mode-tag)))))
@@ -1028,11 +1030,11 @@
 		    (lambda (runkeydat)
 		      (for-each
 		       (lambda (area)
 			 (if (area-allowed? area areas runkey contour mode-patt) ;; is this area to be handled (from areas=a,b,c OR using areafn=abcfn and *area-checks* ...)
                              (let* ((aval       (or (configf:lookup mtconf "areas" area) ""))
-                                    (aval-alist (common:val->alist aval))
+                                    (aval-alist (configf:val->alist aval))
                                     (runname    (alist-ref 'runname runkeydat))
                                     (runtrans   (alist-ref 'runtrans runkeydat))
                                     
                                     (reason     (alist-ref 'message runkeydat))
                                     (sched      (alist-ref 'sched   runkeydat))
@@ -1200,21 +1202,21 @@
   (let ((pktsdirs  (configf:lookup mtconf "setup" "pktsdirs"))
 	(pktsdir   (if pktsdirs (car (string-split pktsdirs " ")) #f)))
     pktsdir))
 
 (let ((debugcontrolf (conc (get-environment-variable "HOME") "/.mtutilrc")))
-  (if (common:file-exists? debugcontrolf)
+  (if (file-exists? debugcontrolf)
       (load debugcontrolf)))
 
 (if *action*
     (case (string->symbol *action*)
       ((run remove rerun rerun-clean rerun-all set-ss archive kill list)
        (let* ((mtconfdat (simple-setup (args:get-arg "-start-dir")))
 	      (mtconf    (car mtconfdat))
 	      (area      (args:get-arg "-area")) ;; look up the area to dispatch to from [areas] section
 	      (areasec   (if area (configf:lookup mtconf "areas" area) #f))
-	      (areadat   (if areasec (common:val->alist areasec) #f))
+	      (areadat   (if areasec (configf:val->alist areasec) #f))
 	      (area-path (if areadat (alist-ref 'path areadat) #f))
 	      (pktsdirs  (configf:lookup mtconf "setup" "pktsdirs"))
 	      (pktsdir   (if pktsdirs (car (string-split pktsdirs " ")) #f))
 	      (adjargs   (hash-table-copy args:arg-hash))
 	      (new-ss    (args:get-arg "-new")))
@@ -1302,16 +1304,16 @@
 	   (let ((subcmd (car remargs)))
 	     (case (string->symbol subcmd)
 	       ((pgschema)
 		(let* ((install-home (common:get-install-area))
 		       (schema-file  (conc install-home "/share/db/mt-pg.sql")))
-		  (if (common:file-exists? schema-file)
+		  (if (file-exists? schema-file)
 		      (system (conc "/bin/cat " schema-file)))))
 	       ((sqlite3schema)
 		(let* ((install-home (common:get-install-area))
 		       (schema-file  (conc install-home "/share/db/mt-sqlite3.sql")))
-		  (if (common:file-exists? schema-file)
+		  (if (file-exists? schema-file)
 		      (system (conc "/bin/cat " schema-file)))))
 	       ((junk)
 		(rmt:get-keys))))))
       ((tsend)
        (if (null? remargs)
@@ -1349,16 +1351,24 @@
                            (print "received " instr ", running \"" script " " instr "\"")
                            (system (conc script " '" instr "'"))
                            (nn-send rep "ok")
                            (loop (nn-recv rep))))
 		       (print "ERROR: Port " portnum " already in use. Try another port")))))))
-      ((gather) ;; gather all area db's into /tmp/$USER_megatest/alldbs
+      ((gatherdb) ;; gather all area db's into /tmp/$USER_megatest/alldbs
        (let* ((mtconfdat (simple-setup (args:get-arg "-start-dir")))
               (mtconf    (car mtconfdat))
-              (areas     (get-area-names mtconf)))
-         (print "areas: " areas)))
-      
+              ;; (areas     (get-area-names mtconf))
+              (areas     (configf:section->val-alist mtconf "areas")))
+         (for-each
+          (lambda (area)
+            (let* ((area-name (car area))
+                   (area-info (cdr area))
+                   (area-path (alist-ref 'path area-info)))
+              (print "Area: " area)
+              (print "   path: " area-path)))
+          areas)))
+            
       (else
        (let ((all-actions (sort (map conc (delete-duplicates (append *other-actions* (map car *action-keys*)))) string<=?)))
 	 (print "unrecognised action: \"" *action* "\", try one of; \"" (string-intersperse all-actions "\", \"") "\"")))
       
       )) ;; the end

Index: newdashboard.scm
==================================================================
--- newdashboard.scm
+++ newdashboard.scm
@@ -26,20 +26,24 @@
 (import canvas-draw-iup)
 
 (use sql-de-lite srfi-1 posix regex regex-case srfi-69 typed-records sparse-vectors ;; defstruct
      (prefix dbi dbi:))
 
-(declare (uses common))
+(declare (uses mtcommon))
 (declare (uses megatest-version))
 (declare (uses margs))
 
+;; mofiles/mtdb.o mofiles/mtcommon.o mofiles/mtconfigf.o
+;; dashboard-context-menu.o dashboard-tests.o dashboard-guimonitor.o
+;; gutils.o dcommon.o tree.o vg.o newdashboard.scm -o ndboard
+
 ;; (declare (uses launch))
 ;; (declare (uses gutils))
 ;; (declare (uses db))
 ;; (declare (uses server))
 ;; (declare (uses synchash))
-(declare (uses dcommon))
+;; (declare (uses dcommon))
 ;; (declare (uses tree))
 ;; 
 ;; (include "common_records.scm")
 ;; (include "db_records.scm")
 ;; (include "key_records.scm")
@@ -80,16 +84,16 @@
 (if (args:get-arg "-h")
     (begin
       (print help)
       (exit)))
 
-;; ease debugging by loading ~/.dashboardrc
-(let ((debugcontrolf (conc (get-environment-variable "HOME") "/.dashboardrc")))
-  (if (common:file-exists? debugcontrolf)
-      (load debugcontrolf)))
-
-(debug:setup)
+;; ;; ease debugging by loading ~/.dashboardrc
+;; (let ((debugcontrolf (conc (get-environment-variable "HOME") "/.dashboardrc")))
+;;   (if (file-exists? debugcontrolf)
+;;       (load debugcontrolf)))
+;; 
+;; (debug:setup)
 
 (define *tim* (iup:timer))
 (define *ord* #f)
 
 (iup:attribute-set! *tim* "TIME" 300)
@@ -122,592 +126,10 @@
 
 (define (update-search x val)
   (hash-table-set! *searchpatts* x val))
 
 
-;; data for each specific tab goes here
-;;
-(defstruct dboard:tabdat 
-  ;; runs
-  ((allruns         '())                 : list)        ;; list of dboard:rundat records
-  ((allruns-by-id    (make-hash-table))  : hash-table)  ;; hash of run-id -> dboard:rundat records
-  ((done-runs       '())                 : list)        ;; list of runs already drawn
-  ((not-done-runs   '())                 : list)        ;; list of runs not yet drawn
-  (header            #f)                                ;; header for decoding the run records
-  (keys              #f)                                ;; keys for this run (i.e. target components)
-  ((numruns          (string->number (or (args:get-arg "-cols") "10")))                 : number)      ;; 
-  ((tot-runs          0)                 : number)
-  ((last-data-update  0)                 : number)      ;; last time the data in allruns was updated
-  ((last-runs-update  0)                 : number)      ;; last time we pulled the runs info to update the tree
-  (runs-mutex         (make-mutex))                     ;; use to prevent parallel access to draw objects
-  ((run-update-times  (make-hash-table)) : hash-table)  ;; update times indexed by run-id
-  ((last-test-dat      (make-hash-table)) : hash-table)  ;; cache last tests dat by run-id
-  ((run-db-paths      (make-hash-table)) : hash-table)  ;; cache the paths to the run db files
-
-  ;; Runs view
-  ((buttondat         (make-hash-table)) : hash-table)  ;;     
-  ((item-test-names  '())                : list)        ;; list of itemized tests
-  ((run-keys          (make-hash-table)) : hash-table)
-  (runs-matrix        #f)                               ;; used in newdashboard
-  ((start-run-offset   0)                : number)      ;; left-right slider value
-  ((start-test-offset  0)                : number)      ;; up-down slider value
-  ((runs-btn-height    (or (configf:lookup *configdat* "dashboard" "btn-height") "x16")) : string)  ;; was 12
-  ((runs-btn-fontsz    (or (configf:lookup *configdat* "dashboard" "btn-fontsz") "10")) : string)   ;; was 8
-  ((runs-cell-width    (or (configf:lookup *configdat* "dashboard" "cell-width") "60")) : string)   ;; was 50
-  ((all-test-names     '())              : list)
-  
-  ;; Canvas and drawing data
-  (cnv                #f)
-  (cnv-obj            #f)
-  (drawing            #f)
-  ((run-start-row     0)                 : number)
-  ((max-row           0)                 : number)
-  ((running-layout    #f)                : boolean)
-  (originx            #f)
-  (originy            #f)
-  ((layout-update-ok  #t)                : boolean)
-  ((compact-layout    #t)                : boolean)
-
-  ;; Run times layout
-  ;; (graph-button-box #f) ;; RA => Think it is not referenced anywhere
-  (graph-matrix     #f)
-  ((graph-matrix-table (make-hash-table)) : hash-table) ;; graph-dats referenced thru graph name info
-  ((graph-cell-table (make-hash-table)) : hash-table) ;; graph-dats referenced thru matrix cell info
-  ((graph-matrix-row 1) : number)
-  ((graph-matrix-col 1) : number)
-
-  ;; Controls used to launch runs etc.
-  ((command          "")                 : string)      ;; for run control this is the command being built up
-  (command-tb        #f)	                        ;; widget for the type of command; run, remove-runs etc.
-  (test-patterns-textbox #f)                            ;; text box widget for editing a list of test patterns
-  (key-listboxes     #f)			         
-  (key-lbs           #f)			         
-  run-name                                              ;; from run name setting widget
-  states                                                ;; states for -state s1,s2 ...
-  statuses                                              ;; statuses for -status s1,s2 ...
-						         
-  ;; Selector variables				         
-  curr-run-id                                           ;; current row to display in Run summary view
-  prev-run-id                                           ;; previous runid selected before current runid was selected (used in xor-two-runs runs summary mode
-  curr-test-ids                                         ;; used only in dcommon:run-update which is used in newdashboard
-  ((filters-changed  #t)                  : boolean)    ;; to indicate that the user changed filters for this tab
-  ((last-filter-str  "")                  : string)      ;; conc the target runname and testpatt for a signature of changed filters
-  ((hide-empty-runs  #f)                  : boolean)     
-  ((hide-not-hide    #t)                  : boolean)     ;; toggle for hide/not hide empty runs
-  (hide-not-hide-button #f)
-  ((searchpatts        (make-hash-table)) : hash-table)  ;;
-  ((state-ignore-hash  (make-hash-table)) : hash-table)  ;; hash of  STATE => #t/#f for display control
-  ((status-ignore-hash (make-hash-table)) : hash-table)  ;; hash of STATUS => #t/#f
-  (target              #f)
-  (test-patts          #f)
-
-  ;; db info to file the .db files for the area
-  (access-mode        (db:get-access-mode))             ;; use cached db or not
-  (dbdir               #f)
-  (dbfpath             #f)
-  (dbkeys              #f)
-  ((last-db-update     (make-hash-table)) : hash-table) ;; last db file timestamp
-  (monitor-db-path     #f)                              ;; where to find monitor.db
-  ro                                                    ;; is the database read-only?
-
-  ;; tests data
-  ((num-tests          10)               : number)      ;; total number of tests to show (used in the old runs display)
-
-  ;; runs tree
-  ((path-run-ids       (make-hash-table)) : hash-table) ;; path (target / runname) => id
-  (runs-tree           #f)
-  ((runs-tree-ht       (make-hash-table)) : hash-table) ;; track which targets added to tree (merge functionality with path-run-ids?)
-
-  ;; tab data
-  ((view-changed       #t)                : boolean)   
-  ((xadj               0)                 : number)     ;; x slider number (if using canvas)
-  ((yadj               0)                 : number)     ;; y slider number (if using canvas)
-  ;; runs-summary tab state
-  ((runs-summary-modes '((one-run . "Show One Run") (xor-two-runs . "XOR Two Runs") (xor-two-runs-hide-clean . "XOR; Hide Clean")) )   : list)
-  ((runs-summary-mode-buttons '())               : list)
-  ((runs-summary-mode  'one-run)            : symbol)
-  ((runs-summary-mode-change-callbacks '()) : list)
-  (runs-summary-source-runname-label #f)
-  (runs-summary-dest-runname-label #f)
-  ;; runs summary view
-  
-  tests-tree       ;; used in newdashboard
-  )
-
-
-
-;; mtest is actually the megatest.config file
-;;
-(define (mtest toppath window-id)
-  (let* ((curr-row-num     0)
-	 ;; (rawconfig        (read-config (conc toppath "/megatest.config") #f 'return-string))
-	 (keys-matrix      (iup:matrix)) ;; (dcommon:keys-matrix rawconfig))
-	 (setup-matrix     (iup:matrix)) ;; (dcommon:section-matrix rawconfig "setup" "Varname" "Value"))
-	 (jobtools-matrix  (iup:matrix
-			    #:expand "YES"
-			    #:numcol 1
-			    #:numlin 5
-			    #:numcol-visible 1
-			    #:numlin-visible 3))
-	 (validvals-matrix (iup:matrix
-			    #:expand "YES"
-			    #:numcol 1
-			    #:numlin 2
-			    #:numcol-visible 1
-			    #:numlin-visible 2))
-	 (envovrd-matrix   (iup:matrix
-			    #:expand "YES"
-			    #:numcol 1
-			    #:numlin 20
-			    #:numcol-visible 1
-			    #:numlin-visible 8))
-	 (disks-matrix     (iup:matrix
-			    #:expand "YES"
-			    #:numcol 1
-			    #:numlin 20
-			    #:numcol-visible 1
-			    #:numlin-visible 8))
-	 )
-    (iup:attribute-set! disks-matrix "0:0" "Disk Name")
-    (iup:attribute-set! disks-matrix "0:1" "Disk Path")
-    (iup:attribute-set! disks-matrix "WIDTH1" "120")
-    (iup:attribute-set! disks-matrix "WIDTH0" "100")
-    (iup:attribute-set! disks-matrix "ALIGNMENT1" "ALEFT")
-    (iup:attribute-set! disks-matrix "FIXTOTEXT" "C1")
-    (iup:attribute-set! disks-matrix "RESIZEMATRIX" "YES")
-
-    ;; fill in existing info
-    (for-each 
-     (lambda (mat fname)
-       (set! curr-row-num 1)
-       (for-each
-	(lambda (var)
-	  (iup:attribute-set! mat (conc curr-row-num ":0") var)
-	  ;; (iup:attribute-set! mat (conc curr-row-num ":1") (config-lookup rawconfig fname var))
-	  (set! curr-row-num (+ curr-row-num 1)))
-	'()));; (configf:section-vars rawconfig fname)))
-     (list setup-matrix jobtools-matrix validvals-matrix envovrd-matrix disks-matrix)
-     (list "setup"      "jobtools"      "validvalues"      "env-override" "disks"))
-
-    (for-each
-     (lambda (mat)
-       (iup:attribute-set! mat "0:1" "Value")
-       (iup:attribute-set! mat "0:0" "Var")
-       (iup:attribute-set! mat "ALIGNMENT1" "ALEFT")
-       (iup:attribute-set! mat "FIXTOTEXT" "C1")
-       (iup:attribute-set! mat "RESIZEMATRIX" "YES")
-       (iup:attribute-set! mat "WIDTH1" "120")
-       (iup:attribute-set! mat "WIDTH0" "100")
-       )
-     (list setup-matrix jobtools-matrix validvals-matrix envovrd-matrix))
-
-    (iup:attribute-set! validvals-matrix "WIDTH1" "290")
-    (iup:attribute-set! envovrd-matrix   "WIDTH1" "290")
-
-    (iup:vbox
-     (iup:hbox
-       
-      (iup:vbox
-       (let ((tabs (iup:tabs 
-		    ;; The required tab
-		    (iup:hbox
-		     ;; The keys
-		     (iup:frame 
-		      #:title "Keys (required)"
-		      (iup:vbox
-		       (iup:label (conc "Set the fields for organising your runs\n"
-					"here. Note: can only be changed before\n"
-					"running the first run when megatest.db\n"
-					"is created."))
-		       keys-matrix))
-		     (iup:vbox
-		      ;; The setup section
-		      (iup:frame
-		       #:title "Setup"
-		       (iup:vbox
-			(iup:label (conc "max_concurrent_jobs : limits total concurrent jobs (optional)\n"
-					 "linktree : directory where linktree will be created."))
-			setup-matrix))
-		      ;; The jobtools
-		      (iup:frame
-		       #:title "Jobtools"
-		       (iup:vbox 
-			(iup:label (conc "launcher : tool or script to run jobs (try nbfake)\n"
-					 "useshell : use system to run your launcher\n"
-					 "workhosts : spread jobs out on these hosts"))
-			jobtools-matrix))
-		      ;; The disks
-		      (iup:frame
-		       #:title "Disks"
-		       (iup:vbox
-			(iup:label (conc "Enter names and existing paths of locations to run tests")) 
-			disks-matrix))))
-		    ;; The optional tab
-		    (iup:vbox
-		     ;; The Environment Overrides
-		     (iup:frame 
-		      #:title "Env override"
-		      envovrd-matrix)
-		     ;; The valid values
-		     (iup:frame
-		      #:title "Validvalues"
-		      validvals-matrix)
-		     ))))
-	 (iup:attribute-set! tabs "TABTITLE0" "Required settings")
-	 (iup:attribute-set! tabs "TABTITLE1" "Optional settings")
-	 tabs))
-       ))))
-
-;; The runconfigs.config file
-;;
-(define (rconfig window-id)
-  (iup:vbox
-   (iup:frame #:title "Default")))
-
-;;======================================================================
-;; T E S T S
-;;======================================================================
-
-(define (tree-path->test-id path)
-  (if (not (null? path))
-      (hash-table-ref/default (dboard:data-path-test-ids *data*) path #f)
-      #f))
-
-(define (test-panel window-id)
-  (let* ((curr-row-num 0)
-	 (viewlog    (lambda (x)
-		       (if (common:file-exists? logfile)
-					;(system (conc "firefox " logfile "&"))
-			   (iup:send-url logfile)
-			   (message-window (conc "File " logfile " not found")))))
-	 (xterm      (lambda (x)
-		       (if (directory-exists? rundir)
-			   (let ((shell (if (get-environment-variable "SHELL") 
-					    (conc "-e " (get-environment-variable "SHELL"))
-					    "")))
-			     (system (conc "cd " rundir 
-					   ";xterm -T \"" (string-translate testfullname "()" "  ") "\" " shell "&")))
-			   (message-window  (conc "Directory " rundir " not found")))))
-	 (command-text-box (iup:textbox #:expand "HORIZONTAL" #:font "Courier New, -12"))
-	 (command-launch-button (iup:button "Execute!" 
-					    ;; #:expand "HORIZONTAL"
-					    #:size "50x"
-					    #:action (lambda (x)
-						       (let ((cmd (iup:attribute command-text-box "VALUE")))
-							 (system (conc cmd "  &"))))))
-	 (run-test  (lambda (x)
-		      (iup:attribute-set! 
-		       command-text-box "VALUE"
-		       (conc "xterm -geometry 180x20 -e \"megatest -target " keystring " :runname " runname 
-			     " -runtests " (conc testname "/" (if (equal? item-path "")
-								  "%" 
-								  item-path))
-			     ";echo Press any key to continue;bash -c 'read -n 1 -s'\""))))
-	 (remove-test (lambda (x)
-			(iup:attribute-set!
-			 command-text-box "VALUE"
-			 (conc "xterm -geometry 180x20 -e \"megatest -remove-runs -target " keystring " :runname " runname
-			       " -testpatt " (conc testname "/" (if (equal? item-path "")
-								    "%"
-								    item-path))
-			       " -v;echo Press any key to continue;bash -c 'read -n 1 -s'\""))))
-    	 (run-info-matrix  (iup:matrix 		            
-			    #:expand "YES"
-			    ;; #:scrollbar "YES"
-			    #:numcol 1
-			    #:numlin 4
-			    #:numcol-visible 1
-			    #:numlin-visible 4
-			    #:click-cb (lambda (obj lin col status)
-					 (print "obj: " obj " lin: " lin " col: " col " status: " status))))
-	 (test-info-matrix (iup:matrix
-		            #:expand "YES"
-		            #:numcol 1
-		            #:numlin 7
-		            #:numcol-visible 1
-		            #:numlin-visible 7))
-	 (test-run-matrix  (iup:matrix
-			    #:expand "YES"
-			    #:numcol 1
-			    #:numlin 5
-			    #:numcol-visible 1
-			    #:numlin-visible 5))
-	 (meta-dat-matrix  (iup:matrix
-			    #:expand "YES"
-			    #:numcol 1
-			    #:numlin 5
-			    #:numcol-visible 1
-			    #:numlin-visible 5))
-	 (steps-matrix     (iup:matrix
-			    #:expand "YES"
-			    #:numcol 6
-			    #:numlin 50
-			    #:numcol-visible 6
-			    #:numlin-visible 8))
-	 (data-matrix      (iup:matrix
-			    #:expand "YES"
-			    #:numcol 8
-			    #:numlin 50
-			    #:numcol-visible 8
-			    #:numlin-visible 8))
-	 (updater          (lambda (testdat)
-			     (test-update window-id testdat run-info-matrix test-info-matrix test-run-matrix meta-dat-matrix steps-matrix data-matrix))))
-
-    ;; Set the updater in updaters
-    ;; (hash-table-set! (dboard:data-updaters *data*) window-id updater)
-    ;; 
-    (for-each
-     (lambda (mat)
-       ;; (iup:attribute-set! mat "0:1" "Value")
-       ;; (iup:attribute-set! mat "0:0" "Var")
-       (iup:attribute-set! mat "HEIGHT0" 0)
-       (iup:attribute-set! mat "ALIGNMENT1" "ALEFT")
-       ;; (iup:attribute-set! mat "FIXTOTEXT" "C1")
-       (iup:attribute-set! mat "RESIZEMATRIX" "YES"))
-       ;; (iup:attribute-set! mat "WIDTH1" "120")
-       ;; (iup:attribute-set! mat "WIDTH0" "100"))
-     (list run-info-matrix test-info-matrix test-run-matrix meta-dat-matrix))
-
-    ;; Steps matrix
-    (iup:attribute-set! steps-matrix "0:1" "Step Name")
-    (iup:attribute-set! steps-matrix "0:2" "Start")
-    (iup:attribute-set! steps-matrix "WIDTH2" "40")
-    (iup:attribute-set! steps-matrix "0:3" "End")
-    (iup:attribute-set! steps-matrix "WIDTH3" "40")
-    (iup:attribute-set! steps-matrix "0:4" "Status")
-    (iup:attribute-set! steps-matrix "WIDTH4" "40")
-    (iup:attribute-set! steps-matrix "0:5" "Duration")
-    (iup:attribute-set! steps-matrix "WIDTH5" "40")
-    (iup:attribute-set! steps-matrix "0:6" "Log File")
-    (iup:attribute-set! steps-matrix "ALIGNMENT1" "ALEFT")
-    ;; (iup:attribute-set! steps-matrix "FIXTOTEXT" "C1")
-    (iup:attribute-set! steps-matrix "RESIZEMATRIX" "YES")
-    ;; (iup:attribute-set! steps-matrix "WIDTH1" "120")
-    ;; (iup:attribute-set! steps-matrix "WIDTH0" "100")
-
-    ;; Data matrix
-    ;; 
-    (let ((rownum 1))
-      (for-each
-       (lambda (x)
-	 (iup:attribute-set! data-matrix (conc "0:" rownum) x)
-	 (iup:attribute-set! data-matrix (conc "WIDTH" rownum) "50")
-	 (set! rownum (+ rownum 1)))
-       (list "Category" "Variable" "Value" "Expected" "Tolerance"  "Status" "Units" "Type" "Comment")))
-    (iup:attribute-set! data-matrix "REDRAW" "ALL")
-    
-    (for-each 
-     (lambda (data)
-       (let ((mat    (car data))
-	     (keys   (cadr data))
-	     (rownum 1))
-	 (for-each
-	  (lambda (key)
-	    (iup:attribute-set! mat (conc rownum ":0") key)
-	    (set! rownum (+ rownum 1)))
-	  keys)
-	 (iup:attribute-set! mat "REDRAW" "ALL")))
-     (list
-      (list run-info-matrix  '("Run Id"  "Target"   "Runname" "Run Start Time" ))
-      (list test-info-matrix '("Test Id" "Testname" "Itempath" "State"   "Status" "Test Start Time" "Comment"))
-      (list test-run-matrix  '("Hostname" "Host info" "Disk Free" "CPU Load" "Run Duration"))
-      (list meta-dat-matrix  '("Author"   "Owner"     "Last Reviewed" "Tags" "Description"))))
-	    
-    (iup:split
-      #:orientation "HORIZONTAL"
-      (iup:vbox
-       (iup:hbox
-	(iup:vbox
-	 run-info-matrix
-	 test-info-matrix)
-       ;; test-info-matrix)
-	(iup:vbox
-	 test-run-matrix
-	 meta-dat-matrix))
-       (iup:vbox
-	(iup:vbox
-	 (iup:hbox 
-	  (iup:button "View Log"    #:action viewlog      #:size "60x" )   ;; #:size "30x" 
-	  (iup:button "Start Xterm" #:action xterm        #:size "60x" ))	 ;; #:size "30x" 
-	 (iup:hbox
-	   (iup:button "Run Test"    #:action run-test    #:size "60x" )	 ;; #:size "30x" 
-	   (iup:button "Clean Test"  #:action remove-test #:size "60x" )))	 ;; #:size "30x" 
-	(iup:hbox
-	 ;; hiup:split ;; hbox
-	 ;; #:orientation "HORIZONTAL"
-	 ;; #:value 300
-	 command-text-box
-	 command-launch-button)))
-      (iup:vbox
-       (let ((tabs (iup:tabs
-		    steps-matrix
-		    data-matrix)))
-	 (iup:attribute-set! tabs "TABTITLE0" "Test Steps")
-	 (iup:attribute-set! tabs "TABTITLE1" "Test Data")
-	 tabs)))))
-       
-;; Test browser
-(define (tests window-id)
-  (iup:split
-   (let* ((tb      (iup:treebox
-		    #:selection-cb
-		    (lambda (obj id state)
-		      ;; (print "obj: " obj ", id: " id ", state: " state)
-		      (let* ((run-path (tree:node->path obj id))
-			     (test-id  (tree-path->test-id (cdr run-path))))
-			;; (if test-id
-			;;     (hash-table-set! (dboard:data-curr-test-ids *data*)
-			;; 		     window-id test-id))
-			(print "path: " (tree:node->path obj id) " test-id: " test-id))))))
-     (iup:attribute-set! tb "VALUE" "0")
-     (iup:attribute-set! tb "NAME" "Runs")
-     ;;(iup:attribute-set! tb "ADDEXPANDED" "NO")
-     ;; (dboard:data-tests-tree-set! *data* tb)
-     tb)
-   (test-panel window-id)))
-
-;; The function to update the fields in the test view panel
-(define (test-update window-id testdat run-info-matrix test-info-matrix test-run-matrix meta-dat-matrix steps-matrix data-matrix)
-  ;; get test-id
-  ;; then get test record
-  (if testdat
-      (let* ((test-id      0) ;; (hash-table-ref/default (dboard:data-curr-test-ids *data*) window-id #f))
-	     (test-data    (hash-table-ref/default testdat test-id #f))
-	     (run-id       (db:test-get-run_id test-data))
-	     (targ/runname (hash-table-ref/default (dboard:data-run-keys *data*) 
-						   run-id
-						   '()))
-	     (target       (if (null? targ/runname) "" (string-intersperse (reverse (cdr (reverse targ/runname))) "/")))
-	     (runname      (if (null? targ/runname) "" (car (cdr targ/runname))))
-	     (steps-dat    (tests:get-compressed-steps *dbstruct-local* run-id test-id)))
-				
-	(if test-data
-	    (begin
-	      ;; 
-	      (for-each 
-	       (lambda (data)
-		 (let ((mat    (car data))
-		       (vals   (cadr data))
-		       (rownum 1))
-		   (for-each 
-		    (lambda (key)
-		      (let ((cell   (conc rownum ":1")))
-			(if (not (equal? (iup:attribute mat cell)(conc key)))
-			    (begin
-			      ;; (print "setting cell " cell " in matrix " mat " to value " key)
-			      (iup:attribute-set! mat cell (conc key))
-			      (iup:attribute-set! mat "REDRAW" cell)))
-			(set! rownum (+ rownum 1))))
-		    vals)))
-	       (list 
-		(list run-info-matrix
-		      (if test-id
-			  (list (db:test-get-run_id test-data)
-				target
-				runname
-				"n/a")
-			  (make-list 4 "")))
-		(list test-info-matrix
-		      (if test-id
-			  (list test-id
-				(db:test-get-testname test-data)
-				(db:test-get-item-path test-data)
-				(db:test-get-state    test-data)
-				(db:test-get-status   test-data)
-				(seconds->string (db:test-get-event_time test-data))
-				(db:test-get-comment  test-data))
-			  (make-list 7 "")))
-		(list test-run-matrix
-		      (if test-id
-			  (list (db:test-get-host     test-data)
-				(db:test-get-uname    test-data)
-				(db:test-get-diskfree test-data)
-				(db:test-get-cpuload  test-data)
-				(seconds->hr-min-sec (db:test-get-run_duration test-data)))
-			  (make-list 5 "")))
-		))
-	      (dcommon:populate-steps steps-dat steps-matrix))))))
-		;;(list meta-dat-matrix
-		;;      (if test-id
-		;;	  (list (
-
-  
-;; db:test-get-id           
-;; db:test-get-run_id       
-;; db:test-get-testname     
-;; db:test-get-state        
-;; db:test-get-status       
-;; db:test-get-event_time   
-;; db:test-get-host         
-;; db:test-get-cpuload      
-;; db:test-get-diskfree     
-;; db:test-get-uname        
-;; db:test-get-rundir       
-;; db:test-get-item-path    
-;; db:test-get-run_duration 
-;; db:test-get-final_logf   
-;; db:test-get-comment      
-;; db:test-get-fullname     	  
-
-
-;;======================================================================
-;; R U N   C O N T R O L
-;;======================================================================
-
-;; Overall runs browser
-;;
-(define (runs window-id)
-  (let* ((runs-matrix     (iup:matrix
-			   #:expand "YES"
-			   ;; #:fittosize "YES"
-			   #:scrollbar "YES"
-			   #:numcol 100
-			   #:numlin 100
-			   #:numcol-visible 7
-			   #:numlin-visible 7
-			   #:click-cb (lambda (obj lin col status)
-					(print "obj: " obj " lin: " lin " col: " col " status: " status)))))
-
-    (iup:attribute-set! runs-matrix "RESIZEMATRIX" "YES")
-    (iup:attribute-set! runs-matrix "WIDTH0" "100")
-
-    ;; (dboard:data-runs-matrix-set! *data* runs-matrix)
-    (iup:hbox
-     (iup:frame 
-      #:title "Runs browser"
-      (iup:vbox
-       runs-matrix)))))
-
-;; Browse and control a single run
-;;
-(define (runcontrol window-id)
-  (iup:hbox))
-
-;;======================================================================
-;; D A S H B O A R D
-;;======================================================================
-
-;; Main Panel
-(define (main-panel window-id)
-  (iup:dialog
-   #:title "Megatest Control Panel"
-   #:menu (dcommon:main-menu)
-   #:shrink "YES"
-   (let ((tabtop (iup:tabs 
-		  (runs window-id)
-		  (tests window-id)
-		  (runcontrol window-id)
-		  (mtest *toppath* window-id) 
-		  (rconfig window-id)
-		  )))
-     (iup:attribute-set! tabtop "TABTITLE0" "Runs")
-     (iup:attribute-set! tabtop "TABTITLE1" "Tests")
-     (iup:attribute-set! tabtop "TABTITLE2" "Run Control")
-     (iup:attribute-set! tabtop "TABTITLE3" "megatest.config") 
-     (iup:attribute-set! tabtop "TABTITLE4" "runconfigs.config")
-     tabtop)))
-
 (define *current-window-id* 0)
 
 (define (newdashboard dbstruct)
   (let* ((data     (make-hash-table))
 	 (keys     '()) ;; (db:get-keys dbstruct))
@@ -718,11 +140,11 @@
 	 (statuses '())
 	 (nextmintime (current-milliseconds))
 	 (my-window-id *current-window-id*))
     (set! *current-window-id* (+ 1 *current-window-id*))
    ;; (dboard:data-runs-set! *data* data) ;; make this data available to the rest of the application
-    (iup:show (main-panel my-window-id))
+    (iup:show (iup:button "Pushme")) ;; my-window-id))
     ;; Yes, running iup:show will pop up a new panel
     ;; (iup:show (main-panel my-window-id))
     (iup:callback-set! *tim*
 		       "ACTION_CB"
 		       (lambda (x)
@@ -736,7 +158,8 @@
 			       ;; (debug:print 11 *default-log-port* "CHANGE(S): " (car changes) "..."))
                                )
 			     (debug:print-info 11 *default-log-port* "Server overloaded"))))))
 
 ;; (dboard:data-updaters-set! *data* (make-hash-table))
-(newdashboard #f) ;; *dbstruct-local*)    
+;; (newdashboard #f) ;; *dbstruct-local*)
+(iup:show (iup:dialog (iup:vbox (iup:button "Hello world"))))
 (iup:main-loop)

Index: nexttag.rb
==================================================================
--- nexttag.rb
+++ nexttag.rb
@@ -1,7 +1,9 @@
 #!/usr/bin/env ruby
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: ods.scm
==================================================================
--- ods.scm
+++ ods.scm
@@ -206,11 +206,11 @@
 ;;   '( (sheet1 (r1c1 r1c2 r1c3 ...)
 ;;              (r2c1 r2c3 r2c3 ...) )
 ;;      (sheet2 ( ... )
 ;;              ( ... ) ) )
 (define (ods:list->ods path fname data)
-  (if (not (common:file-exists? path))
+  (if (not (file-exists? path))
       (print "ERROR: path to create ods data must pre-exist")
       (begin
 	(with-output-to-file (conc path "/content.xml")
 	  (lambda ()
 	    (ods:construct-dir path)

Index: oldsrc/debugger.scm
==================================================================
--- oldsrc/debugger.scm
+++ oldsrc/debugger.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: portlogger-example.scm
==================================================================
--- portlogger-example.scm
+++ portlogger-example.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: portlogger.scm
==================================================================
--- portlogger.scm
+++ portlogger.scm
@@ -22,17 +22,18 @@
 (use sqlite3 srfi-1 posix srfi-69 hostinfo dot-locking z3)
 (import (prefix sqlite3 sqlite3:))
 
 (declare (unit portlogger))
 (declare (uses db))
+(declare (uses common))
 
 ;; lsof -i
 
 
 (define (portlogger:open-db fname)
   (let* ((avail    (tasks:wait-on-journal fname 5 remove: #t)) ;; wait up to about 10 seconds for the journal to go away
-	 (exists   (common:file-exists? fname))
+	 (exists   (file-exists? fname))
 	 (db       (if avail 
 		       (sqlite3:open-database fname)
 		       (begin
 			 (system (conc "rm -f " fname))
 			 (sqlite3:open-database fname))))
@@ -66,11 +67,11 @@
      (begin
        ;; (release-dot-lock fname)
        (debug:print-error 0 *default-log-port* "portlogger:open-run-close failed. " proc " " params)
        (debug:print 0 *default-log-port* " message: " ((condition-property-accessor 'exn 'message) exn))
        (debug:print 5 *default-log-port* "exn=" (condition->list exn))
-       (if (common:file-exists? fname)(delete-file fname)) ;; brutally get rid of it
+       (if (file-exists? fname)(delete-file fname)) ;; brutally get rid of it
        (print-call-chain (current-error-port)))
      (let* (;; (lock   (obtain-dot-lock fname 2 9 10))
 	    (db     (portlogger:open-db fname))
 	    (res    (apply proc db params)))
        (sqlite3:finalize! db)

Index: process.scm
==================================================================
--- process.scm
+++ process.scm
@@ -22,10 +22,11 @@
 ;; Process convience utils
 ;;======================================================================
 
 (use regex)
 (declare (unit process))
+(declare (uses common))
 
 (define (process:conservative-read port)
   (let loop ((res ""))
     (if (not (eof-object? (peek-char port)))
 	(loop (conc res (read-char port)))
@@ -180,11 +181,11 @@
 
 (define (process:alive? pid)
   (handle-exceptions
    exn
    ;; possibly pid is a process not a child, look in /proc to see if it is running still
-   (common:file-exists? (conc "/proc/" pid))
+   (file-exists? (conc "/proc/" pid))
    (let-values (((rpid exit-type exit-signal)(process-wait pid #t)))
        (and (number? rpid)
 	    (equal? rpid pid)))))
 
 (define (process:alive-on-host? host pid)

Index: records-vs-vectors-vs-coops.scm
==================================================================
--- records-vs-vectors-vs-coops.scm
+++ records-vs-vectors-vs-coops.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: records.sh
==================================================================
--- records.sh
+++ records.sh
@@ -1,7 +1,9 @@
 #! /bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or
@@ -24,10 +26,12 @@
 #
 export MODE='-safe'
 (echo ";; Created by records.sh. DO NOT EDIT THIS FILE. Edit records.sh instead"
 
  echo <<EOF
+ ;;  Copyright 2006-2017, Matthew Welland.
+ ;; 
  ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: rmt.scm
==================================================================
--- rmt.scm
+++ rmt.scm
@@ -21,10 +21,12 @@
 (use format typed-records) ;; RADT => purpose of json format??
 
 (declare (unit rmt))
 (declare (uses api))
 (declare (uses http-transport))
+(declare (uses common))
+
 (include "common_records.scm")
 
 ;;
 ;; THESE ARE ALL CALLED ON THE CLIENT SIDE!!!
 ;;

Index: run-eff.sql
==================================================================
--- run-eff.sql
+++ run-eff.sql
@@ -1,5 +1,7 @@
+--  Copyright 2006-2017, Matthew Welland.
+-- 
 -- This file is part of Megatest.
 -- 
 --     Megatest is free software: you can redistribute it and/or modify
 --     it under the terms of the GNU General Public License as published by
 --     the Free Software Foundation, either version 3 of the License, or

Index: runconfig.scm
==================================================================
--- runconfig.scm
+++ runconfig.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or
@@ -88,11 +90,11 @@
   (let ((runconfigf (conc  *toppath* "/runconfigs.config"))
 	(targ       (or (common:args-get-target)
 			targ-from-db
 			(get-environment-variable "MT_TARGET"))))
     (pop-directory)
-    (if (common:file-exists? runconfigf)
+    (if (file-exists? runconfigf)
 	(setup-env-defaults runconfigf run-id #t keyvals
 			    environ-patt: (conc "(default"
 						(if targ
 						    (conc "|" targ ")")
 						    ")")))

Index: runconfigs.config
==================================================================
--- runconfigs.config
+++ runconfigs.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: runs-launch-loop-test.scm
==================================================================
--- runs-launch-loop-test.scm
+++ runs-launch-loop-test.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: runs.scm
==================================================================
--- runs.scm
+++ runs.scm
@@ -365,11 +365,11 @@
 ;;  test-names: Comma separated patterns same as test-patts but used in selection 
 ;;              of tests to run. The item portions are not respected.
 ;;              FIXME: error out if /patt specified
 ;;            
 (define (runs:run-tests target runname test-patts user flags #!key (run-count 1)) ;; test-names
-  (let* ((keys               (keys:config-get-fields *configdat*))
+  (let* ((keys               (common:get-fields *configdat*))
 	 (keyvals            (keys:target->keyval keys target))
 	 (run-id             (rmt:register-run keyvals runname "new" "n/a" user (args:get-arg "-contour")))  ;;  test-name)))
 	 ;; (deferred          '()) ;; delay running these since they have a waiton clause
 	 (runconfigf         (conc  *toppath* "/runconfigs.config"))
          (dbfile             (conc  *toppath* "/megatest.db"))
@@ -426,11 +426,11 @@
     ;; force the starting of a server -- removed BB 17ww28 - no longer needed.
     ;;(debug:print 0 *default-log-port* "waiting on server...")
     ;;(server:start-and-wait *toppath*)
     
     (runs:set-megatest-env-vars run-id inkeys: keys inrunname: runname) ;; these may be needed by the launching process
-    (set! runconf (if (common:file-exists? runconfigf)
+    (set! runconf (if (file-exists? runconfigf)
 		      (setup-env-defaults runconfigf run-id *already-seen-runconfig-info* keyvals target)
 		      (begin
 			(debug:print 0 *default-log-port* "WARNING: You do not have a run config file: " runconfigf)
 			#f)))
 
@@ -1765,11 +1765,11 @@
 		  (thread-sleep! 1)
 		  (loop)))))
       (if (not testdat) ;; should NOT happen
 	  (debug:print-error 0 *default-log-port* "failed to get test record for test-id " test-id))
       (set! test-id (db:test-get-id testdat))
-      (if (common:file-exists? test-path)
+      (if (file-exists? test-path)
 	  (change-directory test-path)
 	  (begin
 	    (debug:print-error 0 *default-log-port* "test run path not created before attempting to run the test. Perhaps you are running -remove-runs at the same time?")
 	    (change-directory *toppath*)))
       (case (if force ;; (args:get-arg "-force")
@@ -1833,11 +1833,11 @@
 		   (let ((running-tests (rmt:get-tests-for-runs-mindata #f full-test-name '("RUNNING" "REMOTEHOSTSTART" "LAUNCHED") '() #f)))
 		     (if (not (null? running-tests)) ;; have to skip 
 			 (set! skip-test "Skipping due to previous tests running"))))
 		  ((and skip-check
 			(configf:lookup test-conf "skip" "fileexists"))
-		   (if (common:file-exists? (configf:lookup test-conf "skip" "fileexists"))
+		   (if (file-exists? (configf:lookup test-conf "skip" "fileexists"))
 		       (set! skip-test (conc "Skipping due to existance of file " (configf:lookup test-conf "skip" "fileexists")))))
 		  ((and skip-check
 			(configf:lookup test-conf "skip" "rundelay"))
 		   ;; run-ids = #f means *all* runs
 		   (let* ((numseconds      (common:hms-string->seconds (configf:lookup test-conf "skip" "rundelay")))
@@ -2252,11 +2252,11 @@
                                 ;; BB TODO - manage has-subrun case
 				(if (and run-dir (not toplevel-with-children))
 				    (let ((ddir (conc run-dir "/")))
 				      (case (string->symbol (args:get-arg "-archive"))
 					((save save-remove keep-html)
-					 (if (common:file-exists? ddir)
+					 (if (file-exists? ddir)
 					     (debug:print-info 0 *default-log-port* "Estimating disk space usage for " test-fulln ": " (common:get-disk-space-used ddir)))))))
 				(if (not (null? tal))
 				    (loop (car tal)(cdr tal))))
 			       )))
 		       )
@@ -2289,11 +2289,11 @@
     )
   #t)
 
 (define (runs:remove-test-directory test mode) ;; remove-data-only)
   (let* ((run-dir       (db:test-get-rundir test))    ;; run dir is from the link tree
-	 (real-dir      (if (common:file-exists? run-dir)
+	 (real-dir      (if (file-exists? run-dir)
 			    ;; (resolve-pathname run-dir)
 			    (common:nice-path run-dir)
 			    #f))
          (clean-mode    (or mode 'remove-all))
          (test-id       (db:test-get-id test))
@@ -2316,14 +2316,14 @@
       ((remove-all)      (mt:test-set-state-status-by-id (db:test-get-run_id test)(db:test-get-id test) "REMOVING" "LOCKED" #f))
       ((archive-remove)  (mt:test-set-state-status-by-id (db:test-get-run_id test)(db:test-get-id test) "ARCHIVE_REMOVING" #f #f)))
     (debug:print-info 1 *default-log-port* "Attempting to remove " (if real-dir (conc " dir " real-dir " and ") "") " link " run-dir)
     (if (and real-dir 
 	     (> (string-length real-dir) 5)
-	     (common:file-exists? real-dir)) ;; bad heuristic but should prevent /tmp /home etc.
+	     (file-exists? real-dir)) ;; bad heuristic but should prevent /tmp /home etc.
 	(begin ;; let* ((realpath (resolve-pathname run-dir)))
 	  (debug:print-info 1 *default-log-port* "Recursively removing " real-dir)
-	  (if (common:file-exists? real-dir)
+	  (if (file-exists? real-dir)
 	      (runs:safe-delete-test-dir real-dir)
 	      (debug:print 0 *default-log-port* "WARNING: test dir " real-dir " appears to not exist or is not readable")))
 	(if real-dir 
 	    (debug:print 0 *default-log-port* "WARNING: directory " real-dir " does not exist")
 	    (debug:print 0 *default-log-port* "WARNING: no real directory corrosponding to link " run-dir ", nothing done")))
@@ -2381,11 +2381,11 @@
 	    (begin 
 	      (debug:print 0 *default-log-port* "Failed to setup, exiting")
 	      (exit 1)))
 
         
-	(set! keys (keys:config-get-fields *configdat*))
+	(set! keys (common:get-fields *configdat*))
 	;; have enough to process -target or -reqtarg here
 	(if (args:get-arg "-reqtarg")
 	    (let* ((runconfigf (conc  *toppath* "/runconfigs.config")) ;; DO NOT EVALUATE ALL 
 		   (runconfig  (read-config runconfigf #f #t environ-patt: #f)))
 	      (if (hash-table-ref/default runconfig (args:get-arg "-reqtarg") #f)
@@ -2536,11 +2536,11 @@
 (define (runs:clean-cache target runname toppath)
   (if target
       (if runname
 	  (let* ((linktree (common:get-linktree)) ;; (if toppath (configf:lookup *configdat* "setup" "linktree")))
 		 (runtop   (conc linktree "/" target "/" runname))
-		 (files    (if (common:file-exists? runtop)
+		 (files    (if (file-exists? runtop)
 			       (append (glob (conc runtop "/.megatest*"))
 				       (glob (conc runtop "/.runconfig*")))
 			       '())))
 	    (if (null? files)
 		(debug:print-info 0 *default-log-port* "No cached megatest or runconfigs files found. None removed.")

Index: sample-sauth-paths.scm
==================================================================
--- sample-sauth-paths.scm
+++ sample-sauth-paths.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: sauth-common.scm
==================================================================
--- sauth-common.scm
+++ sauth-common.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: sdb.scm
==================================================================
--- sdb.scm
+++ sdb.scm
@@ -27,15 +27,16 @@
 (use sqlite3 srfi-1 posix regex regex-case srfi-69 csv-xml s11n md5 message-digest base64)
 (import (prefix sqlite3 sqlite3:))
 (import (prefix base64 base64:))
 
 (declare (unit sdb))
+(declare (uses common))
 
 ;; 
 (define (sdb:open fname)
   (let* ((dbpath    (pathname-directory fname))
-	 (dbexists  (let ((fe (common:file-exists? fname)))
+	 (dbexists  (let ((fe (file-exists? fname)))
 		      (if fe 
 			  fe
 			  (begin
 			    (create-directory dbpath #t)
 			    #f))))

Index: server.scm
==================================================================
--- server.scm
+++ server.scm
@@ -517,14 +517,14 @@
 		   (should-sync      (and (not *time-to-exit*)
                                           (> (- (current-seconds) *db-last-sync*) min-intersync-delay))) ;; sync every five seconds minimum, deprecated logic, can probably be removed
 		   (start-time       (current-seconds))
                    (cpu-load-adj     (alist-ref 'adj-proc-load (common:get-normalized-cpu-load #f)))
 		   (mt-mod-time      (file-modification-time mtpath))
-		   (last-sync-start  (if (common:file-exists? start-file)
+		   (last-sync-start  (if (file-exists? start-file)
 					 (file-modification-time start-file)
 					 0))
-		   (last-sync-end    (if (common:file-exists? end-file)
+		   (last-sync-end    (if (file-exists? end-file)
 					 (file-modification-time end-file)
 					 10))
                    (sync-period      (+ 3 (* cpu-load-adj 30))) ;; as adjusted load increases increase the sync period
 		   (recently-synced  (and (< (- start-time mt-mod-time) sync-period) ;; not useful if sync didn't modify megatest.db!
 					  (< mt-mod-time last-sync-start)))

Index: show-uncalled-procedures.scm
==================================================================
--- show-uncalled-procedures.scm
+++ show-uncalled-procedures.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

ADDED   src/ftail.scm
Index: src/ftail.scm
==================================================================
--- /dev/null
+++ src/ftail.scm
@@ -0,0 +1,108 @@
+;;======================================================================
+;; Copyright 2017, Matthew Welland.
+;; 
+;; This file is part of Megatest.
+;; 
+;;     Megatest is free software: you can redistribute it and/or modify
+;;     it under the terms of the GNU General Public License as published by
+;;     the Free Software Foundation, either version 3 of the License, or
+;;     (at your option) any later version.
+;; 
+;;     Megatest is distributed in the hope that it will be useful,
+;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
+;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;     GNU General Public License for more details.
+;; 
+;;     You should have received a copy of the GNU General Public License
+;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
+;;======================================================================
+
+(declare (unit ftail))
+
+(module ftail
+    (
+     open-tail-db
+     tail-write
+     tail-get-fid
+     file-tail
+     )
+
+(import scheme chicken data-structures extras)
+(use (prefix sqlite3 sqlite3:) posix typed-records)
+
+(define (open-tail-db )
+  (let* ((basedir   (create-directory (conc "/tmp/" (current-user-name))))
+	 (dbpath    (conc basedir "/megatest_logs.db"))
+	 (dbexists  (file-exists? dbpath))
+	 (db        (sqlite3:open-database dbpath))
+	 (handler   (sqlite3:make-busy-timeout 136000)))
+    (sqlite3:set-busy-handler! db handler)
+    (sqlite3:execute db "PRAGMA synchronous = 0;")
+    (if (not dbexists)
+	(begin
+	  (sqlite3:execute db "CREATE TABLE IF NOT EXISTS log_files (id INTEGER PRIMARY KEY,filename TEXT,event_time TIMESTAMP DEFAULT (strftime('%s','now')));")
+	  (sqlite3:execute db "CREATE TABLE IF NOT EXISTS log_data  (id INTEGER PRIMARY KEY,fid INTEGER,line TEXT,event_time TIMESTAMP DEFAULT (strftime('%s','now')));")
+	  ))
+    db))
+
+(define (tail-write db fid lines)
+  (sqlite3:with-transaction
+   db
+   (lambda ()
+     (for-each
+      (lambda (line)
+	(sqlite3:execute db "INSERT INTO log_data (fid,line) VALUES (?,?);" fid line))
+      lines))))
+
+(define (tail-get-fid db fname)
+  (let ((fid   (handle-exceptions
+		   exn
+		   #f
+		 (sqlite3:first-result db "SELECT id FROM log_files WHERE filename=?;" fname))))
+    (if fid
+	fid
+	(begin
+	  (sqlite3:execute db "INSERT INTO log_files (filename) VALUES (?);" fname)
+	  (tail-get-fid db fname)))))
+
+(define (file-tail fname #!key (db-in #f))
+  (let* ((inp (open-input-file fname))
+	 (db  (or db-in (open-tail-db)))
+	 (fid (tail-get-fid db fname)))
+    (let loop ((inl    (read-line inp))
+	       (lines '())
+	       (lastwr (current-seconds)))
+      (if (eof-object? inl)
+	  (let ((timed-out (> (- (current-seconds) lastwr) 60)))
+	    (if timed-out (tail-write db fid (reverse lines)))
+	    (sleep 1)
+	    (if timed-out
+		(loop (read-line inp) '() (current-seconds))
+		(loop (read-line inp) lines lastwr)))
+	  (let* ((savelines (> (length lines) 19)))
+	    ;; (print inl)
+	    (if savelines (tail-write db fid (reverse lines)))
+	    (loop (read-line inp)
+		  (if savelines
+		      '()
+		      (cons inl lines))
+		  (if savelines
+		      (current-seconds)
+		      lastwr)))))))
+
+;; offset -20 means get last 20 lines
+;;
+(define (tail-get-lines db fid offset count)
+  (if (> offset 0)
+      (sqlite3:map-row (lambda (id line)
+		 (vector id line))
+	       db
+	       "SELECT id,line FROM log_data WHERE fid=? OFFSET ? LIMIT ?;" fid offset count)
+      (reverse ;; get N from the end
+       (sqlite3:map-row (lambda (id line)
+		  (vector id line))
+		db
+		"SELECT id,line FROM log_data WHERE fid=? ORDER BY id DESC LIMIT ?;" fid (abs offset)))))
+
+)

ADDED   src/mtcommon.scm
Index: src/mtcommon.scm
==================================================================
--- /dev/null
+++ src/mtcommon.scm
@@ -0,0 +1,289 @@
+;======================================================================
+;; Copyright 2006-2016, Matthew Welland.
+;; 
+;; This file is part of Megatest.
+;; 
+;;     Megatest is free software: you can redistribute it and/or modify
+;;     it under the terms of the GNU General Public License as published by
+;;     the Free Software Foundation, either version 3 of the License, or
+;;     (at your option) any later version.
+;; 
+;;     Megatest is distributed in the hope that it will be useful,
+;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
+;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;     GNU General Public License for more details.
+;; 
+;;     You should have received a copy of the GNU General Public License
+;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+;;
+;;======================================================================
+
+;; NOTE: This is the db module, long term it will replace db.scm.
+;; WARN: This module conflicts with db.scm as it uses sql-de-lite
+
+(declare (unit mtcommon))
+
+(module mtcommon
+        (
+         get-create-writeable-dir
+         print-error
+         print-info
+         log-event
+         debug-setup
+         debug-mode
+         check-verbosity
+         calc-verbosity
+         )
+
+(import scheme chicken data-structures extras posix ports)
+(use (prefix sql-de-lite sql:) posix typed-records format srfi-1 srfi-69)
+
+(defstruct ctrldat
+  (port      (current-error-port))
+  (verbosity 1)
+  (vcache    (make-hash-table))
+  (logging   #f) ;; keep the flag and the db handle separate to enable overriding
+  (logdb     #f) ;; might need to make this a stack of handles for threaded access
+  (toppath   #f) ;; 
+  )
+
+(define *log* (make-ctrldat))
+
+;; this was cached based on results from profiling but it turned out the profiling
+;; somehow went wrong - perhaps too many processes writing to it. Leaving the caching
+;; in for now but can probably take it out later.
+;;
+(define (calc-verbosity vstr args)
+  (or (hash-table-ref/default (ctrldat-vcache *log*) vstr #f)
+      (let ((res (cond
+                  ((number? vstr) vstr)
+                  ((not (string?  vstr))   1)
+                  ;; ((string-match  "^\\s*$" vstr) 1)
+                  (vstr           (let ((debugvals  (filter number? (map string->number (string-split vstr ",")))))
+                                    (cond
+                                     ((> (length debugvals) 1) debugvals)
+                                     ((> (length debugvals) 0)(car debugvals))
+                                     (else 1))))
+                  ((hash-table-exists? args "-v")   2)
+                  ((hash-table-exists? args "-q")    0)
+                  (else                   1))))
+        (hash-table-set! (ctrldat-vcache *log*) vstr res)
+        res)))
+
+;; check verbosity, #t is ok
+(define (check-verbosity verbosity vstr)
+  (if (not (or (number? verbosity)
+	       (list?   verbosity)))
+      (begin
+	(print "ERROR: Invalid debug value \"" vstr "\"")
+	#f)
+      #t))
+
+(define (debug-mode n)
+  (let* ((verbosity (ctrldat-verbosity *log*)))
+    (cond
+     ((and (number? verbosity)   ;; number number
+           (number? n))
+      (<= n verbosity))
+     ((and (list? verbosity)     ;; list   number
+           (number? n))
+      (member n verbosity))
+     ((and (list? verbosity)     ;; list   list
+           (list? n))
+      (not (null? (lset-intersection! eq? verbosity n))))
+     ((and (number? verbosity)
+           (list? n))
+      (member verbosity n)))))
+
+(define (debug-setup args)
+  (let* ((debugstr  (or (hash-table-ref/default args "-debug" #f)
+                        (get-environment-variable "MT_DEBUG_MODE")))
+         (verbosity (calc-verbosity debugstr args)))
+    ;; if we were handed a bad verbosity rule then we will override it with 1 and continue
+    (if (not (check-verbosity verbosity debugstr))
+        (set! verbosity 1))
+    (ctrldat-verbosity-set! *log* verbosity)
+    (if (or (hash-table-exists? args "-debug")
+	    (not (get-environment-variable "MT_DEBUG_MODE")))
+	(setenv "MT_DEBUG_MODE" (if (list? verbosity)
+				    (string-intersperse (map conc verbosity) ",")
+				    (conc verbosity))))))
+  
+(define (debug-print n e . params)
+  (if (debug-mode n)
+      (with-output-to-port (or e (current-error-port))
+	(lambda ()
+	  (if (ctrldat-logging *log*)
+	      (log-event (apply conc params))
+	      (apply print params)
+	      )))))
+
+;; ;; Brandon's debug printer shortcut (indulge me :)
+;; (define *BB-process-starttime* (current-milliseconds))
+;; (define (BB> . in-args)
+;;   (let* ((stack (get-call-chain))
+;;          (location "??"))
+;;     (for-each
+;;      (lambda (frame)
+;;        (let* ((this-loc (vector-ref frame 0))
+;;               (temp     (string-split (->string this-loc) " "))
+;;               (this-func (if (and (list? temp) (> (length temp) 1)) (cadr temp) "???")))
+;;          (if (equal? this-func "BB>")
+;;              (set! location this-loc))))
+;;      stack)
+;;     (let* ((color-on "\x1b[1m")
+;;            (color-off "\x1b[0m")
+;;            (dp-args
+;;             (append
+;;              (list 0 *default-log-port*
+;;                    (conc color-on location "@"(/ (- (current-milliseconds) *BB-process-starttime*) 1000) color-off "   ")  )
+;;              in-args)))
+;;       (apply debug:print dp-args))))
+;; 
+;; (define *BBpp_custom_expanders_list* (make-hash-table))
+;; 
+;; 
+;; 
+;; ;; register hash tables with BBpp.
+;; (hash-table-set! *BBpp_custom_expanders_list* HASH_TABLE:
+;;                  (cons hash-table? hash-table->alist))
+;; 
+;; ;; test name converter
+;; (define (BBpp_custom_converter arg)
+;;   (let ((res #f))
+;;     (for-each
+;;      (lambda (custom-type-name)
+;;        (let* ((custom-type-info      (hash-table-ref *BBpp_custom_expanders_list* custom-type-name))
+;;               (custom-type-test      (car custom-type-info))
+;;               (custom-type-converter (cdr custom-type-info)))
+;;          (when (and (not res) (custom-type-test arg))
+;;            (set! res (custom-type-converter arg)))))
+;;      (hash-table-keys *BBpp_custom_expanders_list*))
+;;     (if res (BBpp_ res) arg)))
+;; 
+;; (define (BBpp_ arg)
+;;   (cond
+;;    ;;((SOMESTRUCT? arg) (cons SOMESTRUCT: (SOMESTRUCT->alist arg)))
+;;    ;;((dboard:tabdat? arg) (cons dboard:tabdat: (dboard:tabdat->alist arg)))
+;;    ((hash-table? arg)
+;;     (let ((al (hash-table->alist arg)))
+;;       (BBpp_ (cons HASH_TABLE: al))))
+;;    ((null? arg) '())
+;;    ;;((list? arg) (cons (BBpp_ (car arg)) (BBpp_ (cdr arg))))
+;;    ((pair? arg) (cons (BBpp_ (car arg)) (BBpp_ (cdr arg))))
+;;    (else (BBpp_custom_converter arg))))
+;; 
+;; ;; Brandon's pretty printer.  It expands hashes and custom types in addition to regular pp
+;; (define (BBpp arg)
+;;   (pp (BBpp_ arg)))
+;; 
+;; ;(use define-macro)
+;; (define-syntax inspect
+;;   (syntax-rules ()
+;;     [(_ x)
+;;     ;; (with-output-to-port (current-error-port)
+;;        (printf "~a is: ~a\n" 'x (with-output-to-string (lambda () (BBpp x))))
+;;      ;;  )
+;;      ]
+;;     [(_ x y ...) (begin (inspect x) (inspect y ...))]))
+
+(define (print-error n e . params)
+  ;; normal print
+  (if (debug-mode n)
+      (with-output-to-port (if (port? e) e (current-error-port))
+	(lambda ()
+	  (if (ctrldat-logging *log*)
+	      (log-event (apply conc params))
+	      ;; (apply print "pid:" (current-process-id) " " params)
+	      (apply print "ERROR: " params)
+	      ))))
+  ;; pass important messages to stderr
+  (if (and (eq? n 0)(not (eq? e (current-error-port)))) 
+      (with-output-to-port (current-error-port)
+	(lambda ()
+	  (apply print "ERROR: " params)
+	  ))))
+
+(define (print-info n e . params)
+  (if (debug-mode n)
+      (with-output-to-port (if (port? e) e (current-error-port))
+	(lambda ()
+	  (if (ctrldat-logging *log*)
+	      (let ((res (format#format #f "INFO: (~a) ~a" n (apply conc params))))
+		(log-event res))
+	      (apply print "INFO: (" n ") " params) ;; res)
+	      )))))
+
+;; if a value is printable (i.e. string or number) return the value
+;; else return an empty string
+(define-inline (printable val)
+  (if (or (number? val)(string? val)) val ""))
+
+;;======================================================================
+;; L O G G I N G    D B 
+;;======================================================================
+
+(define (open-logging-db toppath)
+  (let* ((dbpath    (conc (if toppath (conc toppath "/") "") "logging.db")) ;; fname)
+	 (dbexists  (file-exists? dbpath))
+	 (db        (sql:open-database dbpath))
+	 (handler   (sql:busy-timeout 136000))) ;; remove argument to override
+    (sql:set-busy-handler! db handler)
+    (if (not dbexists)
+        (sql:exec (sql:sql db "CREATE TABLE IF NOT EXISTS log (id INTEGER PRIMARY KEY,event_time TIMESTAMP DEFAULT (strftime('%s','now')),logline TEXT,pwd TEXT,cmdline TEXT,pid INTEGER);")))
+    (sql:exec (sql:sql db "PRAGMA synchronous = 0;"))
+    db))
+
+(define (log-local-event toppath . loglst)
+  (let ((logline (apply conc loglst)))
+    (log-event logline)))
+
+(define (log-event toppath logline)
+  (let ((db (open-logging-db toppath)))
+    (sql:exec
+     (sql:sql db "INSERT INTO log (logline,pwd,cmdline,pid) VALUES (?,?,?,?);")
+     logline
+     (current-directory)
+     (string-intersperse (argv) " ")
+     (current-process-id))
+    logline))
+
+;;======================================================================
+;; paths and directories
+;;======================================================================
+
+;; return first path that can be created or already exists and is writable
+;;
+(define (get-create-writeable-dir dirs)
+  (if (null? dirs)
+      #f
+      (let loop ((hed (car dirs))
+		 (tal (cdr dirs)))
+	(let ((res (or (and (directory? hed)
+			    (file-write-access? hed)
+			    hed)
+		       (handle-exceptions
+			   exn
+			   (begin
+			     ;; (debug:print-info 0 *default-log-port* "could not create " hed ", this might cause problems down the road.")
+                             (print "INFO: could not create " hed ", this might cause problems down the road.")
+			     #f)
+			(create-directory hed #t)))))
+	  (if (and (string? res)
+		   (directory? res))
+	      res
+	      (if (null? tal)
+		  #f
+		  (loop (car tal)(cdr tal))))))))
+
+(define old-file-exists? file-exists?)
+
+(define (file-exists? path-string)
+  ;; this avoids stack dumps. NOTE: The issues that triggered this approach might have been fixed TODO: test and remove if possible
+  ;;;; TODO: catch permission denied exceptions and emit appropriate warnings, eg:  system error while trying to access file: "/nfs/pdx/disks/icf_env_disk001/bjbarcla/gwa/issues/mtdev/randy-slow/reproduce/q...
+  (handle-exceptions
+   exn
+   #f
+   (old-file-exists? path-string)))
+
+)

ADDED   src/mtconfigf.scm
Index: src/mtconfigf.scm
==================================================================
--- /dev/null
+++ src/mtconfigf.scm
@@ -0,0 +1,975 @@
+;======================================================================
+;; Copyright 2006-2016, Matthew Welland.
+;; 
+;; This file is part of Megatest.
+;; 
+;;     Megatest is free software: you can redistribute it and/or modify
+;;     it under the terms of the GNU General Public License as published by
+;;     the Free Software Foundation, either version 3 of the License, or
+;;     (at your option) any later version.
+;; 
+;;     Megatest is distributed in the hope that it will be useful,
+;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
+;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;     GNU General Public License for more details.
+;; 
+;;     You should have received a copy of the GNU General Public License
+;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+;;
+;;======================================================================
+
+;; NOTE: This is the configf module, long term it will replace configf.scm.
+
+(declare (unit mtconfigf))
+
+(module mtconfigf
+        (
+
+         )
+
+(import scheme chicken data-structures extras ports files)
+(use posix typed-records srfi-18)
+(use regex regex-case srfi-69 srfi-1 directory-utils extras srfi-13)
+(import posix)
+
+;; very wierd, the reference to pathname-directory here fixes a reference to possibly unbound identifier problem
+;;
+;; (define (dummy-function path)
+;;   (pathname-directory path)
+;;   (absolute-pathname? path)
+;;   (normalize-pathname path))
+
+(define debug:print-error print)
+(define debug:print       print)
+(define debug:print-info  print)
+(define *default-log-port* (current-error-port))
+
+(define (set-debug-printers normal-fn info-fn error-fn default-port)
+  (if error-fn  (set! debug:print-error error-fn))
+  (if info-fn   (set! debug:print-info  info-fn))
+  (if normal-fn (set! debug:print       normal-fn))
+  (if default-port (set! *default-log-port* default-port)))
+  
+;; if it looks like a number -> convert it to a number, else return it
+;;
+(define (lazy-convert inval)
+  (let* ((as-num (if (string? inval)(string->number inval) #f)))
+    (or as-num inval)))
+
+;; Moved to common
+;;
+;;;; return list (path fullpath configname)
+;;(define (find-config configname #!key (toppath #f))
+;;  (if toppath
+;;      (let ((cfname (conc toppath "/" configname)))
+;;	(if (common:file-exists? cfname)
+;;	    (list toppath cfname configname)
+;;	    (list #f      #f     #f)))
+;;      (let* ((cwd (string-split (current-directory) "/")))
+;;	(let loop ((dir cwd))
+;;	  (let* ((path     (conc "/" (string-intersperse dir "/")))
+;;		 (fullpath (conc path "/" configname)))
+;;	    (if (common:file-exists? fullpath)
+;;		(list path fullpath configname)
+;;		(let ((remcwd (take dir (- (length dir) 1))))
+;;		  (if (null? remcwd)
+;;		      (list #f #f #f) ;;  #f #f) 
+;;		  (loop remcwd)))))))))
+
+(define (assoc-safe-add alist key val #!key (metadata #f))
+  (let ((newalist (filter (lambda (x)(not (equal? key (car x)))) alist)))
+    (append newalist (list (if metadata
+			       (list key val metadata)
+			       (list key val))))))
+
+(define (section-var-set! cfgdat section-name var value #!key (metadata #f))
+  (hash-table-set! cfgdat section-name
+		   (assoc-safe-add
+		    (hash-table-ref/default cfgdat section-name '())
+		    var value metadata: metadata)))
+;;======================================================================
+;; Environment handling stuff
+;;======================================================================
+
+(define (safe-file-exists? path)
+  (handle-exceptions exn #f (file-exists? path)))
+
+(define (read-link-f path)
+  (handle-exceptions
+      exn
+      (begin
+	(debug:print-error 0 *default-log-port* "command \"/bin/readlink -f " path "\" failed.")
+	path) ;; just give up
+    (with-input-from-pipe
+	(conc "/bin/readlink -f " path)
+      (lambda ()
+	(read-line)))))
+
+;; return a nice clean pathname made absolute
+(define (nice-path dir)
+  (let ((match (string-match "^(~[^\\/]*)(\\/.*|)$" dir)))
+    (if match ;; using ~ for home?
+	(nice-path (conc (read-link-f (cadr match)) "/" (caddr match)))
+	(normalize-pathname (if (absolute-pathname? dir)
+				dir
+				(conc (current-directory) "/" dir))))))
+
+(define (eval-string-in-environment str)
+  (handle-exceptions
+   exn
+   (begin
+     (debug:print-error 0 *default-log-port* "problem evaluating \"" str "\" in the shell environment")
+     #f)
+   (let ((cmdres (cmd-run->list (conc "echo " str))))
+     (if (null? cmdres) ""
+	 (caar cmdres)))))
+
+(define (safe-setenv key val)
+  (if (substring-index ":" key) ;; variables containing : are for internal use and cannot be environment variables.
+      (debug:print-error 4 *default-log-port* "skip setting internal use only variables containing \":\"")
+      (if (and (string? val)
+	       (string? key))
+	  (handle-exceptions
+	      exn
+	      (debug:print-error 0 *default-log-port* "bad value for setenv, key=" key ", value=" val)
+	    (setenv key val))
+	  (debug:print-error 0 *default-log-port* "bad value for setenv, key=" key ", value=" val))))
+
+;; accept an alist or hash table containing envvar/env value pairs (value of #f causes unset) 
+;;   execute thunk in context of environment modified as per this list
+;;   restore env to prior state then return value of eval'd thunk.
+;;   ** this is not thread safe **
+(define (with-env-vars delta-env-alist-or-hash-table thunk)
+  (let* ((delta-env-alist (if (hash-table? delta-env-alist-or-hash-table)
+                              (hash-table->alist delta-env-alist-or-hash-table)
+                              delta-env-alist-or-hash-table))
+         (restore-thunks
+          (filter
+           identity
+           (map (lambda (env-pair)
+                  (let* ((env-var     (car env-pair))
+                         (new-val     (let ((tmp (cdr env-pair)))
+                                        (if (list? tmp) (car tmp) tmp)))
+                         (current-val (get-environment-variable env-var))
+                         (restore-thunk
+                          (cond
+                           ((not current-val) (lambda () (unsetenv env-var)))
+                           ((not (string? new-val)) #f)
+                           ((eq? current-val new-val) #f)
+                           (else 
+                            (lambda () (setenv env-var current-val))))))
+                    ;;(when (not (string? new-val))
+                    ;;    (debug:print 0 *default-log-port* " PROBLEM: not a string: "new-val"\n from env-alist:\n"delta-env-alist)
+                    ;;    (pp delta-env-alist)
+                    ;;    (exit 1))
+                        
+                    
+                    (cond
+                     ((not new-val)  ;; modify env here
+                      (unsetenv env-var))
+                     ((string? new-val)
+                      (setenv env-var new-val)))
+                    restore-thunk))
+                delta-env-alist))))
+    (let ((rv (thunk)))
+      (for-each (lambda (x) (x)) restore-thunks) ;; restore env to original state
+      rv)))
+
+(define (cmd-run->list cmd #!key (delta-env-alist-or-hash-table '()))
+  (with-env-vars
+   delta-env-alist-or-hash-table
+   (lambda ()
+     (let* ((fh (open-input-pipe cmd))
+            (res (port->list fh))
+            (status (close-input-pipe fh)))
+       (list res status)))))
+   
+(define (port->list fh)
+  (if (eof-object? fh) #f
+      (let loop ((curr (read-line fh))
+                 (result '()))
+        (if (not (eof-object? curr))
+            (loop (read-line fh)
+                  (append result (list curr)))
+            result))))
+
+;;======================================================================
+;; Make the regexp's needed globally available
+;;======================================================================
+
+(define configf:include-rx (regexp "^\\[include\\s+(.*)\\]\\s*$"))
+(define configf:script-rx  (regexp "^\\[scriptinc\\s+(\\S+)([^\\]]*)\\]\\s*$")) ;; include output from a script
+(define configf:section-rx (regexp "^\\[(.*)\\]\\s*$"))
+(define configf:blank-l-rx (regexp "^\\s*$"))
+(define configf:key-sys-pr (regexp "^(\\S+)\\s+\\[system\\s+(\\S+.*)\\]\\s*$"))
+(define configf:key-val-pr (regexp "^(\\S+)(\\s+(.*)|())$"))
+(define configf:key-no-val (regexp "^(\\S+)(\\s*)$"))
+(define configf:comment-rx (regexp "^\\s*#.*"))
+(define configf:cont-ln-rx (regexp "^(\\s+)(\\S+.*)$"))
+(define configf:settings   (regexp "^\\[configf:settings\\s+(\\S+)\\s+(\\S+)]\\s*$"))
+
+;; read a line and process any #{ ... } constructs
+
+(define configf:var-expand-regex (regexp "^(.*)#\\{(scheme|system|shell|getenv|get|runconfigs-get|rget|scm|sh|rp|gv|g|mtrah)\\s+([^\\}\\{]*)\\}(.*)"))
+
+(define (configf:system ht cmd)
+  (system cmd)
+  )
+
+(define (process-line l ht allow-system #!key (linenum #f))
+  (let loop ((res l))
+    (if (string? res)
+	(let ((matchdat (string-search configf:var-expand-regex res)))
+	  (if matchdat
+	      (let* ((prestr  (list-ref matchdat 1))
+		     (cmdtype (list-ref matchdat 2)) ;; eval, system, shell, getenv
+		     (cmd     (list-ref matchdat 3))
+		     (poststr (list-ref matchdat 4))
+		     (result  #f)
+		     (start-time (current-seconds))
+		     (cmdsym  (string->symbol cmdtype))
+		     (fullcmd (case cmdsym
+				((scheme scm) (conc "(lambda (ht)" cmd ")"))
+				((system)     (conc "(lambda (ht)(configf:system ht \"" cmd "\"))"))
+				((shell sh)   (conc "(lambda (ht)(string-translate (shell \""  cmd "\") \"\n\" \" \"))"))
+				((realpath rp)(conc "(lambda (ht)(nice-path \"" cmd "\"))"))
+				((getenv gv)  (conc "(lambda (ht)(get-environment-variable \"" cmd "\"))"))
+				((mtrah)      (conc "(lambda (ht)"
+                                                    "    (let ((extra \"" cmd "\"))"
+						    "       (conc (or *toppath* (get-environment-variable \"MT_RUN_AREA_HOME\"))"
+						    "             (if (string-null? extra) \"\" \"/\")"
+						    "             extra)))"))
+				((get g)   
+				 (let* ((parts (string-split cmd))
+					(sect  (car parts))
+					(var   (cadr parts)))
+				   (conc "(lambda (ht)(lookup ht \"" sect "\" \"" var "\"))")))
+				((runconfigs-get rget) (conc "(lambda (ht)(runconfigs-get ht \"" cmd "\"))"))
+				;; ((rget)           (conc "(lambda (ht)(runconfigs-get ht \"" cmd "\"))"))
+				(else "(lambda (ht)(print \"ERROR\") \"ERROR\")"))))
+		;; (print "fullcmd=" fullcmd)
+		(handle-exceptions
+		 exn
+		 (begin
+		   (debug:print 0 *default-log-port* "WARNING: failed to process config input \"" l "\"")
+		   (debug:print 0 *default-log-port* " message: " ((condition-property-accessor 'exn 'message) exn))
+		   ;; (print "exn=" (condition->list exn))
+		   (set! result (conc "#{( " cmdtype ") " cmd "}, full expansion: " fullcmd)))
+		 (if (or allow-system
+			 (not (member cmdtype '("system" "shell" "sh"))))
+		     (with-input-from-string fullcmd
+		       (lambda ()
+			 (set! result ((eval (read)) ht))))
+		     (set! result (conc "#{(" cmdtype ") "  cmd "}"))))
+		(case cmdsym
+		  ((system shell scheme)
+		   (let ((delta (- (current-seconds) start-time)))
+		     (if (> delta 2)
+			 (debug:print-info 0 *default-log-port* "for line \"" l "\"\n command:  " cmd " took " delta " seconds to run with output:\n   " result)
+			 (debug:print-info 9 *default-log-port* "for line \"" l "\"\n command:  " cmd " took " delta " seconds to run with output:\n   " result)))))
+		(loop (conc prestr result poststr)))
+	      res))
+	res)))
+
+;; Run a shell command and return the output as a string
+(define (shell cmd)
+  (let* ((output (cmd-run->list cmd))
+	 (res    (car output))
+	 (status (cadr output)))
+    (if (equal? status 0)
+	(let ((outres (string-intersperse 
+		       res
+		       "\n")))
+	  (debug:print-info 4 *default-log-port* "shell result:\n" outres)
+	  outres)
+	(begin
+	  (with-output-to-port (current-error-port)
+	    (lambda ()
+	      (print "ERROR: " cmd " returned bad exit code " status)))
+	  ""))))
+
+;; this was inline but I'm pretty sure that is a hold over from when it was *very* simple ...
+;;
+(define (configf:read-line p ht allow-processing settings)
+  (let loop ((inl (read-line p)))
+    (let ((cont-line (and (string? inl)
+			  (not (string-null? inl))
+			  (equal? "\\" (string-take-right inl 1)))))
+      (if cont-line ;; last character is \ 
+	  (let ((nextl (read-line p)))
+	    (if (not (eof-object? nextl))
+		(loop (string-append (if cont-line 
+					 (string-take inl (- (string-length inl) 1))
+					 inl)
+				     nextl))))
+	  (let ((res (case allow-processing ;; if (and allow-processing 
+		       ;;	   (not (eq? allow-processing 'return-string)))
+		       ((#t #f)
+			(process-line inl ht allow-processing))
+		       ((return-string)
+			inl)
+		       (else
+			(process-line inl ht allow-processing)))))
+	    (if (and (string? res)
+		     (not (equal? (hash-table-ref/default settings "trim-trailing-spaces" "no") "no")))
+		(string-substitute "\\s+$" "" res)
+		res))))))
+
+(define (cfgdat->env-alist section cfgdat-ht allow-system)
+  (filter
+   (lambda (pair)
+     (let* ((var (car pair))
+            (val (cdr pair)))
+       (cons var
+             (cond
+              ((and allow-system (procedure? val)) ;; if we decided to use something other than #t or #f for allow-system ('return-procs or 'return-string) , this may become problematic
+               (val))
+              ((procedure? val) #f)
+              ((string? val) val)
+              (else "#f")))))
+   (append
+    (hash-table-ref/default cfgdat-ht "default" '())
+    (if (equal? section "default") '() (hash-table-ref/default cfgdat-ht section '())))))
+
+(define (calc-allow-system allow-system section sections)
+  (if sections
+      (and (or (equal? "default" section)
+	       (member section sections))
+	   allow-system) ;; account for sections and return allow-system as it might be a symbol such as return-strings
+      allow-system))
+    
+;; given a config hash and a section name, apply that section to all matching sections (using wildcard % or regex if /..../)
+;; remove the section when done so that there is no downstream clobbering
+;;
+(define (apply-wildcards ht section-name)
+  (if (hash-table-exists? ht section-name)
+      (let* ((vars  (hash-table-ref ht section-name))
+	     (rxstr (if (string-contains section-name "%")
+			(string-substitute (regexp "%") ".*" section-name)
+			(string-substitute (regexp "^/(.*)/$") "\\1" section-name)))
+	     (rx    (regexp rxstr)))
+	;; (print "\nsection-name: " section-name " rxstr: " rxstr)
+        (for-each
+         (lambda (section)
+	   (if section
+	       (let ((same-section (string=? section-name section))
+		     (rx-match     (string-match rx section)))
+		 ;; (print "section: " section " vars: " vars " same-section: " same-section " rx-match: " rx-match)
+		 (if (and (not same-section) rx-match)
+		     (for-each
+		      (lambda (bundle)
+			;; (print "bundle: " bundle)
+			(let ((key  (car bundle))
+			      (val  (cadr bundle))
+			      (meta (if (> (length bundle) 2)(caddr bundle) #f)))
+			  (hash-table-set! ht section (assoc-safe-add (hash-table-ref ht section) key val metadata: meta))))
+		      vars)))))
+         (hash-table-keys ht))))
+  ht)
+
+;;======================================================================
+;; Extended config lines, allows storing more hierarchial data in the config lines
+;;   ABC a=1; b=hello world; c=a
+;;
+;; NOTE: implementation is quite limited. You currently cannot have
+;;       semicolons in your string values.
+;;======================================================================
+
+;; convert string a=1; b=2; c=a silly thing; d=
+;; to '((a . 1)(b . 2)(c . "a silly thing")(d . ""))
+;;
+(define (val->alist val #!key (convert #f))
+  (let ((val-list (string-split-fields ";\\s*" val #:infix)))
+    (if val-list
+	(map (lambda (x)
+	       (let ((f (string-split-fields "\\s*=\\s*" x #:infix)))
+		 (case (length f)
+		   ((0) `(,#f))  ;; null string case
+		   ((1) `(,(string->symbol (car f))))
+		   ((2) `(,(string->symbol (car f)) . ,(let ((inval (cadr f)))
+							 (if convert (lazy-convert inval) inval))))
+		   (else f))))
+	     val-list)
+	'())))
+
+;; I don't want configf to turn into a weak yaml format but this extention is really useful
+;;
+(define (section->val-alist cfgdat section-name #!key (convert #f))
+  (let ((section (get-section cfgdat section-name)))
+    (map (lambda (item)
+           (let ((key (car item))
+                 (val (cadr item))) ;; BUG IN WAIT. sections are not returned as proper alists, should fix this.
+             (cons key (val->alist val convert: convert))))
+         section)))
+  
+;; read a config file, returns hash table of alists
+
+;; read a config file, returns hash table of alists
+;; adds to ht if given (must be #f otherwise)
+;; allow-system:
+;;    #f - do not evaluate [system
+;;    #t - immediately evaluate [system and store result as string
+;;    'return-procs -- return a proc taking ht as an argument that may be evaulated at some future time
+;;    'return-string -- return a string representing a proc taking ht as an argument that may be evaulated at some future time
+;; envion-patt is a regex spec that identifies sections that will be eval'd
+;; in the environment on the fly
+;; sections: #f => get all, else list of sections to gather
+;; post-section-procs alist of section-pattern => proc, where: (proc section-name next-section-name ht curr-path)
+;; apply-wildcards: #t/#f - apply vars from targets with % wildcards to all matching sections
+;;
+;; NOTE: apply-wild variable is intentional (but a better name would be good)
+;;
+(define (read-config path ht allow-system #!key (environ-patt #f)            (curr-section #f)   
+		     (sections #f)              (settings (make-hash-table)) (keep-filenames #f)
+		     (post-section-procs '())   (apply-wild #t) )
+  (debug:print 9 *default-log-port* "START: " path)
+;; (if *configdat*
+;;     (common:save-pkt `((action . read-config)
+;;       		 (f      . ,(cond ((string? path) path)
+;;       				  ((port?   path) "port")
+;;       				  (else (conc path))))
+;;                        (T      . configf))
+;;       	       *configdat* #t add-only: #t))
+  (if (and (not (port? path))
+	   (not (safe-file-exists? path))) ;; for case where we are handed a port
+      (begin 
+	(debug:print-info 1 *default-log-port* "read-config - file not found " path " current path: " (current-directory))
+	;; WARNING: This is a risky change but really, we should not return an empty hash table if no file read?
+	#f) ;; (if (not ht)(make-hash-table) ht))
+      (let ((inp        (if (string? path)
+			    (open-input-file path)
+			      path)) ;; we can be handed a port
+	    (res        (if (not ht)(make-hash-table) ht))
+	    (metapath   (if keep-filenames
+			    path #f))
+            (process-wildcards  (lambda (res curr-section-name)
+                                  (if (and apply-wild
+                                           (or (string-contains curr-section-name "%")   ;; wildcard
+                                               (string-match "/.*/" curr-section-name))) ;; regex
+                                      (begin
+                                        (apply-wildcards res curr-section-name)
+                                        (hash-table-delete! res curr-section-name))))))  ;; NOTE: if the section is a wild card it will be REMOVED from res 
+	(let loop ((inl               (configf:read-line inp res (calc-allow-system allow-system curr-section sections) settings)) ;; (read-line inp))
+		   (curr-section-name (if curr-section curr-section "default"))
+		   (var-flag #f);; turn on for key-var-pr and cont-ln-rx, turn off elsewhere
+		   (lead     #f))
+	  (debug:print-info 8 *default-log-port* "curr-section-name: " curr-section-name " var-flag: " var-flag "\n   inl: \"" inl "\"")
+	  (if (eof-object? inl) 
+	      (begin
+                ;; process last section for wildcards
+                (process-wildcards res curr-section-name)
+		(if (string? path) ;; we received a path, not a port, thus we are responsible for closing it.
+		    (close-input-port inp))
+		(if (list? sections) ;; delete all sections except given when sections is provided
+		    (for-each
+		     (lambda (section)
+		       (if (not (member section sections))
+			   (hash-table-delete! res section))) ;; we are using "" as a dumping ground and must remove it before returning the ht
+		     (hash-table-keys res)))
+		(debug:print 9 *default-log-port* "END: " path)
+                res
+                ) ;; retval
+	      (regex-case 
+	       inl 
+	       (configf:comment-rx _                  (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings)
+                                                            curr-section-name #f #f))
+               
+	       (configf:blank-l-rx _                  (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings)
+                                                            curr-section-name #f #f))
+	       (configf:settings   ( x setting val  )
+                                   (begin
+                                     (hash-table-set! settings setting val)
+                                     (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings)
+                                           curr-section-name #f #f)))
+               
+	       (configf:include-rx ( x include-file )
+                                   (let* ((curr-conf-dir (pathname-directory path))
+                                          (full-conf     (if (absolute-pathname? include-file)
+                                                             include-file
+                                                             (nice-path 
+                                                              (conc (if curr-conf-dir
+                                                                        curr-conf-dir
+                                                                        ".")
+                                                                    "/" include-file)))))
+                                     (if (safe-file-exists? full-conf)
+                                         (begin
+                                           ;; (push-directory conf-dir)
+                                           (debug:print 9 *default-log-port* "Including: " full-conf)
+                                           (read-config full-conf res allow-system environ-patt: environ-patt
+                                                        curr-section: curr-section-name sections: sections settings: settings
+                                                        keep-filenames: keep-filenames)
+                                           ;; (pop-directory)
+                                           (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings) curr-section-name #f #f))
+                                         (begin
+                                           (debug:print '(2 9) #f "INFO: include file " include-file " not found (called from " path ")")
+                                           (debug:print 2 *default-log-port* "        " full-conf)
+							      (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings)
+                                                                    curr-section-name #f #f)))))
+	       (configf:script-rx ( x include-script params);; handle-exceptions
+                                  ;;    exn
+                                  ;;    (begin
+                                  ;;      (debug:print '(0 2 9) #f "INFO: include from script " include-script " failed.")
+                                  ;;      (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings) curr-section-name #f #f))
+                                  (if (and (safe-file-exists? include-script)(file-execute-access? include-script))
+                                      (let* ((local-allow-system  (calc-allow-system allow-system curr-section-name sections))
+                                             (env-delta  (cfgdat->env-alist curr-section-name res local-allow-system))
+                                             (new-inp-port
+                                              (with-env-vars
+                                               env-delta
+                                               (lambda ()
+                                                 (open-input-pipe (conc include-script " " params))))))
+                                        (debug:print '(2 9) *default-log-port* "Including from script output: " include-script)
+                                        ;;  (print "We got here, calling read-config next. Port is: " new-inp-port)
+                                        (read-config new-inp-port res allow-system environ-patt: environ-patt curr-section: curr-section-name sections: sections settings: settings keep-filenames: keep-filenames)
+                                        (close-input-port new-inp-port)
+                                        (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings) curr-section-name #f #f))
+                                      (begin
+                                        (debug:print 0 *default-log-port* "Script not found or not exectutable: " include-script)
+                                        (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings) curr-section-name #f #f)))
+                                  ) ;; )
+	       (configf:section-rx ( x section-name )
+                                   (begin
+                                     ;; call post-section-procs
+                                     (for-each 
+                                      (lambda (dat)
+                                        (let ((patt (car dat))
+                                              (proc (cdr dat)))
+                                          (if (string-match patt curr-section-name)
+                                              (proc curr-section-name section-name res path))))
+                                      post-section-procs)
+                                     ;; after gathering the vars for a section and if apply-wildcards is true and if there is a wildcard in the section name process wildcards
+                                     ;; NOTE: we are processing the curr-section-name, NOT section-name.
+                                     (process-wildcards res curr-section-name)
+                                     (if (not (hash-table-ref/default res section-name #f))(hash-table-set! res section-name '())) ;; ensure that mere mention of a section is not lost
+                                     (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings)
+                                           ;; if we have the sections list then force all settings into "" and delete it later?
+                                           ;; (if (or (not sections) 
+                                           ;;	      (member section-name sections))
+                                           ;;	  section-name "") ;; stick everything into "". NOPE: We need new strategy. Put stuff in correct sections and then delete all sections later.
+                                           section-name
+                                           #f #f)))
+	       (configf:key-sys-pr ( x key cmd      )
+                                   (if (calc-allow-system allow-system curr-section-name sections)
+                                       (let ((alist    (hash-table-ref/default res curr-section-name '()))
+                                             (val-proc (lambda ()
+                                                         (let* ((start-time (current-seconds))
+                                                                (local-allow-system  (calc-allow-system allow-system curr-section-name sections))
+                                                                (env-delta  (cfgdat->env-alist curr-section-name res local-allow-system))
+                                                                (cmdres     (cmd-run->list cmd delta-env-alist-or-hash-table: env-delta)) ;; BB: here is where [system is exec'd.  needs to have env from other vars!
+                                                                (delta      (- (current-seconds) start-time))
+                                                                (status     (cadr cmdres))
+                                                                (res        (car  cmdres)))
+                                                           (debug:print-info 4 *default-log-port* "" inl "\n => " (string-intersperse res "\n"))
+                                                           (if (not (eq? status 0))
+                                                               (begin
+                                                                 (debug:print-error 0 *default-log-port* "problem with " inl ", return code " status
+                                                                                    " output: " cmdres)))
+                                                           (if (> delta 2)
+                                                               (debug:print-info 0 *default-log-port* "for line \"" inl "\"\n  command: " cmd " took " delta " seconds to run with output:\n   " res)
+                                                               (debug:print-info 9 *default-log-port* "for line \"" inl "\"\n  command: " cmd " took " delta " seconds to run with output:\n   " res))
+                                                           (if (null? res)
+                                                               ""
+                                                               (string-intersperse res " "))))))
+                                         (hash-table-set! res curr-section-name 
+                                                          (assoc-safe-add alist
+                                                                                 key 
+                                                                                 (case (calc-allow-system allow-system curr-section-name sections)
+                                                                                   ((return-procs) val-proc)
+                                                                                   ((return-string) cmd)
+                                                                                   (else (val-proc)))
+                                                                                 metadata: metapath))
+                                         (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings) curr-section-name #f #f))
+                                       (loop (configf:read-line inp res
+                                                                (calc-allow-system allow-system curr-section-name sections)
+                                                                settings)
+                                             curr-section-name #f #f)))
+               
+	       (configf:key-no-val ( x key val)
+                                   (let* ((alist   (hash-table-ref/default res curr-section-name '()))
+                                          (fval    (or (if (string? val) val #f) ""))) ;; fval should be either "" or " " (one or more spaces)
+                                     (debug:print 10 *default-log-port* "   setting: [" curr-section-name "] " key " = #t")
+                                     (safe-setenv key fval)
+                                     (hash-table-set! res curr-section-name 
+                                                      (assoc-safe-add alist key fval metadata: metapath))
+                                     (loop (configf:read-line inp res
+                                                              (calc-allow-system allow-system curr-section-name sections)
+                                                              settings)
+                                           curr-section-name key #f)))
+               
+	       (configf:key-val-pr ( x key unk1 val unk2 )
+                                   (let* ((alist   (hash-table-ref/default res curr-section-name '()))
+                                          (envar   (and environ-patt (string-search (regexp environ-patt) curr-section-name)))
+                                          (realval (if envar
+                                                       (eval-string-in-environment val)
+                                                       val)))
+                                     (debug:print-info 6 *default-log-port* "read-config env setting, envar: " envar " realval: " realval " val: " val " key: " key " curr-section-name: " curr-section-name)
+                                     (if envar (safe-setenv key realval))
+                                     (debug:print 10 *default-log-port* "   setting: [" curr-section-name "] " key " = " val)
+                                     (hash-table-set! res curr-section-name 
+                                                      (assoc-safe-add alist key realval metadata: metapath))
+                                     (loop (configf:read-line inp res
+                                                              (calc-allow-system allow-system curr-section-name sections) settings)
+                                           curr-section-name key #f)))
+	       ;; if a continued line
+	       (configf:cont-ln-rx ( x whsp val     )
+                                   (let ((alist (hash-table-ref/default res curr-section-name '())))
+                                     (if var-flag             ;; if set to a string then we have a continued var
+                                         (let ((newval (conc 
+                                                        (lookup res curr-section-name var-flag) "\n"
+                                                        ;; trim lead from the incoming whsp to support some indenting.
+                                                        (if lead
+                                                            (string-substitute (regexp lead) "" whsp)
+                                                            "")
+                                                        val)))
+                                           ;; (print "val: " val "\nnewval: \"" newval "\"\nvarflag: " var-flag)
+                                           (hash-table-set! res curr-section-name 
+                                                            (assoc-safe-add alist var-flag newval metadata: metapath))
+                                           (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings) curr-section-name var-flag (if lead lead whsp)))
+                                         (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings) curr-section-name #f #f))))
+	       (else (debug:print-error 0 *default-log-port* "problem parsing " path ",\n   \"" inl "\"")
+		     (set! var-flag #f)
+		     (loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings) curr-section-name #f #f))))
+          ) ;; end loop
+        )))
+
+;; moved to common.scm as it is very megatest specific
+;;
+;; ;; pathenvvar will set the named var to the path of the config
+;; (define (find-and-read-config fname #!key (environ-patt #f)(given-toppath #f)(pathenvvar #f))
+;;   (let* ((curr-dir   (current-directory))
+;;          (configinfo (find-config fname toppath: given-toppath))
+;; 	 (toppath    (car configinfo))
+;; 	 (configfile (cadr configinfo))
+;; 	 (set-fields (lambda (curr-section next-section ht path)
+;; 		       (let ((field-names (if ht (common:get-fields ht) '()))
+;; 			     (target      (or (getenv "MT_TARGET")(args:get-arg "-reqtarg")(args:get-arg "-target"))))
+;; 			 (debug:print-info 9 *default-log-port* "set-fields with field-names=" field-names " target=" target " curr-section=" curr-section " next-section=" next-section " path=" path " ht=" ht)
+;; 			 (if (not (null? field-names))(keys:target-set-args field-names target #f))))))
+;;     (if toppath (change-directory toppath)) 
+;;     (if (and toppath pathenvvar)(setenv pathenvvar toppath))
+;;     (let ((configdat  (if configfile 
+;; 			  (read-config configfile #f #t environ-patt: environ-patt post-section-procs: (list (cons "^fields$" set-fields)) #f))))
+;;       (if toppath (change-directory curr-dir))
+;;       (list configdat toppath configfile fname))))
+
+(define (lookup cfgdat section var)
+  (if (hash-table? cfgdat)
+      (let ((sectdat (hash-table-ref/default cfgdat section '())))
+	(if (null? sectdat)
+	    #f
+	    (let ((match (assoc var sectdat)))
+	      (if match ;; (and match (list? match)(> (length match) 1))
+		  (cadr match)
+		  #f))
+	    ))
+      #f))
+
+;; use to have definitive setting:
+;;  [foo]
+;;  var yes
+;;
+;;  (var-is? cfgdat "foo" "var" "yes") => #t
+;;
+(define (var-is? cfgdat section var expected-val)
+  (equal? (lookup cfgdat section var) expected-val))
+
+;; safely look up a value that is expected to be a number, return
+;; a default (#f unless provided)
+;;
+(define (lookup-number cfgdat section varname #!key (default #f))
+  (let* ((val (lookup cfgdat section varname))
+         (res (if val
+                  (string->number (string-substitute "\\s+" "" val #t))
+                  #f)))
+    (cond
+     (res  res)
+     (val  (debug:print 0 *default-log-port* "ERROR: no number found for [" section "], " varname ", got: " val))
+     (else default))))
+
+(define (section-vars cfgdat section)
+  (let ((sectdat (hash-table-ref/default cfgdat section '())))
+    (if (null? sectdat)
+	'()
+	(map car sectdat))))
+
+(define (get-section cfgdat section)
+  (hash-table-ref/default cfgdat section '()))
+
+(define (set-section-var cfgdat section var val)
+  (let ((sectdat (get-section cfgdat section)))
+    (hash-table-set! cfgdat section
+                     (assoc-safe-add sectdat var val))))
+
+    ;;(append (filter (lambda (x)(not (assoc var sectdat))) sectdat)
+    ;;	    (list var val))))
+
+;; moved to common
+;; (define (setup)
+;;   (let* ((configf (find-config "megatest.config"))
+;; 	 (config  (if configf (read-config configf #f #t) #f)))
+;;     (if config
+;; 	(setenv "RUN_AREA_HOME" (pathname-directory configf)))
+;;     config))
+
+;;======================================================================
+;; Non destructive writing of config file
+;;======================================================================
+
+(define (compress-multi-lines fdat)
+  ;; step 1.5 - compress any continued lines
+  (if (null? fdat) fdat
+	(let loop ((hed (car fdat))
+		   (tal (cdr fdat))
+		   (cur "")
+		   (led #f)
+		   (res '()))
+	  ;; ALL WHITESPACE LEADING LINES ARE TACKED ON!!
+	  ;;  1. remove led whitespace
+	  ;;  2. tack on to hed with "\n"
+	  (let ((match (string-match configf:cont-ln-rx hed)))
+	    (if match ;; blast! have to deal with a multiline
+		(let* ((lead (cadr match))
+		       (lval (caddr match))
+		       (newl (conc cur "\n" lval)))
+		  (if (not led)(set! led lead))
+		  (if (null? tal) 
+		      (set! fdat (append fdat (list newl)))
+		      (loop (car tal)(cdr tal) newl led res))) ;; NB// not tacking newl onto res
+		(let ((newres (if led 
+				  (append res (list cur hed))
+				  (append res (list hed)))))
+		  ;; prev was a multiline
+		  (if (null? tal)
+		      newres
+		      (loop (car tal)(cdr tal) "" #f newres))))))))
+
+;; note: I'm cheating a little here. I merely replace "\n" with "\n         "
+(define (expand-multi-lines fdat)
+  ;; step 1.5 - compress any continued lines
+  (if (null? fdat) fdat
+      (let loop ((hed (car fdat))
+		 (tal (cdr fdat))
+		 (res '()))
+	(let ((newres (append res (list (string-substitute (regexp "\n") "\n         " hed #t)))))
+	  (if (null? tal)
+	      newres
+	      (loop (car tal)(cdr tal) newres))))))
+
+(define (file->list fname)
+  (if (safe-file-exists? fname)
+      (let ((inp (open-input-file fname)))
+	(let loop ((inl (read-line inp))
+		   (res '()))
+	  (if (eof-object? inl)
+	      (begin
+		(close-input-port inp)
+		(reverse res))
+	      (loop (read-line inp)(cons inl res)))))
+      '()))
+
+;;======================================================================
+;; Write a config
+;;   0. Given a refererence data structure "indat"
+;;   1. Open the output file and read it into a list
+;;   2. Flatten any multiline entries
+;;   3. Modify values per contents of "indat" and remove absent values
+;;   4. Append new values to the section (immediately after last legit entry)
+;;   5. Write out the new list 
+;;======================================================================
+
+(define (write-config indat fname #!key (required-sections '()))
+  (let* (;; step 1: Open the output file and read it into a list
+	 (fdat       (file->list fname))
+	 (refdat  (make-hash-table))
+	 (sechash (make-hash-table)) ;; current section hash, init with hash for "default" section
+	 (new     #f) ;; put the line to be used in new, if it is to be deleted the set new to #f
+	 (secname #f))
+
+    ;; step 2: Flatten multiline entries
+    (if (not (null? fdat))(set! fdat (compress-multi-lines fdat)))
+
+    ;; step 3: Modify values per contents of "indat" and remove absent values
+    (if (not (null? fdat))
+	(let loop ((hed  (car fdat))
+		   (tal  (cadr fdat))
+		   (res  '())
+		   (lnum 0))
+	  (regex-case 
+	   hed
+	   (configf:comment-rx _                  (set! res (append res (list hed)))) ;; (loop (read-line inp) curr-section-name #f #f))
+	   (configf:blank-l-rx _                  (set! res (append res (list hed)))) ;; (loop (read-line inp) curr-section-name #f #f))
+	   (configf:section-rx ( x section-name ) (let ((section-hash (hash-table-ref/default refdat section-name #f)))
+					    (if (not section-hash)
+						(let ((newhash (make-hash-table)))
+						  (hash-table-set! refdat section-name newhash)
+						  (set! sechash newhash))
+						(set! sechash section-hash))
+					    (set! new hed) ;; will append this at the bottom of the loop
+					    (set! secname section-name)
+					    ))
+	   ;; No need to process key cmd, let it fall though to key val
+	   (configf:key-val-pr ( x key val      )
+		       (let ((newval (lookup indat secname key))) ;; secname was sec. I think that was a bug
+			 ;; can handle newval == #f here => that means key is removed
+			 (cond 
+			  ((equal? newval val)
+			   (set! res (append res (list hed))))
+			  ((not newval) ;; key has been removed
+			   (set! new #f))
+			  ((not (equal? newval val))
+			     (hash-table-set! sechash key newval)
+			     (set! new (conc key " " newval)))
+			  (else
+			   (debug:print-error 0 *default-log-port* "problem parsing line number " lnum "\"" hed "\"")))))
+	   (else
+	    (debug:print-error 0 *default-log-port* "Problem parsing line num " lnum " :\n   " hed )))
+	  (if (not (null? tal))
+	      (loop (car tal)(cdr tal)(if new (append res (list new)) res)(+ lnum 1)))
+	  ;; drop to here when done processing, res contains modified list of lines
+	  (set! fdat res)))
+
+    ;; step 4: Append new values to the section
+    (for-each 
+     (lambda (section)
+       (let ((sdat   '()) ;; append needed bits here
+	     (svars  (section-vars indat section)))
+	 (for-each 
+	  (lambda (var)
+	    (let ((val (lookup refdat section var)))
+	      (if (not val) ;; this one is new
+		  (begin
+		    (if (null? sdat)(set! sdat (list (conc "[" section "]"))))
+		    (set! sdat (append sdat (list (conc var " " val))))))))
+	  svars)
+	 (set! fdat (append fdat sdat))))
+     (delete-duplicates (append required-sections (hash-table-keys indat))))
+
+    ;; step 5: Write out new file
+    (with-output-to-file fname 
+      (lambda ()
+	(for-each 
+	 (lambda (line)
+	   (print line))
+	 (expand-multi-lines fdat))))))
+
+;;======================================================================
+;; refdb
+;;======================================================================
+
+;; reads a refdb into an assoc array of assoc arrays
+;;   returns (list dat msg)
+(define (read-refdb refdb-path)
+  (let ((sheets-file  (conc refdb-path "/sheet-names.cfg")))
+    (if (not (safe-file-exists? sheets-file))
+	(list #f (conc "ERROR: no refdb found at " refdb-path))
+	(if (not (file-read-access? sheets-file))
+	    (list #f (conc "ERROR: refdb file not readable at " refdb-path))
+	    (let* ((sheets (with-input-from-file sheets-file
+			     (lambda ()
+			       (let loop ((inl (read-line))
+					  (res '()))
+				 (if (eof-object? inl)
+				     (reverse res)
+				     (loop (read-line)(cons inl res)))))))
+		   (data   '()))
+	      (for-each 
+	       (lambda (sheet-name)
+		 (let* ((dat-path  (conc refdb-path "/" sheet-name ".dat"))
+			(ref-dat   (read-config dat-path #f #t))
+			(ref-assoc (map (lambda (key)
+					  (list key (hash-table-ref ref-dat key)))
+					(hash-table-keys ref-dat))))
+				   ;; (hash-table->alist ref-dat)))
+		   ;; (set! data (append data (list (list sheet-name ref-assoc))))))
+		   (set! data (cons (list sheet-name ref-assoc) data))))
+	       sheets)
+	      (list data "NO ERRORS"))))))
+
+;; map over all pairs in a three level hierarchial alist and apply a function to the keys/val
+;;
+(define (map-all-hier-alist data proc #!key (initproc1 #f)(initproc2 #f)(initproc3 #f))
+  (for-each 
+   (lambda (sheetname)
+     (let* ((sheettmp  (assoc sheetname data))
+	    (sheetdat  (if sheettmp (cadr sheettmp) '())))
+       (if initproc1 (initproc1 sheetname))
+       (for-each 
+	(lambda (sectionname)
+	  (let* ((sectiontmp  (assoc sectionname sheetdat))
+		 (sectiondat  (if sectiontmp (cadr sectiontmp) '())))
+	    (if initproc2 (initproc2 sheetname sectionname))
+	    (for-each
+	     (lambda (varname)
+	       (let* ((valtmp (assoc varname sectiondat))
+		      (val    (if valtmp (cadr valtmp) "")))
+		 (proc sheetname sectionname varname val)))
+	     (map car sectiondat))))
+	(map car sheetdat))))
+   (map car data))
+  data)
+
+;;======================================================================
+;;  C O N F I G   T O / F R O M   A L I S T
+;;======================================================================
+
+(define (config->alist cfgdat)
+  (hash-table->alist cfgdat))
+
+(define (alist->config adat)
+  (let ((ht (make-hash-table)))
+    (for-each
+     (lambda (section)
+       (hash-table-set! ht (car section)(cdr section)))
+     adat)
+    ht))
+
+;; if 
+(define (read-alist fname)
+  (handle-exceptions
+      exn
+      #f
+    (alist->config
+     (with-input-from-file fname read))))
+
+(define (write-alist cdat fname #!key (locker #f)(unlocker #f))
+  (if (and locker (not (locker fname)))
+      (debug:print 0 *default-log-port* "INFO: Could not get lock on " fname))
+  (let* ((dat  (config->alist cdat))
+         (res
+          (begin
+            (with-output-to-file fname ;; first write out the file
+              (lambda ()
+                (pp dat)))
+            
+            (if (file-exists? fname)   ;; now verify it is readable
+                (if (read-alist fname)
+                    #t ;; data is good.
+                    (begin
+                      (handle-exceptions
+                       exn
+                       #f
+                       (debug:print 0 *default-log-port* "WARNING: content " dat " for cache " fname " is not readable. Deleting generated file.")
+                       (delete-file fname))
+                      #f))
+                #f))))
+    (if unlocker (unlocker fname))
+    res))
+  
+;; convert hierarchial list to ini format
+;;
+(define (config->ini data)
+  (map 
+   (lambda (section)
+     (let ((section-name (car section))
+	   (section-dat  (cdr section)))
+       (print "\n[" section-name "]")
+       (map (lambda (dat-pair)
+	      (let* ((var (car dat-pair))
+		     (val (cadr dat-pair))
+		     (fname (if (> (length dat-pair) 2)(caddr dat-pair) #f)))
+		(if fname (print "# " var "=>" fname))
+		(print var " " val)))
+	    section-dat))) ;;       (print "section-dat: " section-dat))
+   (hash-table->alist data)))
+
+)

ADDED   src/mtdb.scm
Index: src/mtdb.scm
==================================================================
--- /dev/null
+++ src/mtdb.scm
@@ -0,0 +1,105 @@
+;======================================================================
+;; Copyright 2006-2016, Matthew Welland.
+;; 
+;; This file is part of Megatest.
+;; 
+;;     Megatest is free software: you can redistribute it and/or modify
+;;     it under the terms of the GNU General Public License as published by
+;;     the Free Software Foundation, either version 3 of the License, or
+;;     (at your option) any later version.
+;; 
+;;     Megatest is distributed in the hope that it will be useful,
+;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
+;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;     GNU General Public License for more details.
+;; 
+;;     You should have received a copy of the GNU General Public License
+;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+;;
+;;======================================================================
+
+;; NOTE: This is the db module, long term it will replace db.scm.
+;; WARN: This module conflicts with db.scm as it uses sql-de-lite
+
+(declare (unit mtdb))
+(declare (uses mtcommon))
+
+(module mtdb
+        (
+         get-db-tmp-area
+         )
+
+(import scheme chicken data-structures extras (prefix mtcommon common:))
+(use (prefix sql-de-lite sql) posix typed-records)
+
+(define *default-log-port* (current-error-port))
+
+;;======================================================================
+;; Database access
+;;======================================================================
+
+
+;;======================================================================
+;;  R E C O R D S
+;;======================================================================
+
+;; areas
+;;    run.db
+;;    runs => 1.db, 2.db ...
+
+;; each db entry is a pair ( db . dbfilepath )
+;; I propose this record evolves into the area record
+;;
+(defstruct dbr:dbstruct 
+  (tmpdb       #f)
+  (dbstack     #f) ;; stack for tmp db handles, do not initialize with a stack
+  (mtdb        #f)
+  (refndb      #f)
+  (homehost    #f) ;; not used yet
+  (on-homehost #f) ;; not used yet
+  (read-only   #f)
+  )                ;; goal is to converge on one struct for an area but for now it is too confusing
+  
+
+;; record for keeping state,status and count for doing roll-ups in
+;; iterated tests
+;;
+(defstruct dbr:counts
+  (state #f)
+  (status #f)
+  (count  0)) 
+
+;;======================================================================
+;; SQLITE3 HELPERS
+;;======================================================================
+
+
+(define (general-sql-de-lite-error-dump exn stmt . params)
+  (let ((err-status ((condition-property-accessor 'sql-de-lite 'status #f) exn))) ;; RADT ... how does this work?
+    ;; check for (exn sqlite3) ((condition-property-accessor 'exn 'message) exn)
+    (print "err-status: " err-status)
+    (common:print-error 0 *default-log-port* " query " stmt " failed, params: " params ", error: " ((condition-property-accessor 'exn 'message) exn))
+    (print-call-chain (current-error-port))))
+
+;;======================================================================
+;; Manage the /tmp/ db mirror area
+;;======================================================================
+
+(define (get-db-tmp-area area-path area-name)
+  (let ((dbdir (conc "/tmp/" (current-user-name)
+                     "/megatest_localdb/"
+                     area-name "/"
+                     (string-translate area-path "/" "."))))
+    (if area-path ;; common:get-create-writeable-dir
+        (handle-exceptions
+         exn
+         (begin
+           (common:print-error 0 *default-log-port* "Couldn't create path to " dbdir)
+           (exit 1))
+         (let ((dbpath (common:get-create-writeable-dir
+                        (list dbdir)))) ;;  #t))))
+           dbpath))
+        #f)))
+
+
+)

Index: subrun.scm
==================================================================
--- subrun.scm
+++ subrun.scm
@@ -38,38 +38,38 @@
 (include "db_records.scm") ;; provides db:test-get-id
 ;;(include "run_records.scm")
 ;;(include "test_records.scm")
 
 (define (subrun:subrun-test-initialized? test-run-dir)
-  (if (and (common:file-exists? (conc test-run-dir "/subrun-area") )
-           (common:file-exists? (conc test-run-dir "/testconfig.subrun") ))
+  (if (and (file-exists? (conc test-run-dir "/subrun-area") )
+           (file-exists? (conc test-run-dir "/testconfig.subrun") ))
       #t
       #f))
 
 (define (subrun:launch-dashboard test-run-dir)
   (if (subrun:subrun-test-initialized? test-run-dir)
       (let* ((subarea (subrun:get-runarea test-run-dir)))
-        (if (and subarea (common:file-exists? subarea))
+        (if (and subarea (file-exists? subarea))
             (system (conc "cd " subarea ";env -i PATH=$PATH DISPLAY=$DISPLAY HOME=$HOME USER=$USER dashboard &"))))))
 
 (define (subrun:subrun-removed? test-run-dir)
   (if (subrun:subrun-test-initialized? test-run-dir)
       (let ((flagfile (conc test-run-dir "/subrun.removed")))
-        (if (common:file-exists? flagfile)
+        (if (file-exists? flagfile)
             #t
             #f))
       #t))
 
 (define (subrun:set-subrun-removed test-run-dir)
   (let ((flagfile (conc test-run-dir "/subrun.removed")))
-    (if (and (subrun:subrun-test-initialized? test-run-dir) (not (common:file-exists? flagfile)))
+    (if (and (subrun:subrun-test-initialized? test-run-dir) (not (file-exists? flagfile)))
         (with-output-to-file flagfile
           (lambda () (print (current-seconds)))))))
 
 (define (subrun:unset-subrun-removed test-run-dir)
   (let ((flagfile (conc test-run-dir "/subrun.removed")))
-    (if (and (subrun:subrun-test-initialized? test-run-dir) (common:file-exists? flagfile))
+    (if (and (subrun:subrun-test-initialized? test-run-dir) (file-exists? flagfile))
         (delete-file flagfile))))
 
 
 (define (subrun:testconfig-defines-subrun? testconfig)
   (configf:lookup testconfig "subrun" "runwait")) ;; we use runwait as the flag that a subrun is requested
@@ -84,11 +84,11 @@
               ;; we need to force the setting in the testconfig so it will
           ;; be preserved in the testconfig.subrun file
       (configf:set-section-var testconfig "subrun" "runarea" *toppath*))
     (configf:set-section-var testconfig "logpro" "subrun" logpro) ;; append the logpro rules to the logpro section as stepname subrun
 
-    (if (common:file-exists? symlink-target)
+    (if (file-exists? symlink-target)
         (delete-file symlink-target))
     
     (create-symbolic-link ra symlink-target)
 
     (configf:write-alist testconfig "testconfig.subrun")))

Index: supplemental.megatest.config
==================================================================
--- supplemental.megatest.config
+++ supplemental.megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tasks.scm
==================================================================
--- tasks.scm
+++ tasks.scm
@@ -48,21 +48,21 @@
 	   (print-call-chain (current-error-port))
 	   (debug:print 0 *default-log-port* " message: " ((condition-property-accessor 'exn 'message) exn))
 	   (debug:print 5 *default-log-port* " exn=" (condition->list exn))
 	   (debug:print 0 *default-log-port* "tasks:wait-on-journal failed. Continuing on, you can ignore this call-chain")
 	   #t) ;; if stuff goes wrong just allow it to move on
-	 (let loop ((journal-exists (common:file-exists? fullpath))
+	 (let loop ((journal-exists (file-exists? fullpath))
 		    (count          n)) ;; wait ten times ...
 	   (if journal-exists
 	       (begin
 		 (if (and waiting-msg
 			  (eq? (modulo n 30) 0))
 		     (debug:print 0 *default-log-port* waiting-msg))
 		 (if (> count 0)
 		     (begin
 		       (thread-sleep! 1)
-		       (loop (common:file-exists? fullpath)
+		       (loop (file-exists? fullpath)
 			     (- count 1)))
 		     (begin
 		       (debug:print 0 *default-log-port* "ERROR: removing the journal file " fullpath ", this is not good. Look for disk full, write access and other issues.")
 		       (if remove (system (conc "rm -rf " fullpath)))
 		       #f)))
@@ -106,11 +106,11 @@
 	     (debug:print 0 *default-log-port* " message: " ((condition-property-accessor 'exn 'message) exn))
 	     (debug:print 5 *default-log-port* " exn=" (condition->list exn))))
        (let* ((dbpath        (db:dbfile-path )) ;; (tasks:get-task-db-path))
 	      (dbfile       (conc dbpath "/monitor.db"))
 	      (avail        (tasks:wait-on-journal dbpath 10)) ;; wait up to about 10 seconds for the journal to go away
-	      (exists       (common:file-exists? dbpath))
+	      (exists       (file-exists? dbpath))
 	      (write-access (file-write-access? dbpath))
 	      (mdb          (cond ;; what the hek is *toppath* doing here?
 			     ((and (string? *toppath*)(file-write-access? *toppath*))
 			      (sqlite3:open-database dbfile))
 			     ((file-read-access? dbpath)    (sqlite3:open-database dbfile))
@@ -203,11 +203,11 @@
 
     (system (conc "nbfake kill "kill-switch" "pid))
 
     (when logfile
       (thread-sleep! 0.5)
-      (if (common:file-exists? gzfile) (delete-file gzfile))
+      (if (file-exists? gzfile) (delete-file gzfile))
       (system (conc "gzip " logfile))
       
       (unsetenv "TARGETHOST_LOGF")
       (unsetenv "TARGETHOST"))))
     

Index: tdb.scm
==================================================================
--- tdb.scm
+++ tdb.scm
@@ -59,11 +59,11 @@
   (debug:print-info 11 *default-log-port* "open-test-db " work-area)
   (if (and work-area 
 	   (directory? work-area)
 	   (file-read-access? work-area))
       (let* ((dbpath              (conc work-area "/testdat.db"))
-	     (dbexists            (common:file-exists? dbpath))
+	     (dbexists            (file-exists? dbpath))
 	     (work-area-writeable (file-write-access? work-area))
 	     (db                  (handle-exceptions  ;; open the db if area writeable or db pre-existing. open in-mem otherwise. if exception, open in-mem
 				   exn
 				   (begin
 				     (print-call-chain (current-error-port))

Index: test_records.scm
==================================================================
--- test_records.scm
+++ test_records.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests.scm
==================================================================
--- tests.scm
+++ tests.scm
@@ -72,16 +72,16 @@
 (define (tests:get-valid-tests test-registry tests-paths)
   (if (null? tests-paths) 
       test-registry
       (let loop ((hed (car tests-paths))
 		 (tal (cdr tests-paths)))
-	(if (common:file-exists? hed)
+	(if (file-exists? hed)
 	    (for-each (lambda (test-path)
 			(let* ((tname   (last (string-split test-path "/")))
 			       (tconfig (conc test-path "/testconfig")))
 			  (if (and (not (hash-table-ref/default test-registry tname #f))
-				   (common:file-exists? tconfig))
+				   (file-exists? tconfig))
 			      (hash-table-set! test-registry tname test-path))))
 		      (glob (conc hed "/*"))))
 	(if (null? tal)
 	    test-registry
 	    (loop (car tal)(cdr tal))))))
@@ -350,11 +350,11 @@
 	  (db:test-get-rundir prev-testdat)) ;; )
 	 (waivers     (if testconfig (configf:section-vars testconfig "waivers") '()))
 	 (waiver-rx   (regexp "^(\\S+)\\s+(.*)$"))
 	 (diff-rule   "diff %file1% %file2%")
 	 (logpro-rule "diff %file1% %file2% | logpro %waivername%.logpro %waivername%.html"))
-    (if (not (common:file-exists? test-rundir))
+    (if (not (file-exists? test-rundir))
 	(begin
 	  (debug:print-error 0 *default-log-port* "test run directory is gone, cannot propagate waiver")
 	  #f)
 	(begin
 	  (push-directory test-rundir)
@@ -367,11 +367,11 @@
 				     (wparts      (if waiver (string-match waiver-rx waiver) #f))
 				     (waiver-rule (if wparts (cadr wparts)  #f))
 				     (waiver-glob (if wparts (caddr wparts) #f))
 				     (logpro-file (if waiver
 						      (let ((fname (conc hed ".logpro")))
-							(if (common:file-exists? fname)
+							(if (file-exists? fname)
 							    fname 
 							    (begin
 							      (debug:print 0 *default-log-port* "INFO: No logpro file " fname " falling back to diff")
 							      #f)))
 						      #f))
@@ -1194,11 +1194,11 @@
 						      '()
 						      (lambda (x p)
 							(let* ((targ-path (string-intersperse p "/"))
                                                                (full-path (conc linktree "/" targ-path))
                                                                (run-name  (car (reverse p))))
-                                                          (if (and (common:file-exists? full-path)
+                                                          (if (and (file-exists? full-path)
                                                                    (directory?   full-path)
                                                                    (file-write-access? full-path))
                                                               (s:a run-name 'href (conc targ-path "/run-summary.html"))
                                                               (begin
                                                                 (debug:print 0 *default-log-port* "INFO: Can't create " targ-path "/run-summary.html")
@@ -1233,11 +1233,11 @@
                                            path-parts))
                                        test-dats))
                     (tests-htree (common:list->htree tests-tree-dat))
                     (html-dir    (conc linktree "/" (string-intersperse run-dir "/")))
                     (html-path   (conc html-dir "/run-summary.html"))
-                    (oup         (if (and (common:file-exists? html-dir)
+                    (oup         (if (and (file-exists? html-dir)
                                           (directory?   html-dir)
                                           (file-write-access? html-dir))
                                      (open-output-file  html-path)
                                      #f)))
                ;; (print "run-dir: " run-dir ", tests-tree-dat: " tests-tree-dat)
@@ -1261,21 +1261,21 @@
                                                                           (item-path ;; (if (> (length p) 2) ;; test-name + run-name
                                                                            (string-intersperse p "/"))
                                                                           (full-targ (conc html-dir "/" targ-path))
                                                                           (std-file  (conc full-targ "/test-summary.html"))
                                                                           (alt-file  (conc full-targ "/megatest-rollup-" test-name ".html"))
-                                                                          (html-file (if (common:file-exists? alt-file)
+                                                                          (html-file (if (file-exists? alt-file)
                                                                                          alt-file
                                                                                          std-file))
                                                                           (run-name  (car (reverse p))))
-                                                                     (if (and (not (common:file-exists? full-targ))
+                                                                     (if (and (not (file-exists? full-targ))
                                                                               (directory? full-targ)
                                                                               (file-write-access? full-targ))
                                                                          (tests:summarize-test 
                                                                           run-id 
                                                                           (rmt:get-test-id run-id test-name item-path)))
-                                                                     (if (common:file-exists? full-targ)
+                                                                     (if (file-exists? full-targ)
                                                                          (s:a run-name 'href html-file)
                                                                          (begin
                                                                            (debug:print 0 *default-log-port* "ERROR: can't access " full-targ)
                                                                            (conc "No summary for " run-name)))))
                                                                  ))))))
@@ -1484,11 +1484,11 @@
 ;; Gather data from test/task specifications
 ;;======================================================================
 
 ;; (define (tests:get-valid-tests testsdir test-patts) ;;  #!key (test-names '()))
 ;;   (let ((tests (glob (conc testsdir "/tests/*")))) ;; " (string-translate patt "%" "*")))))
-;;     (set! tests (filter (lambda (test)(common:file-exists? (conc test "/testconfig"))) tests))
+;;     (set! tests (filter (lambda (test)(file-exists? (conc test "/testconfig"))) tests))
 ;;     (delete-duplicates
 ;;      (filter (lambda (testname)
 ;; 	       (tests:match test-patts testname #f))
 ;; 	     (map (lambda (testp)
 ;; 		    (last (string-split testp "/")))
@@ -1519,11 +1519,11 @@
   (let* ((use-cache    (common:use-cache?))
 	 (cache-path   (tests:get-test-path-from-environment))
 	 (cache-file   (and cache-path (conc cache-path "/.testconfig")))
 	 (cache-exists (and cache-file
 			    (not force-create)  ;; if force-create then pretend there is no cache to read
-			    (common:file-exists? cache-file)))
+			    (file-exists? cache-file)))
 	 (cached-dat   (if (and (not force-create)
 				cache-exists
 				use-cache)
 			   (handle-exceptions
 			    exn
@@ -1543,11 +1543,11 @@
 	      (let* ((treg         (or test-registry
 				       (tests:get-all)))
 		     (test-path    (or (hash-table-ref/default treg test-name #f)
 				       (conc *toppath* "/tests/" test-name)))
 		     (test-configf (conc test-path "/testconfig"))
-		     (testexists   (and (common:file-exists? test-configf)(file-read-access? test-configf)))
+		     (testexists   (and (file-exists? test-configf)(file-read-access? test-configf)))
 		     (tcfg         (if testexists
 				       (read-config test-configf #f system-allowed
 						    environ-patt: (if system-allowed
 								      "pre-launch-env-vars"
 								      #f))
@@ -1713,11 +1713,11 @@
 ;;
 (define (tests:lazy-dot testrecords  outtype sizex sizey)
   (let ((dfile (conc "/tmp/." (current-user-name) "-" (server:mk-signature) ".dot"))
 	(fname (conc "/tmp/." (current-user-name) "-" (server:mk-signature) ".dotdat")))
     (tests:write-dot-file testrecords dfile sizex sizey)
-    (if (common:file-exists? fname)
+    (if (file-exists? fname)
 	(let ((res (with-input-from-file fname
 		     (lambda ()
 		       (read-lines)))))
 	  (system (conc "env -i PATH=$PATH dot -T " outtype " < " dfile " > " fname "&"))
 	  res)

Index: tests/Makefile
==================================================================
--- tests/Makefile
+++ tests/Makefile
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dep-tests/common.testconfig
==================================================================
--- tests/dep-tests/common.testconfig
+++ tests/dep-tests/common.testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dep-tests/common_itemstable.testconfig
==================================================================
--- tests/dep-tests/common_itemstable.testconfig
+++ tests/dep-tests/common_itemstable.testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dep-tests/megatest.config
==================================================================
--- tests/dep-tests/megatest.config
+++ tests/dep-tests/megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dep-tests/runconfigs.config
==================================================================
--- tests/dep-tests/runconfigs.config
+++ tests/dep-tests/runconfigs.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dep-tests/tests/aggregate/testconfig
==================================================================
--- tests/dep-tests/tests/aggregate/testconfig
+++ tests/dep-tests/tests/aggregate/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dep-tests/tests/genlib/testconfig
==================================================================
--- tests/dep-tests/tests/genlib/testconfig
+++ tests/dep-tests/tests/genlib/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dep-tests/tests/results/testconfig
==================================================================
--- tests/dep-tests/tests/results/testconfig
+++ tests/dep-tests/tests/results/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dep-tests/tests/setup/testconfig
==================================================================
--- tests/dep-tests/tests/setup/testconfig
+++ tests/dep-tests/tests/setup/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dep-tests/tests/test1/testconfig
==================================================================
--- tests/dep-tests/tests/test1/testconfig
+++ tests/dep-tests/tests/test1/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dep-tests/tests/test2/testconfig
==================================================================
--- tests/dep-tests/tests/test2/testconfig
+++ tests/dep-tests/tests/test2/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dynamic-waiton-example/common.testconfig
==================================================================
--- tests/dynamic-waiton-example/common.testconfig
+++ tests/dynamic-waiton-example/common.testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dynamic-waiton-example/common_itemstable.testconfig
==================================================================
--- tests/dynamic-waiton-example/common_itemstable.testconfig
+++ tests/dynamic-waiton-example/common_itemstable.testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dynamic-waiton-example/megatest.config
==================================================================
--- tests/dynamic-waiton-example/megatest.config
+++ tests/dynamic-waiton-example/megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dynamic-waiton-example/runconfigs.config
==================================================================
--- tests/dynamic-waiton-example/runconfigs.config
+++ tests/dynamic-waiton-example/runconfigs.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dynamic-waiton-example/tests/aggregate/testconfig
==================================================================
--- tests/dynamic-waiton-example/tests/aggregate/testconfig
+++ tests/dynamic-waiton-example/tests/aggregate/testconfig
@@ -1,2 +1,19 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 [include #{getenv MT_RUN_AREA_HOME}/common.testconfig]
 

Index: tests/dynamic-waiton-example/tests/genlib/testconfig
==================================================================
--- tests/dynamic-waiton-example/tests/genlib/testconfig
+++ tests/dynamic-waiton-example/tests/genlib/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dynamic-waiton-example/tests/results/testconfig
==================================================================
--- tests/dynamic-waiton-example/tests/results/testconfig
+++ tests/dynamic-waiton-example/tests/results/testconfig
@@ -1,2 +1,19 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 [include #{getenv MT_RUN_AREA_HOME}/common.testconfig]
 

Index: tests/dynamic-waiton-example/tests/setup/testconfig
==================================================================
--- tests/dynamic-waiton-example/tests/setup/testconfig
+++ tests/dynamic-waiton-example/tests/setup/testconfig
@@ -1,2 +1,19 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 [include #{getenv MT_RUN_AREA_HOME}/common.testconfig]
 

Index: tests/dynamic-waiton-example/tests/test1/testconfig
==================================================================
--- tests/dynamic-waiton-example/tests/test1/testconfig
+++ tests/dynamic-waiton-example/tests/test1/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/dynamic-waiton-example/tests/test2/testconfig
==================================================================
--- tests/dynamic-waiton-example/tests/test2/testconfig
+++ tests/dynamic-waiton-example/tests/test2/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/fdk.config
==================================================================
--- tests/fdktestqa/fdk.config
+++ tests/fdktestqa/fdk.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/Makefile
==================================================================
--- tests/fdktestqa/testqa/Makefile
+++ tests/fdktestqa/testqa/Makefile
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/README
==================================================================
--- tests/fdktestqa/testqa/README
+++ tests/fdktestqa/testqa/README
@@ -1,1 +1,18 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 set NUMTESTS to set the number of tests that will be run. A small number (say 20) illustrates itemwait well.

Index: tests/fdktestqa/testqa/configs/megatest.abc.config
==================================================================
--- tests/fdktestqa/testqa/configs/megatest.abc.config
+++ tests/fdktestqa/testqa/configs/megatest.abc.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/configs/megatest.def.config
==================================================================
--- tests/fdktestqa/testqa/configs/megatest.def.config
+++ tests/fdktestqa/testqa/configs/megatest.def.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/local.config.example
==================================================================
--- tests/fdktestqa/testqa/local.config.example
+++ tests/fdktestqa/testqa/local.config.example
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/megatest.config
==================================================================
--- tests/fdktestqa/testqa/megatest.config
+++ tests/fdktestqa/testqa/megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/runconfigs.config
==================================================================
--- tests/fdktestqa/testqa/runconfigs.config
+++ tests/fdktestqa/testqa/runconfigs.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/runsuite.sh
==================================================================
--- tests/fdktestqa/testqa/runsuite.sh
+++ tests/fdktestqa/testqa/runsuite.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/tests/alltop/testconfig
==================================================================
--- tests/fdktestqa/testqa/tests/alltop/testconfig
+++ tests/fdktestqa/testqa/tests/alltop/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/tests/bigrun/step1.sh
==================================================================
--- tests/fdktestqa/testqa/tests/bigrun/step1.sh
+++ tests/fdktestqa/testqa/tests/bigrun/step1.sh
@@ -1,6 +1,8 @@
 #!/bin/bash
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/tests/bigrun/testconfig
==================================================================
--- tests/fdktestqa/testqa/tests/bigrun/testconfig
+++ tests/fdktestqa/testqa/tests/bigrun/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/tests/bigrun2/step1.sh
==================================================================
--- tests/fdktestqa/testqa/tests/bigrun2/step1.sh
+++ tests/fdktestqa/testqa/tests/bigrun2/step1.sh
@@ -3,10 +3,12 @@
 # if [ -e $prev_test/testconfig ]; then
 #   exit 0
 # else
 #   exit 1
 # fi
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/tests/bigrun2/testconfig
==================================================================
--- tests/fdktestqa/testqa/tests/bigrun2/testconfig
+++ tests/fdktestqa/testqa/tests/bigrun2/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/tests/bigrun3/step1.sh
==================================================================
--- tests/fdktestqa/testqa/tests/bigrun3/step1.sh
+++ tests/fdktestqa/testqa/tests/bigrun3/step1.sh
@@ -3,10 +3,12 @@
 # if [ -e $prev_test/testconfig ]; then
 #   exit 0
 # else
 #   exit 1
 # fi
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fdktestqa/testqa/tests/bigrun3/testconfig
==================================================================
--- tests/fdktestqa/testqa/tests/bigrun3/testconfig
+++ tests/fdktestqa/testqa/tests/bigrun3/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/fixpath.csh
==================================================================
--- tests/fixpath.csh
+++ tests/fixpath.csh
@@ -1,1 +1,17 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
 setenv PATH `readlink -f ../bin`:$PATH

Index: tests/fixpath.sh
==================================================================
--- tests/fixpath.sh
+++ tests/fixpath.sh
@@ -1,1 +1,18 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 export PATH=$(readlink -f ../bin):$PATH

DELETED tests/fslsync/megatest.config
Index: tests/fslsync/megatest.config
==================================================================
--- tests/fslsync/megatest.config
+++ /dev/null
@@ -1,35 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[fields]
-YEAR    TEXT
-WEEKNUM TEXT
-DAY     TEXT
-
-[setup]
-# Adjust max_concurrent_jobs to limit how much you load your machines
-max_concurrent_jobs 50
-
-# This is your link path, you can move it but it is generally better to keep it stable
-linktree #{shell readlink -f #{getenv MT_RUN_AREA_HOME}/fslsynclinks}
-
-# Job tools are more advanced ways to control how your jobs are launched
-[jobtools]
-useshell yes
-launcher nbfind
-
-# As you run more tests you may need to add additional disks, the names are arbitrary but must be unique
-[disks]
-disk0 #{shell readlink -f #{getenv MT_RUN_AREA_HOME}/fslsyncruns}

DELETED tests/fslsync/runconfigs.config
Index: tests/fslsync/runconfigs.config
==================================================================
--- tests/fslsync/runconfigs.config
+++ /dev/null
@@ -1,20 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[default]
-WORKAREA /tmp/#{getenv USER}/fslsync
-FSLSAREA /tmp/#{getenv USER}/fsls
-AREANAMES code data
-SITENAMES #{shell cat $MT_RUN_AREA_HOME/sites.dat}

DELETED tests/fslsync/sites.dat.template
Index: tests/fslsync/sites.dat.template
==================================================================
--- tests/fslsync/sites.dat.template
+++ /dev/null
@@ -1,1 +0,0 @@
-site1

DELETED tests/fslsync/tests/setup/mkdirs.logpro
Index: tests/fslsync/tests/setup/mkdirs.logpro
==================================================================
--- tests/fslsync/tests/setup/mkdirs.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "done" #/done/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/)) ;; but disallow any other errors

DELETED tests/fslsync/tests/setup/mkdirs.sh
Index: tests/fslsync/tests/setup/mkdirs.sh
==================================================================
--- tests/fslsync/tests/setup/mkdirs.sh
+++ /dev/null
@@ -1,26 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Create needed directories both local and remote
-
-# Remote
-ssh $SITENAME mkdir -vp $WORKAREA/$SITENAME/$AREANAME
-
-# Local
-mkdir -vp $WORKAREA/$SITENAME/$AREANAME
-
-echo done

DELETED tests/fslsync/tests/setup/seedcache.logpro
Index: tests/fslsync/tests/setup/seedcache.logpro
==================================================================
--- tests/fslsync/tests/setup/seedcache.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "done" #/done/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/)) ;; but disallow any other errors

DELETED tests/fslsync/tests/setup/seedcache.sh
Index: tests/fslsync/tests/setup/seedcache.sh
==================================================================
--- tests/fslsync/tests/setup/seedcache.sh
+++ /dev/null
@@ -1,21 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Copy any non-existant files to the cache before doing the rsync 
-# in the hopes of saving some time.
-
-echo done

DELETED tests/fslsync/tests/setup/testconfig
Index: tests/fslsync/tests/setup/testconfig
==================================================================
--- tests/fslsync/tests/setup/testconfig
+++ /dev/null
@@ -1,36 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-mkdirs     mkdirs.sh
-seedcache  seedcache.sh
-
-# Test requirements are specified here
-[requirements]
-priority 0
-
-# Iteration for your tests are controlled by the items section
-[items]
-AREANAME #{getenv AREANAMES}
-SITENAME #{getenv SITENAMES}
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Setup needed directories and seed the caches
-tags tagone,tagtwo
-reviewed never

DELETED tests/fslsync/tests/sync/fsync.logpro
Index: tests/fslsync/tests/sync/fsync.logpro
==================================================================
--- tests/fslsync/tests/sync/fsync.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "done" #/done/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/)) ;; but disallow any other errors

DELETED tests/fslsync/tests/sync/fsync.sh
Index: tests/fslsync/tests/sync/fsync.sh
==================================================================
--- tests/fslsync/tests/sync/fsync.sh
+++ /dev/null
@@ -1,48 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Get the list of fossils from the cache
-
-FILES=$(ls $FSLSAREA/$AREANAME|grep fossil)
-
-# Do the remote sync from CACHE to FOSSILS
-ssh $SITENAME /bin/bash <<EOF
-for f in $FILES;do
-    FOSSLF=$FSLSAREA/$AREANAME/\$f
-    CACHEF=$WORKAREA/$SITENAME/
-    if [ ! -e \$FOSSLF ];then
-	cp \$CACHEF \$FOSSLF
-	chmod ug+rw \$FOSSLF
-    elif [ \$CACHEF -nt \$FOSSLF ];then
-	fossil pull -R \$FOSSLF \$CACHEF
-    fi
-done
-EOF 
-
-# Do the local sync 
-for f in $FILES;do
-    FOSSLF=$FSLSAREA/$AREANAME/\$f
-    CACHEF=$WORKAREA/$SITENAME/
-    if [ ! -e \$FOSSLF ];then
-	cp \$CACHEF \$FOSSLF
-	chmod ug+rw \$FOSSLF
-    elif [ \$CACHEF -nt \$FOSSLF ];then
-	fossil pull -R \$FOSSLF \$CACHEF
-    fi
-done
-
-echo done

DELETED tests/fslsync/tests/sync/rsync.logpro
Index: tests/fslsync/tests/sync/rsync.logpro
==================================================================
--- tests/fslsync/tests/sync/rsync.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "done" #/done/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/)) ;; but disallow any other errors

DELETED tests/fslsync/tests/sync/rsync.sh
Index: tests/fslsync/tests/sync/rsync.sh
==================================================================
--- tests/fslsync/tests/sync/rsync.sh
+++ /dev/null
@@ -1,26 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Sync to remote cache
-rsync -avz $FSLSAREA/$AREANAME/ $SITENAME:$WORKAREA/$SITENAME/$AREANAME/ &
-# Sync to local cache
-rsync -avz $SITENAME:$FSLSAREA/$AREANAME/ $WORKAREA/$SITENAME/$AREANAME/ &
-
-# Wait until rsyncs complete
-wait
-
-echo done

DELETED tests/fslsync/tests/sync/testconfig
Index: tests/fslsync/tests/sync/testconfig
==================================================================
--- tests/fslsync/tests/sync/testconfig
+++ /dev/null
@@ -1,37 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-rsync rsync.sh
-fsync fsync.sh
-
-# Test requirements are specified here
-[requirements]
-waiton setup
-priority 0
-
-# Iteration for your tests are controlled by the items section
-[items]
-AREANAME #{getenv AREANAMES}
-SITENAME #{getenv SITENAMES}
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Sync fossils to remote
-tags tagone,tagtwo
-reviewed never

DELETED tests/fullrun/afs.config
Index: tests/fullrun/afs.config
==================================================================
--- tests/fullrun/afs.config
+++ /dev/null
@@ -1,1 +0,0 @@
-TESTSTORUN priority_6 sqlitespeed/ag

DELETED tests/fullrun/common_runconfigs.config
Index: tests/fullrun/common_runconfigs.config
==================================================================
--- tests/fullrun/common_runconfigs.config
+++ /dev/null
@@ -1,32 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[default]
-FOOBARBAZZZZ not a useful value
-BIGBOB $FOOBARBAZZZZ/bobby
-FREDDY $sysname/$fsname
-TOMMY  [system pwd]
-
-[/tmp/mrwellan/env/ubuntu/afs]
-BOGOUS Bob
-
-[default/ubuntu/nfs]
-CURRENT     /blah
-ALT_VAR we should not see this one
-
-[ubuntu/nfs/none]
-CURRENT     /tmp/nada
-UNIQUEVAR   this one should be set
-

DELETED tests/fullrun/configs/mt_include_1.config
Index: tests/fullrun/configs/mt_include_1.config
==================================================================
--- tests/fullrun/configs/mt_include_1.config
+++ /dev/null
@@ -1,38 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-# exectutable /path/to/megatest
-max_concurrent_jobs 250
-
-linktree #{getenv MT_RUN_AREA_HOME}/tmp/mt_links
-
-[jobtools]
-useshell yes
-# ## launcher launches jobs, the job is managed on the target host
-## by megatest, comment out launcher to run local
-# workhosts localhost hermes
-# launcher exec nbfake
-
-launcher nbfake
-# launcher echo
-
-# launcher nbfind
-# launcher nodanggood
-
-## use "xterm -e csi -- " as a launcher to examine the launch environment.
-## exit with (exit)
-## get a shell with (system "bash")
-# launcher xterm -e csi --

DELETED tests/fullrun/configs/mt_include_2.config
Index: tests/fullrun/configs/mt_include_2.config
==================================================================
--- tests/fullrun/configs/mt_include_2.config
+++ /dev/null
@@ -1,17 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[disks]
-disk0 #{scheme (create-directory "#{getenv MT_RUN_AREA_HOME}/tmp/mt_runs" #t)}

DELETED tests/fullrun/ez_pass_linked/testconfig
Index: tests/fullrun/ez_pass_linked/testconfig
==================================================================
--- tests/fullrun/ez_pass_linked/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[ezsteps]
-lookittmp   ls /tmp
-lookithome  ls /home
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass, no logpro file.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/megatest.config
Index: tests/fullrun/megatest.config
==================================================================
--- tests/fullrun/megatest.config
+++ /dev/null
@@ -1,326 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[fields]
-sysname TEXT
-fsname TEXT
-datapath TEXT
-
-[graph]
-g1 sqlite3:../../example.db alldat event_time var val stuff
-
-# refareas can be searched to find previous runs
-# the path points to where megatest.db exists
-[refareas]
-area1 /tmp/oldarea/megatest
-
-[include ./configs/mt_include_1.config]
-
-[dashboard]
-# pre-command  xterm -geometry 180x20 -e "
-# post-command |& tee results.log ;echo Press any key to continue;bash -c 'read -n 1 -s'" &
-testsort -event_time
-
-[misc]
-home #{shell readlink -f $MT_RUN_AREA_HOME}
-parent #{shell readlink -f $MT_RUN_AREA_HOME/..}
-testsuite #{shell basename $MT_RUN_AREA_HOME}
-
-[tests-paths]
-1 #{get misc parent}/simplerun/tests
-
-[setup]
-
-# turn off faststart, put monitor.db in MT_RUN_AREA_HOME/db
-# and set the dbdir to /var/tmp/$USER/mt_db to enable keeping
-# the raw db in /var/tmp/$USER
-#
-faststart  no
-monitordir #{getenv MT_RUN_AREA_HOME}/db
-dbdirdefn  /tmp/#{getenv USER}/#{getenv MT_TESTSUITE_NAME}/db
-dbdirmkdir #{scheme (create-directory "#{get setup dbdirdefn}" #t)}
-dbdir      #{get setup dbdirdefn}
-
-# sync more aggressively to megatest-db
-megatest-db yes
-
-# Set launchwait to no to use the more agressive code that does not wait for the launch to complete before proceeding
-# this may save a few milliseconds on launching tests
-# launchwait no
-waivercommentpatt ^WW\d+ [a-z].*
-incomplete-timeout 1
-
-# wait 0.5 seconds between launching every process
-#
-# launch-delay 0.5
-launch-delay 0
-
-
-# wait for runs to completely complete. yes, anything else is no
-run-wait yes
-
-# If set to "default" the old code is used. Otherwise defaults to 200 or uses
-# numeric value given.
-#
-runqueue 20
-
-# Default runtimelim 1d 1h 1m 10s
-#
-runtimelim 20m
-
-# Deadtime - when to consider tests dead (i.e. haven't heard from them in too long)
-# Number in seconds, set to 20 seconds here to trigger a little trouble. Default is
-# 1800
-#
-deadtime 600
-
-# It is possible (but not recommended) to override the rsync command used
-# to populate the test directories. For test development the following 
-# example can be useful
-#
-testcopycmd cp --remove-destination -rsv TEST_SRC_PATH/. TEST_TARG_PATH/. >> TEST_TARG_PATH/mt_launch.log 2>> TEST_TARG_PATH/mt_launch.log
-
-# or for hard links
-
-# testcopycmd cp --remove-destination -rlv TEST_SRC_PATH/. TEST_TARG_PATH/.
-
-# FULL or 2, NORMAL or 1, OFF or 0
-synchronous 0
-# Throttle roughly scales the db access milliseconds to seconds delay
-throttle 0.2
-# Max retries allows megatest to re-check that a tests status has changed
-# as tests can have transient FAIL status occasionally
-maxretries 20
-
-# Setup continued.
-[setup]
-
-# override the logview command
-#
-logviewer (%MTCMD%) 2> /dev/null > /dev/null
-
-# override the html viewer launch command
-#
-# htmlviewercmd firefox -new-window 
-htmlviewercmd arora
-
-# -runtests automatically deletes the records for tests with the listed states on starting up a run allowing them to re-run
-#     (nb// this is in addition to NOT_STARTED which is automatically re-run)
-# format is STATE/STATUS
-allow-auto-rerun /INCOMPLETE /ZERO_ITEMS
-# could add: STUCK STUCK/DEAD UNKNOWN KILLED KILLREQ PREQ_DISCARD
-
-[validvalues]
-state start end 0 1 - 2
-status pass fail n/a 0 1 running - 2
-
-# These are set before all tests, override them 
-# in the testconfig [pre-launch-env-overrides] section
-[env-override]
-
-
-ALL_TOPLEVEL_TESTS          exit_0 exit_1  ez_exit2_fail  ez_fail        ez_pass              ezlog_fail \
-       ezlog_fail_then_pass ezlog_pass     ezlog_warn     lineitem_fail  lineitem_pass        logpro_required_fail \
-       manual_example       neverrun       priority_1     priority_10    priority_10_waiton_1 \
-       priority_3           priority_4     priority_5     priority_6     priority_7           priority_8 \
-       priority_9           runfirst       singletest     singletest2    sqlitespeed          test_mt_vars \
-       ez_fail_quick        test1          test2
-
-# This variable is honored by the loadrunner script. The value is in percent
-MAX_ALLOWED_LOAD 200
-
-# MT_XTERM_CMD overrides the terminal command
-# MT_XTERM_CMD xterm -bg lightgreen -fg black
-
-SPECIAL_ENV_VARS overide them here - should be seen at launch and in the runs
-TESTVAR [system readlink -f .]
-DEADVAR [system ls]
-VARWITHDOLLAR $HOME/.zshrc
-WACKYVAR  #{system ls > /dev/null}
-WACKYVAR2 #{get validvalues state}
-WACKYVAR3 #{getenv USER}
-WACKYVAR4 #{scheme (+ 5 6 7)}
-WACKYVAR5 #{getenv sysname}/#{getenv fsname}/#{getenv datapath}
-WACKYVAR6 #{scheme (args:get-arg "-target")}
-PREDICTABLE the_ans
-MRAH MT_RUN_AREA_HOME=#{getenv MT_RUN_AREA_HOME}
-# The empty var should have a definition with null string
-EMPTY_VAR
-
-WRAPPEDVAR This var should have the work blah thrice: \
-blah \
-blah
-
-MYRUNNAME1 /this/is/#{getenv MT_RUNNAME}/my/runname
-MYRUNNAME2 /this/is/[system echo $MT_RUNNAME]/my/runname
-
-
-# XTERM   [system xterm]
-# RUNDEAD [system exit 56]
-
-[server]
-
-# force use of server always
-# required yes
-
-# Use http instead of direct filesystem access
-transport http
-# transport fs
-# transport nmsg
-
-synchronous 0
-
-# If the server can't be started on this port it will try the next port until
-# it succeeds
-port 9080
-
-# This server will keep running this number of hours after last access. 
-# Three minutes is 0.05 hours
-# timeout 0.025
-timeout 0.01
-
-# faststart; unless no, start server but proceed with writes until server started
-# faststart no
-faststart yes
-
-# Start server when average query takes longer than this
-# server-query-threshold 55500
-server-query-threshold 1000
-
-# daemonize yes
-# hostname #{scheme (get-host-name)}
-
-## disks are:
-## name host:/path/to/area
-## -or-
-## name /path/to/area
-[disks]
-disk0 /foobarbazz
-disk1 not-a-disk
-
-[include ./configs/mt_include_2.config]
-
-[include #{getenv USER}_testing.config]
-
-[jobgroups]
-
-# NOTE: job groups will falsely count the toplevel test as a job. If possible add N
-#       to your jobgroups where N is the number of parallel runs you are likely to see
-#      
-sqlite3 6
-blockz  10
-#       to your jobgroups where N is the number of parallel runs you are likely to see
-#       
-
-#======================================================================
-# Machine flavors
-#
-#   These specify lists of hosts or scripts to use or call for various
-#   flavors of task.
-#
-#======================================================================
-
-[flavors]
-
-plain hosts: xena, phoebe
-strong command: NBFAKE_HOST=zeus nbfake
-arm hosts: cubian
-
-[archive]
-
-# where to get bup executable
-# bup /path/to/bup
-
-# use machines of these flavor
-useflavors plain
-targsize 2G
-
-# minimum space required on an archive disk before allowing archiving to start (MB)
-minspace 10
-
-[archive-disks]
-
-# Archives will be organised under these paths like this:
-#  <testsuite>/<creationdate>
-# Within the archive the data is structured like this:
-#  <target>/<runname>/<test>/
-disk0 /tmp/#{getenv USER}/adisk1
-disk1 /mfs/tmp/archive
-
-# Uncomment these to emulate a job queue with a long time (look in bin/sleeprunner for the time)
-[jobtools]
-launcher #{scheme (case (string->symbol (conc (getenv "datapath"))) \
-                         ((none) "nbfake") \
-                         ((openlava) "bsub -o $MT_LINKTREE/$MT_TARGET/$MT_RUNNAME.$MT_TESTNAME-$MT_ITEM_PATH.log") \
-                         ((sleeprunner) "sleeprunner") \
-                         (else "nbfake"))}
-
-# launcher bsub -q priority -o $MT_TEST_RUN_DIR/openlava.log 
-
-# launcher #{ shell if which bsub > /dev/null;then echo bsub -q priority -o openlava.log;else echo sleeprunner;fi}
-# launcher nbfake
-maxload 1.1
-maxhomehostload 1.1
-
-[configf:settings trim-trailing-spaces yes]
-
-# Override the rollup for specific tests
-[testrollup]
-runfirst ls
-
-[test]
-# VAL1 has trailing spaces
-VAL1 Foo    
-VAL2 ==>#{get test VAL1}Bar<== no spaces between Foo and Bar to pass
-
-ltest #{scheme (case (string->symbol (conc (getenv "datapath"))) \
-                        ((none) "nbfake") \
-                        ((openlava) "bsub -o $MT_LINKTREE/$MT_TARGET/$MT_RUNNAME.$MT_TESTNAME-$MT_ITEM_PATH.log") \
-                        (else "sleeprunner"))}
-
-#================================================================
-# Flexi-launcher
-#================================================================
-#
-# [host-types]
-# general ssh #{getbgesthost general}
-# nbgeneral nbjob run JOBCOMMAND -log $MT_LINKTREE/$MT_TARGET/$MT_RUNNAME.$MT_TESTNAME-$MT_ITEM_PATH.lgo
-# 
-# [hosts]
-# general cubian xena
-# 
-# [launchers]
-# envsetup general
-# xor/%/n 4C16G
-# % nbgeneral
-# 
-# [jobtools]
-# launcher bsub
-# # if defined and not "no" flexi-launcher will bypass launcher unless there is no
-# # match.
-# flexi-launcher yes  
-
-[jobtools]
-flexi-launcher yes
-
-[host-types]
-general nbfake
-alt     #{get jobtools launcher}
-local   nbfake
-remote  #{get jobtools launcher}
-
-[launchers]
-runfirst/sum% remote
-%             general

DELETED tests/fullrun/multi-dboard-load-all.scm
Index: tests/fullrun/multi-dboard-load-all.scm
==================================================================
--- tests/fullrun/multi-dboard-load-all.scm
+++ /dev/null
@@ -1,13 +0,0 @@
-
-(require-library margs)
-(load "../../common.scm")
-(load "../../common_records.scm")
-(load "../../margs.scm")
-(load "../../megatest-version.scm")
-(load "../../portlogger.scm")
-(load "../../tasks.scm")
-(load "../../db.scm")
-(load "../../configf.scm")
-(load "../../keys.scm")
-(load "../../tree.scm")
-(load "../../multi-dboard.scm")

DELETED tests/fullrun/multi-dboard.sh
Index: tests/fullrun/multi-dboard.sh
==================================================================
--- tests/fullrun/multi-dboard.sh
+++ /dev/null
@@ -1,45 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-if [[ ! -e "$HOME/.megatest" ]];then
-   mkdir -p "$HOME/.megatest"
-fi
-# if [[ ! -e "$HOME/.megatest/areas.dat" ]];then
-#    echo "Creating some placeholder files in ~/.megatest"
-#    cat > "$HOME/.megatest/areas.dat" << EOF
-# [default]
-# mfstest /mfs/matt/data/megatest/tests/fullrun
-# mfsbig /mfs/matt/data/megatest/tests/fdktestqa/testqa
-# [local]
-# localtest /home/matt/data/megatest/tests/fullrun
-# EOF
-# fi
-if [[ ! -e "$HOME/.megatest/default.dat" ]];then
-   cat > "$HOME/.megatest/default.dat" << EOF
-[fullrun]
-path /mfs/matt/data/megatest/tests/fullrun
-order 1
-# [bigrun]
-# path /mfs/matt/data/megatest/tests/fdktestqa/testqa
-# order 2
-# [local_fullrun]
-# path /home/matt/data/megatest/tests/fullrun
-# order 3
-EOF
-fi
-
-csi -I ../.. multi-dboard-load-all.scm

DELETED tests/fullrun/nfs.config
Index: tests/fullrun/nfs.config
==================================================================
--- tests/fullrun/nfs.config
+++ /dev/null
@@ -1,1 +0,0 @@
-TESTSTORUN priority_4 test_mt_vars

DELETED tests/fullrun/run-each-proc.sh
Index: tests/fullrun/run-each-proc.sh
==================================================================
--- tests/fullrun/run-each-proc.sh
+++ /dev/null
@@ -1,30 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-for x in `cat all-db-procs.txt`;do
-  cat > ~/.megatestrc <<EOF
-(require-library trace)
-(import trace)
-(trace
-$x
-)
-EOF
-  fname=`echo "$x" | tr ':!>' '-_g'`
-  megatest -runtests sqlitespeed,test2,ez% -target ubuntu/nfs/none :runname $fname > $fname.log
-done 
-
-

DELETED tests/fullrun/runconfigs.config
Index: tests/fullrun/runconfigs.config
==================================================================
--- tests/fullrun/runconfigs.config
+++ /dev/null
@@ -1,74 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[default]
-SOMEVAR This should show up in SOMEVAR3
-VARNOVAL
-VARNOVAL_WITHSPACE
-QUICKPATT test_mt_vars,test2,priority_9
-
-# target based getting of config file, look at afs.config and nfs.config
-[include #{getenv fsname}.config]
-
-[include #{getenv MT_RUN_AREA_HOME}/common_runconfigs.config]
-
-# #{system echo 'VACKYVAR #{shell pwd}' > $MT_RUN_AREA_HOME/configs/$USER.config}
-[include ./configs/#{getenv USER}.config]
-
-
-WACKYVAR0 #{get ubuntu/nfs/none CURRENT}
-WACKYVAR1 #{scheme (args:get-arg "-target")}
-
-[default/ubuntu/nfs]
-WACKYVAR2 #{runconfigs-get CURRENT}
-
-[ubuntu/nfs/none]
-WACKYVAR2 #{runconfigs-get CURRENT}
-SOMEVAR2  This should show up in SOMEVAR4 if the target is ubuntu/nfs/none
-VARWITHDOLLARSIGNS The$USER/signs/should/be/replaced/with/variable
-
-[default]
-SOMEVAR3 #{rget SOMEVAR}
-SOMEVAR4 #{rget SOMEVAR2}
-SOMEVAR5 #{runconfigs-get SOMEVAR2}
-
-[ubuntu/nfs/all_toplevel]
-TESTPATT all_toplevel
-
-[this/a/test]
-BLAHFOO 123
-
-[ubuntu/nfs/sleep1]
-SLEEPRUNNER 1
-
-[ubuntu/nfs/sleep10]
-SLEEPRUNNER 10
-
-[ubuntu/nfs/sleep60]
-SLEEPRUNNER 60
-
-[ubuntu/nfs/sleep240]
-SLEEPRUNNER 240
-
-[v1.63/tip/dev]
-QUICKPATT %/desert,%/ae
-# OTHER_PATT foo%/desert,%/ae
-
-# [v1.63/%/%]
-# QUICKPATT %/desert,%/ae
-
-[nada/foo/bar]
-junk foo
-

DELETED tests/fullrun/test-teamcity-run.sh
Index: tests/fullrun/test-teamcity-run.sh
==================================================================
--- tests/fullrun/test-teamcity-run.sh
+++ /dev/null
@@ -1,20 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(cd ../..;make install) && RN=tcmt_m;megatest -remove-runs -target ubuntu/nfs/none -runname tcmt_m -testpatt %;\
-    tcmt -run -target ubuntu/nfs/none -runname tcmt_m -testpatt % -rerun-clean 2>&1 | tee all.log | grep teamcity | tee teamcity.log
-

DELETED tests/fullrun/tests/all_toplevel/calcresults.logpro
Index: tests/fullrun/tests/all_toplevel/calcresults.logpro
==================================================================
--- tests/fullrun/tests/all_toplevel/calcresults.logpro
+++ /dev/null
@@ -1,155 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-(define logbody "LogFileBody")
-
-(define pass-specs '( ;; testname num-expected max-runtime
-		     ("exit_0"		        1  20)
-		     ("ezlog_fail_then_pass"    1  20)
-		     ("ezlog_pass"	        1  20)
-		     ("ez_pass"		        1  20)
-		     ("lineitem_pass"	        1  20)
-		     ("priority_1"	        1  20)
-		     ("priority_10"	        1  20)
-		     ("priority_10_waiton_1"    1  20)
-		     ("priority_3"	        1  20)
-		     ("priority_4"	        1  20)
-		     ;; ("priority_5"	        1  20)
-		     ("priority_6"	        1  20)
-;;		     ("priority_7"	        1  20)
-		     ("priority_8"	        1  20)
-		     ("priority_9"	        1  20)
-		     ("runfirst"	        7  20)
-		     ("singletest"	        1  20)
-		     ("singletest2"	        1  20)
-		     ("special"		        1  20)
-		     ("sqlitespeed"	       10  20)
-		     ("test1"		        1  20)
-		     ("test2"		        6  20)
-		     ("test_mt_vars"	        6  20)
-		     ))
-
-(define fail-specs '( ;; testname num-expected max-runtime
-		     ("exit_1"		        1  20)
-		     ("ez_exit2_fail"           1  20)
-		     ("ez_fail"		        1  20)
-		     ("ez_fail_quick"	        1  20)
-		     ("ezlog_fail"	        1  20)
-		     ("lineitem_fail"	        1  20)
-		     ("logpro_required_fail"    1  20)
-		     ("manual_example"	        1  20)
-		     ("neverrun"	        1  20)))
-		     
-(define warn-specs   '(("ezlog_warn"	        1  20)))
-
-(define nost-specs   '(("wait_no_items1"        1  20)
-		       ("wait_no_items2"        1  20)
-		       ("wait_no_items3"        1  20)
-		       ("wait_no_items4"        1  20)
-		       ;; ("no_items"              1  20)
-		       ))
-
-(define (check-one-test estate estatus testname count runtime)
-   (let* ((rxe      (regexp (conc "^\\s+Test: " testname "(\\(.*|\\s+)\\s+State: " estate "\\s+Status: " estatus "\\s+Runtime:\\s+(\\d+)s")))
-	  (msg1     (conc testname " expecting count of " count))
-	  (msg2     (conc testname " expecting runtime less than " runtime)))
-     (expect:required in logbody = count msg1 rxe)
-     ;;(expect:value    in logbody count < msg2 rxe)
-     ))
-
-;; Special cases
-;;
-(expect:ignore   in logbody >= 0  "db_sync test might not have run"  #/Test: db_sync/)
-(expect:ignore   in logbody >= 0  "all_toplevel may not yet be done" #/Test: all_toplevel/)
-(expect:error    in logbody =  0  "tests left in RUNNING state"      #/State: RUNNING/)
-(expect:required in logbody =  1  "priority_2 is KILLED"             #/Test: priority_2\s+State: KILLED\s+Status: KILLED/)
-(expect:required in logbody =  1  "priority_5 is either PASS or SKIP" #/Test: priority_5\s+State: COMPLETED\s+Status: (SKIP|PASS)/)
-(expect:required in logbody =  1  "priority_7 is either PASS or SKIP" #/Test: priority_7\s+State: COMPLETED\s+Status: (SKIP|PASS)/)
-(expect:required in logbody =  1  "testxz has 1 NOT_STARTED test"    #/Test: testxz\s+State: NOT_STARTED/)
-(expect:required in logbody =  1  "no items"                         #/Test: no_items\s+State: NOT_STARTED\s+Status: ZERO_ITEMS/)
-(expect:warning  in logbody =  1  "dynamic waiton"                   #/Test: dynamic_waiton/)
-(expect:required in logbody = 29  "blocktestxz has 29 tests"         #/Test: blocktestxz/)
-
-;; General cases
-;;
-(for-each 
- (lambda (testdat)
-   (apply check-one-test "COMPLETED" "PASS" testdat))
- pass-specs)
-
-(for-each 
- (lambda (testdat)
-   (apply check-one-test "COMPLETED" "FAIL" testdat))
- fail-specs)
-
-(for-each 
- (lambda (testdat)
-   (apply check-one-test "COMPLETED" "WARN" testdat))
- warn-specs)
-
-(for-each 
- (lambda (testdat)
-   (apply check-one-test "NOT_STARTED" "PREQ_DISCARDED" testdat))
- nost-specs)
-
-;; Catch all.
-;;
-(expect:error    in logbody = 0   "Tests not accounted for"     #/Test: /)
-
-
-;; ;; define your hooks
-;; (hook:first-error   "echo \"Error hook activated: #{escaped errmsg}\"")
-;; (hook:first-warning "echo \"Got warning: #{escaped warnmsg}\"")
-;; (hook:value "echo \"Value hook activated: expected=#{expected}, measured=#{measured}, tolerance=#{tolerance}, message=#{message}\"")
-;; 
-;; ;; first ensure your run at least started
-;; ;;
-;; (trigger "Init"     #/This is a header/)
-;; (trigger "InitEnd"  #/^\s*$/)
-;; (section "Init" "Init" "InitEnd")
-;; 
-;; (trigger "Body"     #/^.*$/) ;; anything starts the body
-;; ;; (trigger "EndBody"  #/This had better never match/)
-;; 
-;; (section "Body"     "Body" "EndBody")
-;; 
-;; (trigger "Blah2"    #/^begin Blah2/)
-;; (trigger "Blah2End" #/^end Blah2/)
-;; (section "Blah2"    "Blah2" "Blah2End")
-;; 
-;; (expect:required in "Init"  = 1 "Header"      #/This is a header/)
-;; (expect:required in "LogFileBody" > 0 "Something required but not found" #/This is required but not found/)
-;; (expect:value    in "LogFileBody" 1.9 0.1 "Output voltage" #/Measured voltage output:\s*([\d\.\+\-e]+)v/)
-;; (expect:value    in "LogFileBody" 0.5 0.1 "Output current" #/Measured output current:\s*([\d\.\+\-e]+)mA/)
-;; (expect:value    in "LogFileBody" 110e9 2e9 "A big number (first)" #/Freq:\s*([\d\.\+\-e]+)\s+Hz/)
-;; (expect:value    in "LogFileBody" 110e9 1e9 "A big number (second), hook not called" #/Freq:\s*([\d\.\+\-e]+)Hz/)
-;; (expect:value    in "LogFileBody" 110e9 1e9 "A big number (never activated)" #/Freq:\s*([\d\.\+\-e]+)zH/)
-;; 
-;; ;; Using match number
-;; (expect:value    in "LogFileBody" 1.9 0.1 "Time Voltage" #/out: (\d+)\s+(\d+)/ match: 2)
-;; 
-;; ;; Comparison instead of tolerance
-;; (expect:value    in "LogFileBody" 1.9 >   "Time voltage" #/out: (\d+)\s+(\d+)/ match: 2)
-;; 
-;; (expect:ignore   in "Blah2" < 99 "FALSE ERROR" #/ERROR/)
-;; (expect:ignore   in "Body"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-;; (expect:warning  in "Body"  = 0 "Any warning" #/WARNING/)
-;; (expect:error    in "Body"  = 0 "ERROR BLAH"  (list #/ERROR/ #/error/)) ;; but disallow any other errors
-;; 
-;; ;(expect in "Init"  < 1 "Junk"        #/This is bogus/)

DELETED tests/fullrun/tests/all_toplevel/testconfig
Index: tests/fullrun/tests/all_toplevel/testconfig
==================================================================
--- tests/fullrun/tests/all_toplevel/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[ezsteps]
-calcresults megatest -list-runs $MT_RUNNAME -target $MT_TARGET
-check_triggers  cat $MT_RUN_AREA_HOME/triggers_$MT_RUNNAME.dat
-
-[logpro]
-check_triggers ;;
-  (expect:error in "LogFileBody" = 0 "No errors" #/error/i)
-
-[requirements]
-waiton  #{getenv ALL_TOPLEVEL_TESTS}
-
-# This is a "toplevel" test, it does not require waitons to be non-FAIL to run
-mode toplevel

DELETED tests/fullrun/tests/blocktestxz/main.sh
Index: tests/fullrun/tests/blocktestxz/main.sh
==================================================================
--- tests/fullrun/tests/blocktestxz/main.sh
+++ /dev/null
@@ -1,21 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-$MT_MEGATEST -test-status :state $THESTATE :status $THESTATUS -setlog "nada.html"
-
-# By exiting with non-zero we tell Megatest to preseve the state and status
-exit 1

DELETED tests/fullrun/tests/blocktestxz/testconfig
Index: tests/fullrun/tests/blocktestxz/testconfig
==================================================================
--- tests/fullrun/tests/blocktestxz/testconfig
+++ /dev/null
@@ -1,37 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[items]
-THESTATE UNKNOWN INCOMPLETE KILLED KILLREQ STUCK BOZZLEBLONKED STUCK/DEAD
-THESTATUS PASS FAIL STUCK/DEAD SKIP
-
-[requirements]
-waiton sqlitespeed
-
-[test_meta]
-author matt
-owner  bob
-description This test will fail causing the dependent test "testxz"\
- to never run. This triggers the code that must determine\
- that a test will never be run and thus remove it from\
- the queue of tests to be run.
-
-tags first,single
-reviewed 1/1/1965
-
-jobgroup blockz

DELETED tests/fullrun/tests/db_sync/calcresults.logpro
Index: tests/fullrun/tests/db_sync/calcresults.logpro
==================================================================
--- tests/fullrun/tests/db_sync/calcresults.logpro
+++ /dev/null
@@ -1,59 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-;; ;; define your hooks
-;; (hook:first-error   "echo \"Error hook activated: #{escaped errmsg}\"")
-;; (hook:first-warning "echo \"Got warning: #{escaped warnmsg}\"")
-;; (hook:value "echo \"Value hook activated: expected=#{expected}, measured=#{measured}, tolerance=#{tolerance}, message=#{message}\"")
-;; 
-;; ;; first ensure your run at least started
-;; ;;
-;; (trigger "Init"     #/This is a header/)
-;; (trigger "InitEnd"  #/^\s*$/)
-;; (section "Init" "Init" "InitEnd")
-;; 
-;; (trigger "Body"     #/^.*$/) ;; anything starts the body
-;; ;; (trigger "EndBody"  #/This had better never match/)
-;; 
-;; (section "Body"     "Body" "EndBody")
-;; 
-;; (trigger "Blah2"    #/^begin Blah2/)
-;; (trigger "Blah2End" #/^end Blah2/)
-;; (section "Blah2"    "Blah2" "Blah2End")
-;; 
-;; (expect:required in "Init"  = 1 "Header"      #/This is a header/)
-;; (expect:required in "LogFileBody" > 0 "Something required but not found" #/This is required but not found/)
-;; (expect:value    in "LogFileBody" 1.9 0.1 "Output voltage" #/Measured voltage output:\s*([\d\.\+\-e]+)v/)
-;; (expect:value    in "LogFileBody" 0.5 0.1 "Output current" #/Measured output current:\s*([\d\.\+\-e]+)mA/)
-;; (expect:value    in "LogFileBody" 110e9 2e9 "A big number (first)" #/Freq:\s*([\d\.\+\-e]+)\s+Hz/)
-;; (expect:value    in "LogFileBody" 110e9 1e9 "A big number (second), hook not called" #/Freq:\s*([\d\.\+\-e]+)Hz/)
-;; (expect:value    in "LogFileBody" 110e9 1e9 "A big number (never activated)" #/Freq:\s*([\d\.\+\-e]+)zH/)
-;; 
-;; ;; Using match number
-;; (expect:value    in "LogFileBody" 1.9 0.1 "Time Voltage" #/out: (\d+)\s+(\d+)/ match: 2)
-;; 
-;; ;; Comparison instead of tolerance
-;; (expect:value    in "LogFileBody" 1.9 >   "Time voltage" #/out: (\d+)\s+(\d+)/ match: 2)
-;; 
-;; (expect:ignore   in "Blah2" < 99 "FALSE ERROR" #/ERROR/)
-;; (expect:ignore   in "Body"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-;; (expect:warning  in "Body"  = 0 "Any warning" #/WARNING/)
-;; (expect:error    in "Body"  = 0 "ERROR BLAH"  (list #/ERROR/ #/error/)) ;; but disallow any other errors
-;; 
-;; ;(expect in "Init"  < 1 "Junk"        #/This is bogus/)

DELETED tests/fullrun/tests/db_sync/dbdelta.scm
Index: tests/fullrun/tests/db_sync/dbdelta.scm
==================================================================
--- tests/fullrun/tests/db_sync/dbdelta.scm
+++ /dev/null
@@ -1,44 +0,0 @@
-
-(use sql-de-lite)
-
-(define megatest.db (conc (get-environment-variable "MT_RUN_AREA_HOME") "/megatest.db"))
-
-(define runsquery "sysname||'/'||fsname||'/'||datapath||'/'||runname||'/'||runs.state||'-'||runs.status") 
-(define bigquery
-  (conc 
-   "SELECT " runsquery "||testname||'/'||item_path||'-'||'-'||tests.state||'-'||tests.status||'-'||runs.id AS outdat FROM runs INNER JOIN tests ON runs.id=tests.run_id WHERE runs.state NOT LIKE 'deleted' AND tests.state NOT LIKE 'deleted' AND testname NOT LIKE 'db_sync' ORDER BY outdat ASC ;"))
-
-(print "Creating file for legacy db")
-(with-output-to-file "legacy-db-dump"
-  (lambda ()
-    (let ((db (open-database megatest.db)))
-      (query (for-each-row
-	      (lambda (res)
-		(print res)))
-	     (sql db bigquery))
-      (close-database db))))
-
-(define main.db (conc (get-environment-variable "MT_DBDIR") "/main.db"))
-
-(print "Creating file for current db")
-(with-output-to-file "current-db-dump"
-  (lambda ()
-    (let* ((mdb      (open-database main.db))
-	   (run-ids  (query fetch-column (sql mdb (conc "select id," runsquery " AS rq from runs ORDER BY rq ASC;"))))
-	   (dbdir    (get-environment-variable "MT_DBDIR")))
-      (for-each
-       (lambda (rid)
-	 (let ((dbfile (conc dbdir "/" rid ".db")))
-	   (if (file-exists? dbfile)
-	       (begin
-		 (exec (sql mdb (conc "ATTACH DATABASE '" dbfile "' AS testsdb;")))
-		 (query (for-each-row
-			 (lambda (res)
-			   (print res)))
-			(sql mdb bigquery))
-		 (exec (sql mdb "DETACH DATABASE testsdb;")))
-	       (print "ERROR: No file " dbfile " found"))))
-       run-ids)
-      (close-database mdb))))
-	 
-      

DELETED tests/fullrun/tests/db_sync/getdbdir.scm
Index: tests/fullrun/tests/db_sync/getdbdir.scm
==================================================================
--- tests/fullrun/tests/db_sync/getdbdir.scm
+++ /dev/null
@@ -1,1 +0,0 @@
-(db:dbfile-path #f)

DELETED tests/fullrun/tests/db_sync/showdiff.logpro
Index: tests/fullrun/tests/db_sync/showdiff.logpro
==================================================================
--- tests/fullrun/tests/db_sync/showdiff.logpro
+++ /dev/null
@@ -1,61 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-;; ;; define your hooks
-;; (hook:first-error   "echo \"Error hook activated: #{escaped errmsg}\"")
-;; (hook:first-warning "echo \"Got warning: #{escaped warnmsg}\"")
-;; (hook:value "echo \"Value hook activated: expected=#{expected}, measured=#{measured}, tolerance=#{tolerance}, message=#{message}\"")
-;; 
-;; ;; first ensure your run at least started
-;; ;;
-;; (trigger "Init"     #/This is a header/)
-;; (trigger "InitEnd"  #/^\s*$/)
-;; (section "Init" "Init" "InitEnd")
-;; 
-;; (trigger "Body"     #/^.*$/) ;; anything starts the body
-;; ;; (trigger "EndBody"  #/This had better never match/)
-;; 
-;; (section "Body"     "Body" "EndBody")
-;; 
-;; (trigger "Blah2"    #/^begin Blah2/)
-;; (trigger "Blah2End" #/^end Blah2/)
-;; (section "Blah2"    "Blah2" "Blah2End")
-;; 
-;; (expect:required in "Init"  = 1 "Header"      #/This is a header/)
-;; (expect:required in "LogFileBody" > 0 "Something required but not found" #/This is required but not found/)
-;; (expect:value    in "LogFileBody" 1.9 0.1 "Output voltage" #/Measured voltage output:\s*([\d\.\+\-e]+)v/)
-;; (expect:value    in "LogFileBody" 0.5 0.1 "Output current" #/Measured output current:\s*([\d\.\+\-e]+)mA/)
-;; (expect:value    in "LogFileBody" 110e9 2e9 "A big number (first)" #/Freq:\s*([\d\.\+\-e]+)\s+Hz/)
-;; (expect:value    in "LogFileBody" 110e9 1e9 "A big number (second), hook not called" #/Freq:\s*([\d\.\+\-e]+)Hz/)
-;; (expect:value    in "LogFileBody" 110e9 1e9 "A big number (never activated)" #/Freq:\s*([\d\.\+\-e]+)zH/)
-;; 
-;; ;; Using match number
-;; (expect:value    in "LogFileBody" 1.9 0.1 "Time Voltage" #/out: (\d+)\s+(\d+)/ match: 2)
-;; 
-;; ;; Comparison instead of tolerance
-;; (expect:value    in "LogFileBody" 1.9 >   "Time voltage" #/out: (\d+)\s+(\d+)/ match: 2)
-;; 
-;; (expect:ignore   in "Blah2" < 99 "FALSE ERROR" #/ERROR/)
-;; (expect:ignore   in "Body"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-;; (expect:warning  in "Body"  = 0 "Any warning" #/WARNING/)
-;; (expect:error    in "Body"  = 0 "ERROR BLAH"  (list #/ERROR/ #/error/)) ;; but disallow any other errors
-;; 
-;; ;(expect in "Init"  < 1 "Junk"        #/This is bogus/)
-
-(expect:error    in "LogFileBody" = 0 "Any diff is failure" #/.+/)

DELETED tests/fullrun/tests/db_sync/testconfig
Index: tests/fullrun/tests/db_sync/testconfig
==================================================================
--- tests/fullrun/tests/db_sync/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[pre-launch-env-vars]
-
-MT_DBDIR #{scheme (db:dbfile-path #f)}
-
-[ezsteps]
-calcresults csi -b dbdelta.scm
-showdiff    diff  current-db-dump legacy-db-dump
-
-[requirements]
-waiton  #{getenv ALL_TOPLEVEL_TESTS}
-
-# This is a "toplevel" test, it does not require waitons to be non-FAIL to run
-mode toplevel

DELETED tests/fullrun/tests/dynamic_waiton/testconfig
Index: tests/fullrun/tests/dynamic_waiton/testconfig
==================================================================
--- tests/fullrun/tests/dynamic_waiton/testconfig
+++ /dev/null
@@ -1,36 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[ezsteps]
-listfiles ls
-
-[requirements]
-waiton #{scheme (string-intersperse \
-                  (tests:filter-test-names \
-                      (hash-table-keys (tests:get-all)) \
-                      (or (args:get-arg "-runtests") \
-                          (args:get-arg "-testpatt") "")) " ")}
-
-[items]
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass \
-but there is an items definition with no items. This should evoke an \
-error.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/exit_0/main.sh
Index: tests/fullrun/tests/exit_0/main.sh
==================================================================
--- tests/fullrun/tests/exit_0/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 0

DELETED tests/fullrun/tests/exit_0/testconfig
Index: tests/fullrun/tests/exit_0/testconfig
==================================================================
--- tests/fullrun/tests/exit_0/testconfig
+++ /dev/null
@@ -1,32 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt
-
-[triggers]
-# NOT_STARTED/ xterm -e bash -s -- 
-NOT_STARTED/   echo "trigger: exit_0, NOT_STARTED/" > $MT_RUN_AREA_HOME/triggers_$MT_RUN_NAME.dat
-RUNNING/       echo "trigger: exit_0, RUNNING/" >> $MT_RUN_AREA_HOME/triggers_$MT_RUN_NAME.dat
-
-

DELETED tests/fullrun/tests/exit_1/main.sh
Index: tests/fullrun/tests/exit_1/main.sh
==================================================================
--- tests/fullrun/tests/exit_1/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 1

DELETED tests/fullrun/tests/exit_1/testconfig
Index: tests/fullrun/tests/exit_1/testconfig
==================================================================
--- tests/fullrun/tests/exit_1/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 9
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/ez_exit2_fail/testconfig
Index: tests/fullrun/tests/ez_exit2_fail/testconfig
==================================================================
--- tests/fullrun/tests/ez_exit2_fail/testconfig
+++ /dev/null
@@ -1,30 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[ezsteps]
-exit2       exit 2
-lookithome  ls /home
-
-[test_meta]
-author matt
-owner  bob
-description This test runs two steps; the first exits with\
- code 2 (a fail because not using logpro) and the second\
- is a pass
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/ez_fail/testconfig
Index: tests/fullrun/tests/ez_fail/testconfig
==================================================================
--- tests/fullrun/tests/ez_fail/testconfig
+++ /dev/null
@@ -1,34 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[requirements]
-priority 10
-
-[ezsteps]
-lookittmp   sleep 5s;ls /tmp
-lookithome  sleep 2;ls /home
-# should fail on next step
-lookitnada  sleep 3;ls /nada
-lookitusr   sleep 2;ls /usr
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass, no logpro file.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/ez_fail_quick/testconfig
Index: tests/fullrun/tests/ez_fail_quick/testconfig
==================================================================
--- tests/fullrun/tests/ez_fail_quick/testconfig
+++ /dev/null
@@ -1,33 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[requirements]
-priority 10
-
-[ezsteps]
-# should fail on next step
-lookitnada  ls /nada
-
-[triggers]
-# run like this: cmd test-id test-rundir trigger
-COMPLETED/FAIL   echo "trigger: ez_fail_quick, COMPLETED/FAIL" >> $MT_RUN_AREA_HOME/triggers_$MT_RUN_NAME.dat
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which fails immediately.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/ez_pass/testconfig
Index: tests/fullrun/tests/ez_pass/testconfig
==================================================================
--- tests/fullrun/tests/ez_pass/testconfig
+++ /dev/null
@@ -1,30 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[ezsteps]
-lookittmp   sleep 1;ls /tmp
-lookithome  sleep 1;ls /home
-isrunname1  sleep 1;echo $MYRUNNAME1 | grep -v '#f' 
-isrunname2  sleep 1;echo $MYRUNNAME2 | grep -v '#f' 
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass, no logpro file.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/ez_pass_linked
Index: tests/fullrun/tests/ez_pass_linked
==================================================================
--- tests/fullrun/tests/ez_pass_linked
+++ /dev/null
@@ -1,1 +0,0 @@
-../ez_pass_linked/

DELETED tests/fullrun/tests/ezlog_fail/example.logpro
Index: tests/fullrun/tests/ezlog_fail/example.logpro
==================================================================
--- tests/fullrun/tests/ezlog_fail/example.logpro
+++ /dev/null
@@ -1,59 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-;; define your hooks
-(hook:first-error   "echo \"Error hook activated: #{escaped errmsg}\"")
-(hook:first-warning "echo \"Got warning: #{escaped warnmsg}\"")
-(hook:value "echo \"Value hook activated: expected=#{expected}, measured=#{measured}, tolerance=#{tolerance}, message=#{message}\"")
-
-;; first ensure your run at least started
-;;
-(trigger "Init"     #/This is a header/)
-(trigger "InitEnd"  #/^\s*$/)
-(section "Init" "Init" "InitEnd")
-
-(trigger "Body"     #/^.*$/) ;; anything starts the body
-;; (trigger "EndBody"  #/This had better never match/)
-
-(section "Body"     "Body" "EndBody")
-
-(trigger "Blah2"    #/^begin Blah2/)
-(trigger "Blah2End" #/^end Blah2/)
-(section "Blah2"    "Blah2" "Blah2End")
-
-(expect:required in "Init"  = 1 "Header"      #/This is a header/)
-(expect:required in "LogFileBody" > 0 "Something required but not found" #/This is required but not found/)
-(expect:value    in "LogFileBody" 1.9 0.1 "Output voltage" #/Measured voltage output:\s*([\d\.\+\-e]+)v/)
-(expect:value    in "LogFileBody" 0.5 0.1 "Output current" #/Measured output current:\s*([\d\.\+\-e]+)mA/)
-(expect:value    in "LogFileBody" 110e9 2e9 "A big number (first)" #/Freq:\s*([\d\.\+\-e]+)\s+Hz/)
-(expect:value    in "LogFileBody" 110e9 1e9 "A big number (second), hook not called" #/Freq:\s*([\d\.\+\-e]+)Hz/)
-(expect:value    in "LogFileBody" 110e9 1e9 "A big number (never activated)" #/Freq:\s*([\d\.\+\-e]+)zH/)
-
-;; Using match number
-(expect:value    in "LogFileBody" 1.9 0.1 "Time Voltage" #/out: (\d+)\s+(\d+)/ match: 2)
-
-;; Comparison instead of tolerance
-(expect:value    in "LogFileBody" 1.9 >   "Time voltage" #/out: (\d+)\s+(\d+)/ match: 2)
-
-(expect:ignore   in "Blah2" < 99 "FALSE ERROR" #/ERROR/)
-(expect:ignore   in "Body"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "Body"  = 0 "Any warning" #/WARNING/)
-(expect:error    in "Body"  = 0 "ERROR BLAH"  (list #/ERROR/ #/error/)) ;; but disallow any other errors
-
-;(expect in "Init"  < 1 "Junk"        #/This is bogus/)

DELETED tests/fullrun/tests/ezlog_fail/lookithome.logpro
Index: tests/fullrun/tests/ezlog_fail/lookithome.logpro
==================================================================
--- tests/fullrun/tests/ezlog_fail/lookithome.logpro
+++ /dev/null
@@ -1,25 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-
-(expect:required in "LogFileBody" > 0 "Must be some files in the dir" #/.*/)
-
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/WARNING/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/)) ;; but disallow any other errors

DELETED tests/fullrun/tests/ezlog_fail/lookittmp.logpro
Index: tests/fullrun/tests/ezlog_fail/lookittmp.logpro
==================================================================
--- tests/fullrun/tests/ezlog_fail/lookittmp.logpro
+++ /dev/null
@@ -1,21 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/WARNING/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/.*/)) ;; force an error

DELETED tests/fullrun/tests/ezlog_fail/testconfig
Index: tests/fullrun/tests/ezlog_fail/testconfig
==================================================================
--- tests/fullrun/tests/ezlog_fail/testconfig
+++ /dev/null
@@ -1,43 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[ezsteps]
-lookittmp   ls /tmp
-lookithome  ls /home
-
-# logpro_file  input_glob
-# matching file(s) will be diff'd with previous run and logpro applied
-# if PASS or WARN result from logpro then WAIVER state is set
-#
-[waivers]
-waiver_1 logpro lookittmp.log
-
-[waiver_rules]
-
-# This builtin rule is the default if there is no <waivername>.logpro file
-# diff   diff %file1% %file2%
-
-# This builtin rule is applied if a <waivername>.logpro file exists
-# logpro diff %file1% %file2% | logpro %waivername%.logpro %waivername%.html
-
-[test_meta]
-author matt
-owner  bob
-description This test runs two ezstep, the first of which is expected to fail using a simple logpro file.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/ezlog_fail/waiver_1.logpro
Index: tests/fullrun/tests/ezlog_fail/waiver_1.logpro
==================================================================
--- tests/fullrun/tests/ezlog_fail/waiver_1.logpro
+++ /dev/null
@@ -1,1 +0,0 @@
-(expect:warning  in "Body"  = 0 "Any warning" #/WARNING/)

DELETED tests/fullrun/tests/ezlog_fail_then_pass/firststep.logpro
Index: tests/fullrun/tests/ezlog_fail_then_pass/firststep.logpro
==================================================================
--- tests/fullrun/tests/ezlog_fail_then_pass/firststep.logpro
+++ /dev/null
@@ -1,25 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-
-(expect:required in "LogFileBody" > 0 "Must be some files in the dir" #/.*/)
-
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/WARNING/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/)) ;; but disallow any other errors

DELETED tests/fullrun/tests/ezlog_fail_then_pass/main.sh
Index: tests/fullrun/tests/ezlog_fail_then_pass/main.sh
==================================================================
--- tests/fullrun/tests/ezlog_fail_then_pass/main.sh
+++ /dev/null
@@ -1,33 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-megatest -step yepstep :state start :status n/a
-ls /tmp
-megatest -step yepstep :state end :status $?
-
-megatest -load-test-data << EOF
-OPER,du,   1.2,  1.2, <   , GBytes  ,System didn't use too much space
-EOF
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-megatest -test-status :state COMPLETED :status AUTO

DELETED tests/fullrun/tests/ezlog_fail_then_pass/testconfig
Index: tests/fullrun/tests/ezlog_fail_then_pass/testconfig
==================================================================
--- tests/fullrun/tests/ezlog_fail_then_pass/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[ezsteps]
-firststep main.sh
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is logpro clean\
- but fails based on -test-data loaded.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/ezlog_pass/example.logpro
Index: tests/fullrun/tests/ezlog_pass/example.logpro
==================================================================
--- tests/fullrun/tests/ezlog_pass/example.logpro
+++ /dev/null
@@ -1,59 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-;; define your hooks
-(hook:first-error   "echo \"Error hook activated: #{escaped errmsg}\"")
-(hook:first-warning "echo \"Got warning: #{escaped warnmsg}\"")
-(hook:value "echo \"Value hook activated: expected=#{expected}, measured=#{measured}, tolerance=#{tolerance}, message=#{message}\"")
-
-;; first ensure your run at least started
-;;
-(trigger "Init"     #/This is a header/)
-(trigger "InitEnd"  #/^\s*$/)
-(section "Init" "Init" "InitEnd")
-
-(trigger "Body"     #/^.*$/) ;; anything starts the body
-;; (trigger "EndBody"  #/This had better never match/)
-
-(section "Body"     "Body" "EndBody")
-
-(trigger "Blah2"    #/^begin Blah2/)
-(trigger "Blah2End" #/^end Blah2/)
-(section "Blah2"    "Blah2" "Blah2End")
-
-(expect:required in "Init"  = 1 "Header"      #/This is a header/)
-(expect:required in "LogFileBody" > 0 "Something required but not found" #/This is required but not found/)
-(expect:value    in "LogFileBody" 1.9 0.1 "Output voltage" #/Measured voltage output:\s*([\d\.\+\-e]+)v/)
-(expect:value    in "LogFileBody" 0.5 0.1 "Output current" #/Measured output current:\s*([\d\.\+\-e]+)mA/)
-(expect:value    in "LogFileBody" 110e9 2e9 "A big number (first)" #/Freq:\s*([\d\.\+\-e]+)\s+Hz/)
-(expect:value    in "LogFileBody" 110e9 1e9 "A big number (second), hook not called" #/Freq:\s*([\d\.\+\-e]+)Hz/)
-(expect:value    in "LogFileBody" 110e9 1e9 "A big number (never activated)" #/Freq:\s*([\d\.\+\-e]+)zH/)
-
-;; Using match number
-(expect:value    in "LogFileBody" 1.9 0.1 "Time Voltage" #/out: (\d+)\s+(\d+)/ match: 2)
-
-;; Comparison instead of tolerance
-(expect:value    in "LogFileBody" 1.9 >   "Time voltage" #/out: (\d+)\s+(\d+)/ match: 2)
-
-(expect:ignore   in "Blah2" < 99 "FALSE ERROR" #/ERROR/)
-(expect:ignore   in "Body"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "Body"  = 0 "Any warning" #/WARNING/)
-(expect:error    in "Body"  = 0 "ERROR BLAH"  (list #/ERROR/ #/error/)) ;; but disallow any other errors
-
-;(expect in "Init"  < 1 "Junk"        #/This is bogus/)

DELETED tests/fullrun/tests/ezlog_pass/lookittmp.logpro
Index: tests/fullrun/tests/ezlog_pass/lookittmp.logpro
==================================================================
--- tests/fullrun/tests/ezlog_pass/lookittmp.logpro
+++ /dev/null
@@ -1,25 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-
-(expect:required in "LogFileBody" > 0 "Must be some files in the dir" #/.*/)
-
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/WARNING/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/)) ;; but disallow any other errors

DELETED tests/fullrun/tests/ezlog_pass/testconfig
Index: tests/fullrun/tests/ezlog_pass/testconfig
==================================================================
--- tests/fullrun/tests/ezlog_pass/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[ezsteps]
-lookittmp   ls /tmp
-lookithome  ls /home
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass using a simple logpro file.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/ezlog_warn/lookithome.logpro
Index: tests/fullrun/tests/ezlog_warn/lookithome.logpro
==================================================================
--- tests/fullrun/tests/ezlog_warn/lookithome.logpro
+++ /dev/null
@@ -1,26 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-
-;; Force a warn for this test
-(expect:required in "LogFileBody" > 0 "Must be some files in the dir" #/.*/)
-
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/)) ;; but disallow any other errors

DELETED tests/fullrun/tests/ezlog_warn/lookittmp.logpro
Index: tests/fullrun/tests/ezlog_warn/lookittmp.logpro
==================================================================
--- tests/fullrun/tests/ezlog_warn/lookittmp.logpro
+++ /dev/null
@@ -1,27 +0,0 @@
-;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-;;  
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;;   License GPL.
-
-
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/.*/)
-;; Can't have a required since it will mask the warns! Could make the warn non-overlapping with the
-;; required I suppose...
-;; (expect:required in "LogFileBody" > 0 "Must be some files in the dir" #/.*/)
-
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/)) ;; but disallow any other errors

DELETED tests/fullrun/tests/ezlog_warn/testconfig
Index: tests/fullrun/tests/ezlog_warn/testconfig
==================================================================
--- tests/fullrun/tests/ezlog_warn/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[ezsteps]
-lookittmp   ls /tmp
-lookithome  ls $HOME
-
-[test_meta]
-author matt
-owner  bob
-description This test runs two ezsteps the first of which is expected to fail using a simple logpro file.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/lineitem_fail/main.sh
Index: tests/fullrun/tests/lineitem_fail/main.sh
==================================================================
--- tests/fullrun/tests/lineitem_fail/main.sh
+++ /dev/null
@@ -1,38 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-$MT_MEGATEST -load-test-data << EOF
-foo,bar,   1.2,  1.9, >
-foo,rab, 1.0e9, 10e9, 1e9
-foo,bla,   1.2,  1.9, <
-foo,bal,   1.2,  1.2, <   ,     ,Check for overload
-foo,alb,   1.2,  1.2, <=  , Amps,This is the high power circuit test
-foo,abl,   1.2,  1.3, 0.1
-foo,bra,   1.2, pass, silly stuff
-faz,bar,    10,  8mA,     ,     ,"this is a comment"
-EOF
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-# Needed to force rolling up the results and set the test to COMPLETED
-$MT_MEGATEST -test-status :state COMPLETED :status AUTO
-

DELETED tests/fullrun/tests/lineitem_fail/testconfig
Index: tests/fullrun/tests/lineitem_fail/testconfig
==================================================================
--- tests/fullrun/tests/lineitem_fail/testconfig
+++ /dev/null
@@ -1,25 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/lineitem_pass/main.sh
Index: tests/fullrun/tests/lineitem_pass/main.sh
==================================================================
--- tests/fullrun/tests/lineitem_pass/main.sh
+++ /dev/null
@@ -1,37 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# category variable value expected  tol/comp units comment
-$MT_MEGATEST -load-test-data << EOF
-foo,       bar,     1.9,  1.8,      >
-foo,       rab,   1.0e9,  2e9,      1e9
-foo,       bla,     1.2,  1.9,      <
-foo,       bal,    -1.1,    0,      <   ,         , Check for overload
-foo,       alb,     1.2,  1.2,      <=  ,     Amps, This is the high power circuit test
-foo,       abl,     1.2,  1.3,      0.1
-foo,       bra,     1.2, pass,      silly stuff
-faz,       bar,      10,  8mA,          ,         ,"this is a comment"
-EOF
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-# Needed to force rolling up the results and set the test to COMPLETED
-$MT_MEGATEST -test-status :state COMPLETED :status AUTO

DELETED tests/fullrun/tests/lineitem_pass/testconfig
Index: tests/fullrun/tests/lineitem_pass/testconfig
==================================================================
--- tests/fullrun/tests/lineitem_pass/testconfig
+++ /dev/null
@@ -1,25 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/logpro_required_fail/testconfig
Index: tests/fullrun/tests/logpro_required_fail/testconfig
==================================================================
--- tests/fullrun/tests/logpro_required_fail/testconfig
+++ /dev/null
@@ -1,38 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[ezsteps]
-lookittmp   ls /tmp
-
-[test_meta]
-author matt
-owner  bob
-description This test runs two ezstep, the first of which is expected to fail using a simple logpro file.
-
-[logpro]
-lookittmp ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
-  ;;  
-  ;;   License GPL.
-  ;;
-  (expect:required in "LogFileBody" > 0 "A file name that should never exist!" #/This is a awfully stupid file name that should never be found in the temp dir/)
-  ;;
-  ;; (expect:warning  in "LogFileBody"  = 0 "Any warning" #/WARNING/)
-  ;; (expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/.*/)) ;; force an error
-
-
-tags logpro
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/manual_example/results/results.csv
Index: tests/fullrun/tests/manual_example/results/results.csv
==================================================================
--- tests/fullrun/tests/manual_example/results/results.csv
+++ /dev/null
@@ -1,1 +0,0 @@
-category, variable, expected,   value,  tol,   units,  comment

DELETED tests/fullrun/tests/manual_example/runsetupxterm.sh
Index: tests/fullrun/tests/manual_example/runsetupxterm.sh
==================================================================
--- tests/fullrun/tests/manual_example/runsetupxterm.sh
+++ /dev/null
@@ -1,28 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-if [[ $TARGETDISPLAY = "" || $TARGETHOST = "" || $TARGETDIR = "" || $TARGETUSER = "" ]]; then
-    msg="You must set the TARGETDISPLAY, TARGETHOST, TARGETDIR and TARGETUSER variables for manual tests"
-    echo $msg
-    megatest -test-status :state COMPLETED :status FAIL -m $msg
-    exit 1
-else
-    megatest -step setup :state start :status n/a
-    xterm -display $TARGETDISPLAY -e ./setupremote.sh
-    megatest -step setup :state end :status $?
-fi
-

DELETED tests/fullrun/tests/manual_example/setupremote.sh
Index: tests/fullrun/tests/manual_example/setupremote.sh
==================================================================
--- tests/fullrun/tests/manual_example/setupremote.sh
+++ /dev/null
@@ -1,43 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-megatest -step rsyncto :state start :status n/a
-echo "First, lets populate your area with necessary files, you may be prompted for your Unix password several times"
-rsync -avz $MT_TEST_RUN_DIR/  $TARGETUSER@$TARGETHOST:$TARGETDIR
-megatest -step rsyncto :state end :status n/a
-
-megatest -step runtest :state start :status n/a
-remotecmd="cd $TARGETDIR;xterm -display $TARGETDISPLAY"
-echo Launching $remotecmd on $TARGETHOST as $TARGETUSER
-ssh $TARGETUSER@$TARGETHOST $remotecmd
-megatest -step runtest :state end :status $?
-
-megatest -step gatherdata :state start :status n/a
-rsync -avz $TARGETUSER@$TARGETHOST:$TARGETDIR/results/ $MT_TEST_RUN_DIR/results/
-if [[ -e $MT_TEST_RUN_DIR/results/results.csv ]]; then
-    megatest -load-test-data < $MT_TEST_RUN_DIR/results/results.csv
-fi
-
-if [[ -e $MT_TEST_RUN_DIR/results/final_results.log && $MT_TEST_RUN_DIR/final_results.logpro ]]; then
-    logpro $MT_TEST_RUN_DIR/final_results.logpro $MT_TEST_RUN_DIR/final_results.html < $MT_TEST_RUN_DIR/results/final_results.log
-    if [[ $? = 0 ]]; then
-	finalstatus=PASS
-    else
-	finalstatus=FAIL
-    fi
-    megatest -test-status :state COMPLETED :status $finalstatus -setlog final_results.html
-fi

DELETED tests/fullrun/tests/manual_example/testconfig
Index: tests/fullrun/tests/manual_example/testconfig
==================================================================
--- tests/fullrun/tests/manual_example/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[ezsteps]
-setup ./runsetupxterm.sh
-# launch launchxterm
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass\
- using a simple logpro file.
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/neverrun/testconfig
Index: tests/fullrun/tests/neverrun/testconfig
==================================================================
--- tests/fullrun/tests/neverrun/testconfig
+++ /dev/null
@@ -1,19 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript idontexist
-
-

DELETED tests/fullrun/tests/no_items/testconfig
Index: tests/fullrun/tests/no_items/testconfig
==================================================================
--- tests/fullrun/tests/no_items/testconfig
+++ /dev/null
@@ -1,30 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[ezsteps]
-listfiles ls
-
-[items]
-FOO
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass \
-but there is an items definition with no items. This should evoke an \
-error.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/priority_1/main.sh
Index: tests/fullrun/tests/priority_1/main.sh
==================================================================
--- tests/fullrun/tests/priority_1/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 0

DELETED tests/fullrun/tests/priority_1/testconfig
Index: tests/fullrun/tests/priority_1/testconfig
==================================================================
--- tests/fullrun/tests/priority_1/testconfig
+++ /dev/null
@@ -1,32 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 1
-
-[test_meta]
-jobgroup sqlite3
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt
-
-[triggers]
-COMPLETED/   echo "trigger: priority_1, COMPLETED/" >> $MT_RUN_AREA_HOME/triggers_$MT_RUN_NAME.dat

DELETED tests/fullrun/tests/priority_10/main.sh
Index: tests/fullrun/tests/priority_10/main.sh
==================================================================
--- tests/fullrun/tests/priority_10/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 0

DELETED tests/fullrun/tests/priority_10/testconfig
Index: tests/fullrun/tests/priority_10/testconfig
==================================================================
--- tests/fullrun/tests/priority_10/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 10
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/priority_10_waiton_1/main.sh
Index: tests/fullrun/tests/priority_10_waiton_1/main.sh
==================================================================
--- tests/fullrun/tests/priority_10_waiton_1/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 0

DELETED tests/fullrun/tests/priority_10_waiton_1/testconfig
Index: tests/fullrun/tests/priority_10_waiton_1/testconfig
==================================================================
--- tests/fullrun/tests/priority_10_waiton_1/testconfig
+++ /dev/null
@@ -1,29 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 10
-waiton priority_1
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/priority_2/main.sh
Index: tests/fullrun/tests/priority_2/main.sh
==================================================================
--- tests/fullrun/tests/priority_2/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 5
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 0

DELETED tests/fullrun/tests/priority_2/testconfig
Index: tests/fullrun/tests/priority_2/testconfig
==================================================================
--- tests/fullrun/tests/priority_2/testconfig
+++ /dev/null
@@ -1,31 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 2
-# runtimelim 1d 1h 1m 10s
-runtimelim 20s
-
-[test_meta]
-jobgroup sqlite3
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/priority_3/README
Index: tests/fullrun/tests/priority_3/README
==================================================================
--- tests/fullrun/tests/priority_3/README
+++ /dev/null
@@ -1,3 +0,0 @@
-This test used to look for envfile.txt but that file should NOT have been there.
-
-By changing to lookithome.log it is possible that an error is masked.

DELETED tests/fullrun/tests/priority_3/main.sh
Index: tests/fullrun/tests/priority_3/main.sh
==================================================================
--- tests/fullrun/tests/priority_3/main.sh
+++ /dev/null
@@ -1,35 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  echo "<html><header>Results$i</header><body>Nothing but faux results here!</body></html>" > results$i.html
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-# get a previous test
-export EZFAILPATH=`$MT_MEGATEST -test-files lookithome.log -target $MT_TARGET :runname $MT_RUNNAME -testpatt ez_fail`
-if [[ -e $EZFAILPATH ]];then
-  echo All good!
-else
-  echo NOT good!
-  exit 1
-fi
-
-exit 0

DELETED tests/fullrun/tests/priority_3/testconfig
Index: tests/fullrun/tests/priority_3/testconfig
==================================================================
--- tests/fullrun/tests/priority_3/testconfig
+++ /dev/null
@@ -1,30 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 3
-
-
-[test_meta]
-jobgroup sqlite3
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/priority_4/main.sh
Index: tests/fullrun/tests/priority_4/main.sh
==================================================================
--- tests/fullrun/tests/priority_4/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 0

DELETED tests/fullrun/tests/priority_4/testconfig
Index: tests/fullrun/tests/priority_4/testconfig
==================================================================
--- tests/fullrun/tests/priority_4/testconfig
+++ /dev/null
@@ -1,29 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 4
-
-[test_meta]
-jobgroup sqlite3
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/priority_5/main.sh
Index: tests/fullrun/tests/priority_5/main.sh
==================================================================
--- tests/fullrun/tests/priority_5/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 0

DELETED tests/fullrun/tests/priority_5/testconfig
Index: tests/fullrun/tests/priority_5/testconfig
==================================================================
--- tests/fullrun/tests/priority_5/testconfig
+++ /dev/null
@@ -1,31 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 5
-
-[skip]
-prevrunning #t
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/priority_6/main.sh
Index: tests/fullrun/tests/priority_6/main.sh
==================================================================
--- tests/fullrun/tests/priority_6/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 0

DELETED tests/fullrun/tests/priority_6/testconfig
Index: tests/fullrun/tests/priority_6/testconfig
==================================================================
--- tests/fullrun/tests/priority_6/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 6
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/priority_7/main.sh
Index: tests/fullrun/tests/priority_7/main.sh
==================================================================
--- tests/fullrun/tests/priority_7/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 0

DELETED tests/fullrun/tests/priority_7/testconfig
Index: tests/fullrun/tests/priority_7/testconfig
==================================================================
--- tests/fullrun/tests/priority_7/testconfig
+++ /dev/null
@@ -1,32 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 7
-
-[skip]
-# Run only if this much time since last run of this test
-rundelay 10m 5s
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/priority_8/main.sh
Index: tests/fullrun/tests/priority_8/main.sh
==================================================================
--- tests/fullrun/tests/priority_8/main.sh
+++ /dev/null
@@ -1,29 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  echo "start step before $i: `date`"
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  echo "start step after $i: `date`"
-  sleep 2
-  echo "end step before $i: `date`"
-  $MT_MEGATEST -step step$i :state end :status 0
-  echo "end step after $i: `date`"
-done
-
-exit 0

DELETED tests/fullrun/tests/priority_8/testconfig
Index: tests/fullrun/tests/priority_8/testconfig
==================================================================
--- tests/fullrun/tests/priority_8/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 8
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/priority_9/main.sh
Index: tests/fullrun/tests/priority_9/main.sh
==================================================================
--- tests/fullrun/tests/priority_9/main.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# a bunch of steps in 2 second increments
-for i in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17;do
-  $MT_MEGATEST -step step$i :state start :status running -setlog results$i.html
-  sleep 2
-  $MT_MEGATEST -step step$i :state end :status 0
-done
-
-exit 0

DELETED tests/fullrun/tests/priority_9/testconfig
Index: tests/fullrun/tests/priority_9/testconfig
==================================================================
--- tests/fullrun/tests/priority_9/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-priority 9
-
-[test_meta]
-author matt
-owner  bob
-description This test checks that a multi-lineitem test with mix of pass and non-fail rolls up a PASS
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/runfirst/main.sh
Index: tests/fullrun/tests/runfirst/main.sh
==================================================================
--- tests/fullrun/tests/runfirst/main.sh
+++ /dev/null
@@ -1,55 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# (export DISPLAY=:0;xterm) 
-
-# megatest -step wasting_time :state start :status n/a -m "This is a test step comment"
-# sleep 20
-# megatest -step wasting_time :state end :status $?
-
-touch ../I_was_here
-mkdir -p $MT_RUN_AREA_HOME/tmp/$USER/$sysname/$fsname/$datapath/$MT_RUNNAME
-echo 1 2 3 4 5 > $MT_RUN_AREA_HOME/tmp/$USER/$sysname/$fsname/$datapath/$MT_RUNNAME/the_ans
-
-$MT_MEGATEST -runstep wasting_time -logpro wasting_time.logpro "sleep 8;echo all done eh?" -m "This is a test step comment"
-
-$MT_MEGATEST -load-test-data << EOF
-foo,bar,1.2,1.9,>
-foo,rab,1.0e9,10e9,1e9
-foo,bla,1.2,1.9,<
-foo,bal,1.2,1.2,<,,Check for overload
-foo,alb,1.2,1.2,<=,Amps,This is the high power circuit test
-foo,abl,1.2,1.3,0.1
-foo,bra,1.2,pass,silly stuff
-faz,bar,10,8mA,,,"this is a comment"
-EOF
-
-$MT_MEGATEST -load-test-data << EOF
-cat,  var, val, exp, comp, units, comment, status, type
-ameas,iout,1.2,1.9,>,Amps,Comment,,meas
-EOF
-loadstatus=$?
-
-if [[ `basename $PWD` == "mustfail" ]];then
-  $MT_MEGATEST -test-status :state COMPLETED :status FAIL
-else
-  $MT_MEGATEST -test-status :state COMPLETED :status $loadstatus -m "This is a test level comment" :value 10e6 :expected_value 1.1e6 :tol 100e3 :category nada :variable sillyvar :units mFarks :comment "This is the value/expected comment"
-fi
-
-env > envfile.txt
-
-# $MT_MEGATEST -test-status :state COMPLETED :status FAIL

DELETED tests/fullrun/tests/runfirst/testconfig
Index: tests/fullrun/tests/runfirst/testconfig
==================================================================
--- tests/fullrun/tests/runfirst/testconfig
+++ /dev/null
@@ -1,39 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[pre-launch-env-vars]
-# These are set before the test is launched on the originating
-# host. This can be used to control remote launch tools, e.g. to
-# to choose the target host, select the launch tool etc.
-SPECIAL_ENV_VAR override with everything after the first space.
-
-[items]
-SEASON summer winter fall spring 
-
-[itemstable]
-BLOCK a  b
-TOCK  1  2
-
-[test_meta]
-author matt
-owner  bob
-description This test must\
- be run before the other tests
-
-tags first,single
-reviewed 1/1/1965

DELETED tests/fullrun/tests/runfirst/wasting_time.logpro
Index: tests/fullrun/tests/runfirst/wasting_time.logpro
==================================================================
--- tests/fullrun/tests/runfirst/wasting_time.logpro
+++ /dev/null
@@ -1,30 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; put stuff here
-
-;; NOTE: This is not legit logpro code!!! 
-
-;; Test for 0=PASS, 1=WARN, >2 = FAIL
-
-;; (define season (get-environment-variable "SEASON"))
-;; 
-;; (exit 
-;;  (case (string->symbol season)
-;;    ((summer) 0)
-;;    ((winter) 1)
-;;    ((fall)   2)
-;;    (else     0)))
-

DELETED tests/fullrun/tests/singletest/main.sh
Index: tests/fullrun/tests/singletest/main.sh
==================================================================
--- tests/fullrun/tests/singletest/main.sh
+++ /dev/null
@@ -1,24 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# megatest -step wasting_time :state start :status n/a -m "This is a test step comment"
-# sleep 20
-# megatest -step wasting_time :state end :status $?
-
-$MT_MEGATEST -runstep wasting_time -logpro wasting_time.logpro "sleep 5;echo alldone" -m "This is a test step comment"
-
-$MT_MEGATEST -test-status :state COMPLETED :status $? -m "This is a test level comment" -set-toplog the_top_log.html :first_err "This is the first error"

DELETED tests/fullrun/tests/singletest/testconfig
Index: tests/fullrun/tests/singletest/testconfig
==================================================================
--- tests/fullrun/tests/singletest/testconfig
+++ /dev/null
@@ -1,28 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-diskspace 1M
-memory    1G
-
-[pre-launch-env-vars]
-# These are set before the test is launched on the originating
-# host. This can be used to control remote launch tools, e.g. to
-# to choose the target host, select the launch tool etc.
-SPECIAL_ENV_VAR override with everything after the first space.
-

DELETED tests/fullrun/tests/singletest/wasting_time.logpro
Index: tests/fullrun/tests/singletest/wasting_time.logpro
==================================================================
--- tests/fullrun/tests/singletest/wasting_time.logpro
+++ /dev/null
@@ -1,30 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; put stuff here
-
-;; NOTE: This is not legit logpro code!!! 
-
-;; Test for 0=PASS, 1=WARN, >2 = FAIL
-
-;; (define season (get-environment-variable "SEASON"))
-;; 
-;; (exit 
-;;  (case (string->symbol season)
-;;    ((summer) 0)
-;;    ((winter) 1)
-;;    ((fall)   2)
-;;    (else     0)))
-

DELETED tests/fullrun/tests/singletest2/main.sh
Index: tests/fullrun/tests/singletest2/main.sh
==================================================================
--- tests/fullrun/tests/singletest2/main.sh
+++ /dev/null
@@ -1,24 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# megatest -step wasting_time :state start :status n/a -m "This is a test step comment"
-# sleep 20
-# megatest -step wasting_time :state end :status $?
-
-$MT_MEGATEST -runstep wasting_time -logpro wasting_time.logpro "sleep 5;echo all done eh?" -m "This is a test step comment"
-
-$MT_MEGATEST -test-status :state COMPLETED :status $? -m "This is a test level comment" -set-toplog the_top_log.html :first_warn "This is the first warning"

DELETED tests/fullrun/tests/singletest2/testconfig
Index: tests/fullrun/tests/singletest2/testconfig
==================================================================
--- tests/fullrun/tests/singletest2/testconfig
+++ /dev/null
@@ -1,29 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript main.sh
-
-[requirements]
-diskspace 1M
-memory    1G
-waiton singletest
-
-[pre-launch-env-vars]
-# These are set before the test is launched on the originating
-# host. This can be used to control remote launch tools, e.g. to
-# to choose the target host, select the launch tool etc.
-SPECIAL_ENV_VAR override with everything after the first space.
-

DELETED tests/fullrun/tests/singletest2/wasting_time.logpro
Index: tests/fullrun/tests/singletest2/wasting_time.logpro
==================================================================
--- tests/fullrun/tests/singletest2/wasting_time.logpro
+++ /dev/null
@@ -1,30 +0,0 @@
-;; put stuff here
-
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; NOTE: This is not legit logpro code!!! 
-
-;; Test for 0=PASS, 1=WARN, >2 = FAIL
-
-;; (define season (get-environment-variable "SEASON"))
-;; 
-;; (exit 
-;;  (case (string->symbol season)
-;;    ((summer) 0)
-;;    ((winter) 1)
-;;    ((fall)   2)
-;;    (else     0)))
-

DELETED tests/fullrun/tests/special/testconfig
Index: tests/fullrun/tests/special/testconfig
==================================================================
--- tests/fullrun/tests/special/testconfig
+++ /dev/null
@@ -1,23 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[ezsteps]
-# calcresults megatest -list-runs $MT_RUNNAME -target $MT_TARGET
-
-[requirements]
-waiton #{rget TESTSTORUN}
-
-# This is a "toplevel" test, it does not require waitons to be non-FAIL to run
-mode toplevel

DELETED tests/fullrun/tests/sqlitespeed/runscript.rb
Index: tests/fullrun/tests/sqlitespeed/runscript.rb
==================================================================
--- tests/fullrun/tests/sqlitespeed/runscript.rb
+++ /dev/null
@@ -1,53 +0,0 @@
-#! /usr/bin/env ruby
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-
-require "#{ENV['MT_RUN_AREA_HOME']}/../resources/ruby/librunscript.rb"
-
-# run_record(stepname, cmd) - will record in db if exit code of script was zero or not
-run_and_record('create db',"sqlite3 testing.db << EOF\ncreate table if not exists blah(id INTEGER PRIMARY KEY,name TEXT);\n.q\nEOF","")
-
-if (! File.exists?("../../runfirst/I_was_here"))
-    puts "ERROR: This test was started before the prerequisites ran!"
-    system "megatest -test-status :state INCOMPLETE :status FAIL"
-    exit 1
-end
-
-# file_size_checker(stepname, filename, minsize, maxsize) - negative means ignore
-# file_size_checker('create db','testing.db',100,-1)
-
-num_records=rand(5) # 0000
-record_step("add #{num_records}","start","n/a")
-status=false
-(0..num_records).each do |i|
-  randstring="abc";
-  # "a;lskdfja;sdfj;alsdfj;aslfdj;alsfja;lsfdj;alsfja;lsjfd;lasfjl;asdfja;slfj;alsjf;asljf;alsjf;lasdjf;lasjf;lasjf;alsjf;lashflkashflkerhflkdsvnlasldhlfaldf"
-  # status=system "sqlite3 testing.db \"insert into blah (name) values ('#{randstring}');\""
-  system "megatest -step testing :state wrote_junk :status #{num_records}"
-  sleep(5)
-  puts "i=#{i}"
-end
-if status==0
-  status='pass'
-else
-  status='fail'
-end
-
-record_step("add #{num_records}","end",status)
-
-
-
-

DELETED tests/fullrun/tests/sqlitespeed/testconfig
Index: tests/fullrun/tests/sqlitespeed/testconfig
==================================================================
--- tests/fullrun/tests/sqlitespeed/testconfig
+++ /dev/null
@@ -1,30 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-runscript runscript.rb
-tags non important,dumb junk
-
-[requirements]
-waiton    runfirst
-
-[items]
-MANYITEMS [system (env > envfile.txt;echo aa ab ac ad ae af ag ah ai)]
-# BORKED  
-
-[test_meta]
-jobgroup sqlite3
-tags quick
-

DELETED tests/fullrun/tests/test_mt_vars/altvarnotset.logpro
Index: tests/fullrun/tests/test_mt_vars/altvarnotset.logpro
==================================================================
--- tests/fullrun/tests/test_mt_vars/altvarnotset.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:error in "LogFileBody" = 0 "a file that should never exist" #/what a dumb filename this is/)

DELETED tests/fullrun/tests/test_mt_vars/altvarnotset.sh
Index: tests/fullrun/tests/test_mt_vars/altvarnotset.sh
==================================================================
--- tests/fullrun/tests/test_mt_vars/altvarnotset.sh
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/usr/bin/env bash
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-
-! grep ALT_VAR megatest.sh

DELETED tests/fullrun/tests/test_mt_vars/bogousnotset.logpro
Index: tests/fullrun/tests/test_mt_vars/bogousnotset.logpro
==================================================================
--- tests/fullrun/tests/test_mt_vars/bogousnotset.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:error in "LogFileBody" = 0 "a file that should never exist" #/what a dumb filename this is/)

DELETED tests/fullrun/tests/test_mt_vars/bogousnotset.sh
Index: tests/fullrun/tests/test_mt_vars/bogousnotset.sh
==================================================================
--- tests/fullrun/tests/test_mt_vars/bogousnotset.sh
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/usr/bin/env bash
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-
-! grep BOGOUS megatest.sh

DELETED tests/fullrun/tests/test_mt_vars/currentisblah.logpro
Index: tests/fullrun/tests/test_mt_vars/currentisblah.logpro
==================================================================
--- tests/fullrun/tests/test_mt_vars/currentisblah.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:error in "LogFileBody" = 0 "a file that should never exist" #/what a dumb filename this is/)

DELETED tests/fullrun/tests/test_mt_vars/currentisblah.sh
Index: tests/fullrun/tests/test_mt_vars/currentisblah.sh
==================================================================
--- tests/fullrun/tests/test_mt_vars/currentisblah.sh
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/usr/bin/env bash
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-
-grep -e '^export CURRENT' megatest.sh | grep /tmp/nada

DELETED tests/fullrun/tests/test_mt_vars/empty_var.logpro
Index: tests/fullrun/tests/test_mt_vars/empty_var.logpro
==================================================================
--- tests/fullrun/tests/test_mt_vars/empty_var.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:error in "LogFileBody" = 0 "a file that should never exist" #/what a dumb filename this is/)

DELETED tests/fullrun/tests/test_mt_vars/empty_var.sh
Index: tests/fullrun/tests/test_mt_vars/empty_var.sh
==================================================================
--- tests/fullrun/tests/test_mt_vars/empty_var.sh
+++ /dev/null
@@ -1,21 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-if [ x$EMPTY_VAR != "x" ];then
-  echo BAD EMPTY VAR!
-  exit 1
-fi

DELETED tests/fullrun/tests/test_mt_vars/eval_vars.sh
Index: tests/fullrun/tests/test_mt_vars/eval_vars.sh
==================================================================
--- tests/fullrun/tests/test_mt_vars/eval_vars.sh
+++ /dev/null
@@ -1,22 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-if env | grep VARWITHDOLLARSIGNS | grep USER;then
-    exit 1 # fails!
-else
-    exit 0 # good!
-fi

DELETED tests/fullrun/tests/test_mt_vars/lookithome.logpro
Index: tests/fullrun/tests/test_mt_vars/lookithome.logpro
==================================================================
--- tests/fullrun/tests/test_mt_vars/lookithome.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:error in "LogFileBody" = 0 "a file that should never exist" #/what a dumb filename this is/)

DELETED tests/fullrun/tests/test_mt_vars/lookittmp.logpro
Index: tests/fullrun/tests/test_mt_vars/lookittmp.logpro
==================================================================
--- tests/fullrun/tests/test_mt_vars/lookittmp.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:error in "LogFileBody" = 0 "a file that should never exist" #/what a dumb filename this is/)

DELETED tests/fullrun/tests/test_mt_vars/test-path-file.sh
Index: tests/fullrun/tests/test_mt_vars/test-path-file.sh
==================================================================
--- tests/fullrun/tests/test_mt_vars/test-path-file.sh
+++ /dev/null
@@ -1,43 +0,0 @@
-#!/bin/bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-
-# get a previous test
-export EZFAILPATH=`$MT_MEGATEST -test-files envfile.txt -target $MT_TARGET :runname $MT_RUNNAME -testpatt runfirst/a%`
-
-echo "Found |$EZFAILPATH|"
-
-if [ -e $EZFAILPATH ];then
-  echo All good!
-else
-  echo NOT good!
-  exit 1
-fi
-
-export EZFAILPATH2=`$MT_MEGATEST -test-paths -target $MT_TARGET :runname $MT_RUNNAME -testpatt runfirst/a%`
-
-echo "Found |$EZFAILPATH2|"
-
-if [ -e $EZFAILPATH2 ];then
-  echo All good!
-else
-  echo NOT good!
-  exit 1
-fi
-
-
-exit 0

DELETED tests/fullrun/tests/test_mt_vars/test-path.logpro
Index: tests/fullrun/tests/test_mt_vars/test-path.logpro
==================================================================
--- tests/fullrun/tests/test_mt_vars/test-path.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:error in "LogFileBody" = 0 "a file that should never exist" #/what a dumb filename this is/)

DELETED tests/fullrun/tests/test_mt_vars/testconfig
Index: tests/fullrun/tests/test_mt_vars/testconfig
==================================================================
--- tests/fullrun/tests/test_mt_vars/testconfig
+++ /dev/null
@@ -1,73 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[setup]
-
-[ezsteps]
-lookittmp   ls /tmp
-lookithome  ls /home
-# $CURRENT should be /tmp/nada
-currentisblah currentisblah.sh
-
-# $BOGOUS should NOT be set
-bogousnotset bogousnotset.sh
-
-# ALT_VAR should NOT be set
-altvarnotset altvarnotset.sh
-
-# EMPTY_VAR should be an empty string
-empty_var empty_var.sh
-
-# VACKYVAR should be set to a path
-vackyvar vackyvar.sh
-
-# test-path and test-file
-test-path test-path-file.sh
-
-# verify that vars with $ signs get expanded
-varwithdollar eval_vars.sh
-
-emptyvars bash -c 'if [[ $VARNOVAL == "" ]];then echo HAVE_VARNOVAL;else echo "ERROR: VARNOVAL not found";fi'
-emptyvar_withspace bash -c 'if [[ $VARNOVAL_WITHSPACE == "" ]];then echo HAVE_VARNOVAL_WITHSPACE;else echo "ERROR: VARNOVAL_WITHSPACE not found";fi'
-emptyvar_megatest.sh egrep VARNO megatest.sh
-
-[requirements]
-waiton runfirst
-priority 0
-
-[items]
-NUMNUM [system cat $MT_RUN_AREA_HOME/tmp/$USER/$sysname/$fsname/$datapath/$MT_RUNNAME/$PREDICTABLE]
-
-[logpro]
-emptyvars ;;
-  (expect:error in "LogFileBody" = 0 "VARNOVAL not found" #/ERROR: VARNOVAL not found/)
-  (expect:required in "LogFileBody" = 1 "HAVE_VARNOVAL"   #/HAVE_VARNOVAL/)
-
-emptyvar_withspace ;;
-  (expect:error in "LogFileBody" = 0 "VARNOVAL_WITHSPACE not found" #/ERROR: VARNOVAL_WITHSPACE not found/)
-  (expect:required in "LogFileBody" = 1 "HAVE_VARNOVAL_WITHSPACE"   #/HAVE_VARNOVAL_WITHSPACE/)
-
-emptyvar_megatest.sh ;;
-  (expect:error in "LogFileBody" = 0 "No errors expected" #/ERR/i)
-  (expect:required in "LogFileBody" = 1 "VARNOVAL_WITHSPACE"  #/VARNOVAL_WITHSPACE/)
-  (expect:required in "LogFileBody" = 1 "VARNOVAL"            #/VARNOVAL/)
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass, no logpro file.
-
-tags quick,first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/test_mt_vars/vackyvar.logpro
Index: tests/fullrun/tests/test_mt_vars/vackyvar.logpro
==================================================================
--- tests/fullrun/tests/test_mt_vars/vackyvar.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:error in "LogFileBody" = 0 "a file that should never exist" #/what a dumb filename this is/)

DELETED tests/fullrun/tests/test_mt_vars/vackyvar.sh
Index: tests/fullrun/tests/test_mt_vars/vackyvar.sh
==================================================================
--- tests/fullrun/tests/test_mt_vars/vackyvar.sh
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/usr/bin/env bash
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-
-grep VACKYVAR megatest.sh | grep fullrun

DELETED tests/fullrun/tests/test_mt_vars/varwithdollar.logpro
Index: tests/fullrun/tests/test_mt_vars/varwithdollar.logpro
==================================================================
--- tests/fullrun/tests/test_mt_vars/varwithdollar.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:error in "LogFileBody" = 0 "a file that should never exist" #/what a dumb filename this is/)

DELETED tests/fullrun/tests/testxz/testconfig
Index: tests/fullrun/tests/testxz/testconfig
==================================================================
--- tests/fullrun/tests/testxz/testconfig
+++ /dev/null
@@ -1,30 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-listfiles ls
-
-# Test requirements are specified here
-[requirements]
-waiton blocktestxz
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author mrwellan
-owner  mrwellan
-description This test should never get run due to blocktestxz failing
-tags tagone,tagtwo
-reviewed never

DELETED tests/fullrun/tests/wait_no_items1/testconfig
Index: tests/fullrun/tests/wait_no_items1/testconfig
==================================================================
--- tests/fullrun/tests/wait_no_items1/testconfig
+++ /dev/null
@@ -1,32 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[ezsteps]
-listfiles ls
-
-[requirements]
-waiton no_items
-
-[items]
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass \
-but there is an items definition with no items. This should evoke an \
-error.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/wait_no_items2/testconfig
Index: tests/fullrun/tests/wait_no_items2/testconfig
==================================================================
--- tests/fullrun/tests/wait_no_items2/testconfig
+++ /dev/null
@@ -1,32 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[ezsteps]
-listfiles ls
-
-[requirements]
-waiton wait_no_items1
-
-[items]
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass \
-but there is an items definition with no items. This should evoke an \
-error.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/wait_no_items3/testconfig
Index: tests/fullrun/tests/wait_no_items3/testconfig
==================================================================
--- tests/fullrun/tests/wait_no_items3/testconfig
+++ /dev/null
@@ -1,32 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[ezsteps]
-listfiles ls
-
-[requirements]
-waiton wait_no_items2
-
-[items]
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass \
-but there is an items definition with no items. This should evoke an \
-error.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/fullrun/tests/wait_no_items4/testconfig
Index: tests/fullrun/tests/wait_no_items4/testconfig
==================================================================
--- tests/fullrun/tests/wait_no_items4/testconfig
+++ /dev/null
@@ -1,32 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[ezsteps]
-listfiles ls
-
-[requirements]
-waiton wait_no_items3
-
-[items]
-
-[test_meta]
-author matt
-owner  bob
-description This test runs a single ezstep which is expected to pass \
-but there is an items definition with no items. This should evoke an \
-error.
-
-tags first,single
-reviewed 09/10/2011, by Matt

DELETED tests/installall/config/megatest.config.dat
Index: tests/installall/config/megatest.config.dat
==================================================================
--- tests/installall/config/megatest.config.dat
+++ /dev/null
@@ -1,1 +0,0 @@
-../megatest.config

DELETED tests/installall/config/runconfigs.config.dat
Index: tests/installall/config/runconfigs.config.dat
==================================================================
--- tests/installall/config/runconfigs.config.dat
+++ /dev/null
@@ -1,1 +0,0 @@
-../runconfigs.config

DELETED tests/installall/config/sheet-names.cfg
Index: tests/installall/config/sheet-names.cfg
==================================================================
--- tests/installall/config/sheet-names.cfg
+++ /dev/null
@@ -1,2 +0,0 @@
-megatest.config
-runconfigs.config

DELETED tests/installall/config/sxml/_sheets.sxml
Index: tests/installall/config/sxml/_sheets.sxml
==================================================================
--- tests/installall/config/sxml/_sheets.sxml
+++ /dev/null
@@ -1,51 +0,0 @@
-((@ (http://www.w3.org/2001/XMLSchema-instance:schemaLocation
-      "http://www.gnumeric.org/v9.xsd"))
- (http://www.gnumeric.org/v10.dtd:Version
-   (@ (Minor "17") (Major "10") (Full "1.10.17") (Epoch "1")))
- (http://www.gnumeric.org/v10.dtd:Attributes
-   (http://www.gnumeric.org/v10.dtd:Attribute
-     (http://www.gnumeric.org/v10.dtd:type "4")
-     (http://www.gnumeric.org/v10.dtd:name
-       "WorkbookView::show_horizontal_scrollbar")
-     (http://www.gnumeric.org/v10.dtd:value "TRUE"))
-   (http://www.gnumeric.org/v10.dtd:Attribute
-     (http://www.gnumeric.org/v10.dtd:type "4")
-     (http://www.gnumeric.org/v10.dtd:name
-       "WorkbookView::show_vertical_scrollbar")
-     (http://www.gnumeric.org/v10.dtd:value "TRUE"))
-   (http://www.gnumeric.org/v10.dtd:Attribute
-     (http://www.gnumeric.org/v10.dtd:type "4")
-     (http://www.gnumeric.org/v10.dtd:name "WorkbookView::show_notebook_tabs")
-     (http://www.gnumeric.org/v10.dtd:value "TRUE"))
-   (http://www.gnumeric.org/v10.dtd:Attribute
-     (http://www.gnumeric.org/v10.dtd:type "4")
-     (http://www.gnumeric.org/v10.dtd:name "WorkbookView::do_auto_completion")
-     (http://www.gnumeric.org/v10.dtd:value "TRUE"))
-   (http://www.gnumeric.org/v10.dtd:Attribute
-     (http://www.gnumeric.org/v10.dtd:type "4")
-     (http://www.gnumeric.org/v10.dtd:name "WorkbookView::is_protected")
-     (http://www.gnumeric.org/v10.dtd:value "FALSE")))
- (urn:oasis:names:tc:opendocument:xmlns:office:1.0:document-meta
-   (@ (urn:oasis:names:tc:opendocument:xmlns:office:1.0:version "1.2"))
-   (urn:oasis:names:tc:opendocument:xmlns:office:1.0:meta
-     (http://purl.org/dc/elements/1.1/:date "2013-07-21T23:45:07Z")
-     (urn:oasis:names:tc:opendocument:xmlns:meta:1.0:creation-date
-       "2013-07-21T23:42:35Z")))
- (http://www.gnumeric.org/v10.dtd:Calculation
-   (@ (MaxIterations "100")
-      (ManualRecalc "0")
-      (IterationTolerance "0.001")
-      (FloatRadix "2")
-      (FloatDigits "53")
-      (EnableIteration "1")))
- (http://www.gnumeric.org/v10.dtd:SheetNameIndex
-   (http://www.gnumeric.org/v10.dtd:SheetName
-     (@ (http://www.gnumeric.org/v10.dtd:Rows "65536")
-        (http://www.gnumeric.org/v10.dtd:Cols "256"))
-     "megatest.config")
-   (http://www.gnumeric.org/v10.dtd:SheetName
-     (@ (http://www.gnumeric.org/v10.dtd:Rows "65536")
-        (http://www.gnumeric.org/v10.dtd:Cols "256"))
-     "runconfigs.config"))
- (http://www.gnumeric.org/v10.dtd:Geometry (@ (Width "1440") (Height "647")))
- (http://www.gnumeric.org/v10.dtd:UIData (@ (SelectedTab "0"))))

DELETED tests/installall/config/sxml/_workbook.sxml
Index: tests/installall/config/sxml/_workbook.sxml
==================================================================
--- tests/installall/config/sxml/_workbook.sxml
+++ /dev/null
@@ -1,1 +0,0 @@
-(*TOP* (*PI* xml "version=\"1.0\" encoding=\"UTF-8\""))

DELETED tests/installall/config/sxml/megatest.config.sxml
Index: tests/installall/config/sxml/megatest.config.sxml
==================================================================
--- tests/installall/config/sxml/megatest.config.sxml
+++ /dev/null
@@ -1,108 +0,0 @@
-(http://www.gnumeric.org/v10.dtd:Sheet
-  (@ (Visibility "GNM_SHEET_VISIBILITY_VISIBLE")
-     (OutlineSymbolsRight "1")
-     (OutlineSymbolsBelow "1")
-     (HideZero "0")
-     (HideRowHeader "0")
-     (HideGrid "0")
-     (HideColHeader "0")
-     (GridColor "0:0:0")
-     (DisplayOutlines "1")
-     (DisplayFormulas "0"))
-  (http://www.gnumeric.org/v10.dtd:MaxCol "5")
-  (http://www.gnumeric.org/v10.dtd:MaxRow "7")
-  (http://www.gnumeric.org/v10.dtd:Zoom "1")
-  (http://www.gnumeric.org/v10.dtd:Names
-    (http://www.gnumeric.org/v10.dtd:Name
-      (http://www.gnumeric.org/v10.dtd:name "Print_Area")
-      (http://www.gnumeric.org/v10.dtd:value "#REF!")
-      (http://www.gnumeric.org/v10.dtd:position "A1"))
-    (http://www.gnumeric.org/v10.dtd:Name
-      (http://www.gnumeric.org/v10.dtd:name "Sheet_Title")
-      (http://www.gnumeric.org/v10.dtd:value "\"megatest.config\"")
-      (http://www.gnumeric.org/v10.dtd:position "A1")))
-  (http://www.gnumeric.org/v10.dtd:PrintInformation
-    (http://www.gnumeric.org/v10.dtd:Margins
-      (http://www.gnumeric.org/v10.dtd:top (@ (PrefUnit "mm") (Points "120")))
-      (http://www.gnumeric.org/v10.dtd:bottom
-        (@ (PrefUnit "mm") (Points "120")))
-      (http://www.gnumeric.org/v10.dtd:left (@ (PrefUnit "mm") (Points "72")))
-      (http://www.gnumeric.org/v10.dtd:right (@ (PrefUnit "mm") (Points "72")))
-      (http://www.gnumeric.org/v10.dtd:header
-        (@ (PrefUnit "mm") (Points "72")))
-      (http://www.gnumeric.org/v10.dtd:footer
-        (@ (PrefUnit "mm") (Points "72"))))
-    (http://www.gnumeric.org/v10.dtd:Scale
-      (@ (type "percentage") (percentage "100")))
-    (http://www.gnumeric.org/v10.dtd:vcenter (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:hcenter (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:grid (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:even_if_only_styles (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:monochrome (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:draft (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:titles (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:do_not_print (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:print_range (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:order "d_then_r")
-    (http://www.gnumeric.org/v10.dtd:orientation "portrait")
-    (http://www.gnumeric.org/v10.dtd:Header
-      (@ (Right "") (Middle "&[TAB]") (Left "")))
-    (http://www.gnumeric.org/v10.dtd:Footer
-      (@ (Right "") (Middle "Page &[PAGE]") (Left "")))
-    (http://www.gnumeric.org/v10.dtd:paper "na_letter")
-    (http://www.gnumeric.org/v10.dtd:comments "in_place")
-    (http://www.gnumeric.org/v10.dtd:errors "as_displayed"))
-  (http://www.gnumeric.org/v10.dtd:Styles
-    (http://www.gnumeric.org/v10.dtd:StyleRegion
-      (@ (startRow "0") (startCol "0") (endRow "65535") (endCol "255"))
-      (http://www.gnumeric.org/v10.dtd:Style
-        (@ (WrapText "0")
-           (VAlign "2")
-           (ShrinkToFit "0")
-           (Shade "0")
-           (Rotation "0")
-           (PatternColor "0:0:0")
-           (Locked "1")
-           (Indent "0")
-           (Hidden "0")
-           (HAlign "1")
-           (Format "General")
-           (Fore "0:0:0")
-           (Back "FFFF:FFFF:FFFF"))
-        (http://www.gnumeric.org/v10.dtd:Font
-          (@ (Unit "10")
-             (Underline "0")
-             (StrikeThrough "0")
-             (Script "0")
-             (Italic "0")
-             (Bold "0"))
-          "Sans"))))
-  (http://www.gnumeric.org/v10.dtd:Cols
-    (@ (DefaultSizePts "48"))
-    (http://www.gnumeric.org/v10.dtd:ColInfo
-      (@ (Unit "112.5") (No "0") (HardSize "1")))
-    (http://www.gnumeric.org/v10.dtd:ColInfo (@ (Unit "48") (No "1")))
-    (http://www.gnumeric.org/v10.dtd:ColInfo
-      (@ (Unit "63.75") (No "2") (HardSize "1")))
-    (http://www.gnumeric.org/v10.dtd:ColInfo (@ (Unit "48") (No "3")))
-    (http://www.gnumeric.org/v10.dtd:ColInfo
-      (@ (Unit "86.25") (No "4") (HardSize "1")))
-    (http://www.gnumeric.org/v10.dtd:ColInfo (@ (Unit "48") (No "5"))))
-  (http://www.gnumeric.org/v10.dtd:Rows
-    (@ (DefaultSizePts "12.75"))
-    (http://www.gnumeric.org/v10.dtd:RowInfo
-      (@ (Unit "12.75") (No "0") (Count "8"))))
-  (http://www.gnumeric.org/v10.dtd:Selections
-    (@ (CursorRow "0") (CursorCol "0"))
-    (http://www.gnumeric.org/v10.dtd:Selection
-      (@ (startRow "0") (startCol "0") (endRow "0") (endCol "0"))))
-  (http://www.gnumeric.org/v10.dtd:SheetLayout (@ (TopLeft "A1")))
-  (http://www.gnumeric.org/v10.dtd:Solver
-    (@ (ProgramR "0")
-       (ProblemType "0")
-       (NonNeg "1")
-       (ModelType "0")
-       (MaxTime "60")
-       (MaxIter "1000")
-       (Discr "0")
-       (AutoScale "0"))))

DELETED tests/installall/config/sxml/runconfigs.config.sxml
Index: tests/installall/config/sxml/runconfigs.config.sxml
==================================================================
--- tests/installall/config/sxml/runconfigs.config.sxml
+++ /dev/null
@@ -1,111 +0,0 @@
-(http://www.gnumeric.org/v10.dtd:Sheet
-  (@ (Visibility "GNM_SHEET_VISIBILITY_VISIBLE")
-     (OutlineSymbolsRight "1")
-     (OutlineSymbolsBelow "1")
-     (HideZero "0")
-     (HideRowHeader "0")
-     (HideGrid "0")
-     (HideColHeader "0")
-     (GridColor "0:0:0")
-     (DisplayOutlines "1")
-     (DisplayFormulas "0"))
-  (http://www.gnumeric.org/v10.dtd:MaxCol "3")
-  (http://www.gnumeric.org/v10.dtd:MaxRow "7")
-  (http://www.gnumeric.org/v10.dtd:Zoom "1")
-  (http://www.gnumeric.org/v10.dtd:Names
-    (http://www.gnumeric.org/v10.dtd:Name
-      (http://www.gnumeric.org/v10.dtd:name "Print_Area")
-      (http://www.gnumeric.org/v10.dtd:value "#REF!")
-      (http://www.gnumeric.org/v10.dtd:position "A1"))
-    (http://www.gnumeric.org/v10.dtd:Name
-      (http://www.gnumeric.org/v10.dtd:name "Sheet_Title")
-      (http://www.gnumeric.org/v10.dtd:value "\"runconfigs.config\"")
-      (http://www.gnumeric.org/v10.dtd:position "A1")))
-  (http://www.gnumeric.org/v10.dtd:PrintInformation
-    (http://www.gnumeric.org/v10.dtd:Margins
-      (http://www.gnumeric.org/v10.dtd:top (@ (PrefUnit "mm") (Points "120")))
-      (http://www.gnumeric.org/v10.dtd:bottom
-        (@ (PrefUnit "mm") (Points "120")))
-      (http://www.gnumeric.org/v10.dtd:left (@ (PrefUnit "mm") (Points "72")))
-      (http://www.gnumeric.org/v10.dtd:right (@ (PrefUnit "mm") (Points "72")))
-      (http://www.gnumeric.org/v10.dtd:header
-        (@ (PrefUnit "mm") (Points "72")))
-      (http://www.gnumeric.org/v10.dtd:footer
-        (@ (PrefUnit "mm") (Points "72"))))
-    (http://www.gnumeric.org/v10.dtd:Scale
-      (@ (type "percentage") (percentage "100")))
-    (http://www.gnumeric.org/v10.dtd:vcenter (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:hcenter (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:grid (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:even_if_only_styles (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:monochrome (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:draft (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:titles (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:do_not_print (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:print_range (@ (value "0")))
-    (http://www.gnumeric.org/v10.dtd:order "d_then_r")
-    (http://www.gnumeric.org/v10.dtd:orientation "portrait")
-    (http://www.gnumeric.org/v10.dtd:Header
-      (@ (Right "") (Middle "&[TAB]") (Left "")))
-    (http://www.gnumeric.org/v10.dtd:Footer
-      (@ (Right "") (Middle "Page &[PAGE]") (Left "")))
-    (http://www.gnumeric.org/v10.dtd:paper "na_letter")
-    (http://www.gnumeric.org/v10.dtd:comments "in_place")
-    (http://www.gnumeric.org/v10.dtd:errors "as_displayed"))
-  (http://www.gnumeric.org/v10.dtd:Styles
-    (http://www.gnumeric.org/v10.dtd:StyleRegion
-      (@ (startRow "0") (startCol "0") (endRow "65535") (endCol "255"))
-      (http://www.gnumeric.org/v10.dtd:Style
-        (@ (WrapText "0")
-           (VAlign "2")
-           (ShrinkToFit "0")
-           (Shade "0")
-           (Rotation "0")
-           (PatternColor "0:0:0")
-           (Locked "1")
-           (Indent "0")
-           (Hidden "0")
-           (HAlign "1")
-           (Format "General")
-           (Fore "0:0:0")
-           (Back "FFFF:FFFF:FFFF"))
-        (http://www.gnumeric.org/v10.dtd:Font
-          (@ (Unit "10")
-             (Underline "0")
-             (StrikeThrough "0")
-             (Script "0")
-             (Italic "0")
-             (Bold "0"))
-          "Sans"))))
-  (http://www.gnumeric.org/v10.dtd:Cols
-    (@ (DefaultSizePts "48"))
-    (http://www.gnumeric.org/v10.dtd:ColInfo
-      (@ (Unit "108.8") (No "0") (HardSize "1")))
-    (http://www.gnumeric.org/v10.dtd:ColInfo
-      (@ (Unit "97.5") (No "1") (HardSize "1")))
-    (http://www.gnumeric.org/v10.dtd:ColInfo
-      (@ (Unit "100.5") (No "2") (HardSize "1") (Count "2"))))
-  (http://www.gnumeric.org/v10.dtd:Rows
-    (@ (DefaultSizePts "12.75"))
-    (http://www.gnumeric.org/v10.dtd:RowInfo
-      (@ (Unit "13.5") (No "0") (Count "2")))
-    (http://www.gnumeric.org/v10.dtd:RowInfo (@ (Unit "12.75") (No "2")))
-    (http://www.gnumeric.org/v10.dtd:RowInfo
-      (@ (Unit "13.5") (No "3") (Count "2")))
-    (http://www.gnumeric.org/v10.dtd:RowInfo (@ (Unit "12.75") (No "5")))
-    (http://www.gnumeric.org/v10.dtd:RowInfo (@ (Unit "13.5") (No "6")))
-    (http://www.gnumeric.org/v10.dtd:RowInfo (@ (Unit "12.75") (No "7"))))
-  (http://www.gnumeric.org/v10.dtd:Selections
-    (@ (CursorRow "7") (CursorCol "3"))
-    (http://www.gnumeric.org/v10.dtd:Selection
-      (@ (startRow "7") (startCol "3") (endRow "7") (endCol "3"))))
-  (http://www.gnumeric.org/v10.dtd:SheetLayout (@ (TopLeft "A1")))
-  (http://www.gnumeric.org/v10.dtd:Solver
-    (@ (ProgramR "0")
-       (ProblemType "0")
-       (NonNeg "1")
-       (ModelType "0")
-       (MaxTime "60")
-       (MaxIter "1000")
-       (Discr "0")
-       (AutoScale "0"))))

DELETED tests/installall/configs/chicken-4.8.0.4.config
Index: tests/installall/configs/chicken-4.8.0.4.config
==================================================================
--- tests/installall/configs/chicken-4.8.0.4.config
+++ /dev/null
@@ -1,1 +0,0 @@
-CHICKEN_URL http://code.call-cc.org/releases/4.8.0/chicken-4.8.0.4.tar.gz

DELETED tests/installall/configs/chicken-4.8.1.config
Index: tests/installall/configs/chicken-4.8.1.config
==================================================================
--- tests/installall/configs/chicken-4.8.1.config
+++ /dev/null
@@ -1,1 +0,0 @@
-CHICKEN_URL http://code.call-cc.org/dev-snapshots/2013/01/04/chicken-4.8.1.tar.gz

DELETED tests/installall/megatest.config
Index: tests/installall/megatest.config
==================================================================
--- tests/installall/megatest.config
+++ /dev/null
@@ -1,39 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[fields]
-CHICKEN_VERSION TEXT
-MEGATEST_VERSION TEXT
-IUPMODE TEXT
-BUILD_TAG TEXT
-
-[setup]
-max_concurrent_jobs 6
-linktree #{getenv MT_RUN_AREA_HOME}/links
-testcopycmd cp --remove-destination -rsv TEST_SRC_PATH/. TEST_TARG_PATH/. >> TEST_TARG_PATH/mt_launch.log 2>> TEST_TARG_PATH/mt_launch.log
-
-[jobtools]
-useshell yes
-launcher nbfind
-
-[env-override]
-EXAMPLE_VAR example value
-
-[server]
-port 9080
-
-[disks]
-disk0 #{getenv MT_RUN_AREA_HOME}/runs
-

DELETED tests/installall/runconfigs.config
Index: tests/installall/runconfigs.config
==================================================================
--- tests/installall/runconfigs.config
+++ /dev/null
@@ -1,53 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-[.............]
-#
-# [CHICKEN_VERSION/MEGATEST_VERSION/IUPMODE/PLATFORM/BUILD_TAG]
-#
-
-[default]
-ALLTESTS see this variable
-PREFIX #{getenv MT_RUN_AREA_HOME}/#{getenv BUILD_TAG}/#{getenv MT_RUNNAME}
-DOWNLOADS #{getenv MT_RUN_AREA_HOME}/downloads
-IUPLIB 26g4
-PLATFORM linux
-LOGPRO_VERSION v1.05
-BUILDSQLITE yes
-SQLITE3_VERSION 3071401
-ZEROMQ_VERSION  2.2.0
-logpro_VERSION v1.08
-stml_VERSION v0.901
-megatest_VERSION v1.5511
-
-[include configs/hicken-#{getenv CHICKEN_VERSION}.config]
-
-# Currently must have at least one variable in a section
-[4.8.0/trunk/bin/std]
-IUP_VERSION na
-
-[4.8.0.4/trunk/src/std]
-CHICKEN_URL http://code.call-cc.org/releases/4.8.0/chicken-4.8.0.4.tar.gz
-IUP_VERSION na
-
-[4.8.1/trunk/src/std]
-IUP_VERSION na
-
-[4.8.0/v1.5508/opt]
-IUP_VERSION na
-PREFIX /opt/chicken/4.8.0
-
-[4.8.0/trunk/centos5.7vm]
-BUILDSQLITE no

DELETED tests/installall/tests/canvas-draw/install.logpro
Index: tests/installall/tests/canvas-draw/install.logpro
==================================================================
--- tests/installall/tests/canvas-draw/install.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/canvas-draw/install.sh
Index: tests/installall/tests/canvas-draw/install.sh
==================================================================
--- tests/installall/tests/canvas-draw/install.sh
+++ /dev/null
@@ -1,20 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh

DELETED tests/installall/tests/canvas-draw/testconfig
Index: tests/installall/tests/canvas-draw/testconfig
==================================================================
--- tests/installall/tests/canvas-draw/testconfig
+++ /dev/null
@@ -1,33 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-install install.sh
-
-# Test requirements are specified here
-[requirements]
-waiton iuplib setup
-
-# Iteration for your tests are controlled by the items section
-[items]
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Install the canvas-draw egg
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/chicken/compile.logpro
Index: tests/installall/tests/chicken/compile.logpro
==================================================================
--- tests/installall/tests/chicken/compile.logpro
+++ /dev/null
@@ -1,25 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Leaving directory ..." #/Leaving directory/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:ignore   in "LogFileBody"  >= 0 "Ignore HAVE_STRERROR" #/HAVE_STRERROR/)
-
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/chicken/compile.sh
Index: tests/installall/tests/chicken/compile.sh
==================================================================
--- tests/installall/tests/chicken/compile.sh
+++ /dev/null
@@ -1,23 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-
-cd chicken-${CHICKEN_VERSION}
-make PLATFORM=${PLATFORM} PREFIX=${PREFIX}

DELETED tests/installall/tests/chicken/download.logpro
Index: tests/installall/tests/chicken/download.logpro
==================================================================
--- tests/installall/tests/chicken/download.logpro
+++ /dev/null
@@ -1,26 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "README file must be seen" #/README$/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-
-(expect:ignore   in "LogFileBody"  >= 0 "Ignore error flagged by finalizer-error-test" #/\w+-error/)
-
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/chicken/download.sh
Index: tests/installall/tests/chicken/download.sh
==================================================================
--- tests/installall/tests/chicken/download.sh
+++ /dev/null
@@ -1,34 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-
-if [ ! -e ${DOWNLOADS}/chicken-${CHICKEN_VERSION}.tar.gz ]; then 
-  if [ "${CHICKEN_URL}" == "" ]; then
-     CHICKEN_URL=http://code.call-cc.org/releases/${CHICKEN_VERSION}/chicken-${CHICKEN_VERSION}.tar.gz
-  fi
-  echo "Downloading $CHICKEN_URL"
-  (cd ${DOWNLOADS};wget ${CHICKEN_URL})
-fi 
-
-ls -l ${DOWNLOADS}/chicken-${CHICKEN_VERSION}.tar.gz
-
-tar xfvz ${DOWNLOADS}/chicken-${CHICKEN_VERSION}.tar.gz
-
-ls -l chicken-${CHICKEN_VERSION}

DELETED tests/installall/tests/chicken/install.logpro
Index: tests/installall/tests/chicken/install.logpro
==================================================================
--- tests/installall/tests/chicken/install.logpro
+++ /dev/null
@@ -1,26 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Leaving directory" #/Leaving directory/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-
-(expect:ignore   in "LogFileBody" >= 0 "Ignore error in some filenames" #/\w+-errors/)
-
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/chicken/install.sh
Index: tests/installall/tests/chicken/install.sh
==================================================================
--- tests/installall/tests/chicken/install.sh
+++ /dev/null
@@ -1,26 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-# source $PREFIX
-
-cd chicken-${CHICKEN_VERSION}
-make PLATFORM=${PLATFORM} PREFIX=${PREFIX} install
-
-ls -l ${PREFIX}/bin

DELETED tests/installall/tests/chicken/testconfig
Index: tests/installall/tests/chicken/testconfig
==================================================================
--- tests/installall/tests/chicken/testconfig
+++ /dev/null
@@ -1,37 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-download download.sh
-compile compile.sh
-install install.sh
-
-# Test requirements are specified here
-[requirements]
-waiton setup
-# priority 10
-
-# Iteration for your tests are controlled by the items section
-[items]
-# CHICKEN_VERSION 4.8.0
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Download and install chicken scheme
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/eggs/install.logpro
Index: tests/installall/tests/eggs/install.logpro
==================================================================
--- tests/installall/tests/eggs/install.logpro
+++ /dev/null
@@ -1,24 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Last thing done is chmod ..." #/chmod /)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody" >= 0 "Ignore someword-errors"        #/\w+-error/)
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/eggs/install.sh
Index: tests/installall/tests/eggs/install.sh
==================================================================
--- tests/installall/tests/eggs/install.sh
+++ /dev/null
@@ -1,23 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-
-$PREFIX/bin/chicken-install $PROX $EGG_NAME
-

DELETED tests/installall/tests/eggs/testconfig
Index: tests/installall/tests/eggs/testconfig
==================================================================
--- tests/installall/tests/eggs/testconfig
+++ /dev/null
@@ -1,35 +0,0 @@
-## This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
- Add additional steps here. Format is "stepname script"
-[ezsteps]
-install install.sh
-
-# Test requirements are specified here
-[requirements]
-waiton chicken setup
-priority 9
-
-# Iteration for your tests are controlled by the items section
-[items]
-EGG_NAME matchable readline apropos base64 regex-literals format regex-case test coops trace csv dot-locking posix-utils posix-extras directory-utils hostinfo tcp-server rpc csv-xml fmt json md5 ssax sxml-serializer sxml-modifications salmonella sql-de-lite postgresql
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Download and install eggs with no significant prerequisites
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/ffcall/compile.logpro
Index: tests/installall/tests/ffcall/compile.logpro
==================================================================
--- tests/installall/tests/ffcall/compile.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Leaving directory" #/Leaving directory/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/ffcall/compile.sh
Index: tests/installall/tests/ffcall/compile.sh
==================================================================
--- tests/installall/tests/ffcall/compile.sh
+++ /dev/null
@@ -1,24 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-
-cd ffcall
-./configure --prefix=${PREFIX} --enable-shared
-make

DELETED tests/installall/tests/ffcall/download.logpro
Index: tests/installall/tests/ffcall/download.logpro
==================================================================
--- tests/installall/tests/ffcall/download.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "VERSION" #/ VERSION/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/ffcall/download.sh
Index: tests/installall/tests/ffcall/download.sh
==================================================================
--- tests/installall/tests/ffcall/download.sh
+++ /dev/null
@@ -1,28 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-
-if ! [[ -e ${DOWNLOADS}/ffcall.tar.gz ]] ; then
-    (cd ${DOWNLOADS};wget http://www.kiatoa.com/matt/iup/ffcall.tar.gz )
-fi
-
-tar xfvz ${DOWNLOADS}/ffcall.tar.gz
-
-ls -l ffcall

DELETED tests/installall/tests/ffcall/install.logpro
Index: tests/installall/tests/ffcall/install.logpro
==================================================================
--- tests/installall/tests/ffcall/install.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Leaving directory" #/Leaving directory/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/ffcall/install.sh
Index: tests/installall/tests/ffcall/install.sh
==================================================================
--- tests/installall/tests/ffcall/install.sh
+++ /dev/null
@@ -1,23 +0,0 @@
-#!/usr/bin/env bash
-
-## This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
- Run your step here
-
-source $PREFIX/buildsetup.sh
-
-cd ffcall
-make install

DELETED tests/installall/tests/ffcall/testconfig
Index: tests/installall/tests/ffcall/testconfig
==================================================================
--- tests/installall/tests/ffcall/testconfig
+++ /dev/null
@@ -1,35 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-download download.sh
-compile compile.sh
-install install.sh
-
-# Test requirements are specified here
-[requirements]
-waiton setup
-
-# Iteration for your tests are controlled by the items section
-[items]
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Install the ffcall library
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/iup/install.logpro
Index: tests/installall/tests/iup/install.logpro
==================================================================
--- tests/installall/tests/iup/install.logpro
+++ /dev/null
@@ -1,24 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "chmod is roughly last thing that happens" #/chmod /)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  >= 0 "Ignore setup-error-handling" #/\w+-error/)
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/iup/install.sh
Index: tests/installall/tests/iup/install.sh
==================================================================
--- tests/installall/tests/iup/install.sh
+++ /dev/null
@@ -1,27 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh
-# source $PREFIX/setup-chicken4x.sh
-
-export CSCLIBS=`echo $LD_LIBRARY_PATH | sed 's/:/ -L/g'`
-CSC_OPTIONS="-I$PREFIX/include -L$CSCLIBS" $PREFIX/bin/chicken-install $PROX -D no-library-checks -feature disable-iup-web iup
-# CSC_OPTIONS="-I$PREFIX/include -L$CSCLIBS" $CHICKEN_INSTALL $PROX -D no-library-checks -feature disable-iup-web -deploy -prefix $DEPLOYTARG iup
-# iup:1.0.2 
-CSC_OPTIONS="-I$PREFIX/include -L$CSCLIBS" $PREFIX/bin/chicken-install $PROX -D no-library-checks canvas-draw
-# CSC_OPTIONS="-I$PREFIX/include -L$CSCLIBS" $CHICKEN_INSTALL $PROX -D no-library-checks -deploy -prefix $DEPLOYTARG canvas-draw

DELETED tests/installall/tests/iup/testconfig
Index: tests/installall/tests/iup/testconfig
==================================================================
--- tests/installall/tests/iup/testconfig
+++ /dev/null
@@ -1,33 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-install install.sh
-
-# Test requirements are specified here
-[requirements]
-waiton iup#{getenv IUPMODE}lib tougheggs
-
-# Iteration for your tests are controlled by the items section
-[items]
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Install iup egg
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/iupbinlib/compile.logpro
Index: tests/installall/tests/iupbinlib/compile.logpro
==================================================================
--- tests/installall/tests/iupbinlib/compile.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/iupbinlib/compile.sh
Index: tests/installall/tests/iupbinlib/compile.sh
==================================================================
--- tests/installall/tests/iupbinlib/compile.sh
+++ /dev/null
@@ -1,20 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh

DELETED tests/installall/tests/iupbinlib/download.logpro
Index: tests/installall/tests/iupbinlib/download.logpro
==================================================================
--- tests/installall/tests/iupbinlib/download.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "README file should show up" #/README/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/iupbinlib/download.sh
Index: tests/installall/tests/iupbinlib/download.sh
==================================================================
--- tests/installall/tests/iupbinlib/download.sh
+++ /dev/null
@@ -1,43 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh
-# source $PREFIX/setup-chicken4x.sh
-
-if [[ `uname -a | grep x86_64` == "" ]]; then 
-    export ARCHSIZE=''
-else
-    export ARCHSIZE=64_
-fi
-    # export files="cd-5.4.1_Linux${IUPLIB}_lib.tar.gz im-3.6.3_Linux${IUPLIB}_lib.tar.gz iup-3.5_Linux${IUPLIB}_lib.tar.gz"
-if [[ x$USEOLDIUP == "x" ]];then
-   export files="cd-5.5.1_Linux${IUPLIB}_${ARCHSIZE}lib.tar.gz im-3.8_Linux${IUPLIB}_${ARCHSIZE}lib.tar.gz iup-3.6_Linux${IUPLIB}_${ARCHSIZE}lib.tar.gz"
-else
-   echo WARNING: Using old IUP libraries
-   export files="cd-5.4.1_Linux${IUPLIB}_${ARCHSIZE}lib.tar.gz im-3.6.3_Linux${IUPLIB}_${ARCHSIZE}lib.tar.gz iup-3.5_Linux${IUPLIB}_${ARCHSIZE}lib.tar.gz"
-fi
-
-mkdir -p $PREFIX/iuplib
-for a in `echo $files` ; do
-    if ! [[ -e ${DOWNLOADS}/$a ]] ; then
-	(cd ${DOWNLOADS};wget http://www.kiatoa.com/matt/iup/$a)
-    fi
-    echo Untarring $a into $PREFIX/lib
-    (cd $PREFIX/lib;tar xfvz ${DOWNLOADS}/$a;mv include/* ../include)
-done
-

DELETED tests/installall/tests/iupbinlib/install.logpro
Index: tests/installall/tests/iupbinlib/install.logpro
==================================================================
--- tests/installall/tests/iupbinlib/install.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/iupbinlib/install.sh
Index: tests/installall/tests/iupbinlib/install.sh
==================================================================
--- tests/installall/tests/iupbinlib/install.sh
+++ /dev/null
@@ -1,19 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh

DELETED tests/installall/tests/iupbinlib/testconfig
Index: tests/installall/tests/iupbinlib/testconfig
==================================================================
--- tests/installall/tests/iupbinlib/testconfig
+++ /dev/null
@@ -1,33 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-download download.sh
-
-# Test requirements are specified here
-[requirements]
-waiton ffcall setup
-
-# Iteration for your tests are controlled by the items section
-[items]
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Install the iup library if it is not already installed
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/iupbinlib/untar.logpro
Index: tests/installall/tests/iupbinlib/untar.logpro
==================================================================
--- tests/installall/tests/iupbinlib/untar.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/iupbinlib/untar.sh
Index: tests/installall/tests/iupbinlib/untar.sh
==================================================================
--- tests/installall/tests/iupbinlib/untar.sh
+++ /dev/null
@@ -1,19 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh

DELETED tests/installall/tests/iupsrclib/cd.logpro
Index: tests/installall/tests/iupsrclib/cd.logpro
==================================================================
--- tests/installall/tests/iupsrclib/cd.logpro
+++ /dev/null
@@ -1,18 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:ignore in "LogFileBody" >= 0 "Ignore these binary operator errors for now" #/error: missing binary operator/)
-
-(load "compile.logpro")

DELETED tests/installall/tests/iupsrclib/compile.logpro
Index: tests/installall/tests/iupsrclib/compile.logpro
==================================================================
--- tests/installall/tests/iupsrclib/compile.logpro
+++ /dev/null
@@ -1,27 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Completed signature" #/(Dynamic Library.*Done|Leaving directory|Nothing to be done)/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody" >= 0 "Ignore files with error in name" #/error.[ch]/)
-(expect:ignore   in "LogFileBody" >= 0 "Ignore files with errors in name" #/errors.[ch]/)
-(expect:ignore   in "LogFileBody" >= 0 "Ignore files with warn in name"  #/warning.[ch]/)
-
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/iupsrclib/compile.sh
Index: tests/installall/tests/iupsrclib/compile.sh
==================================================================
--- tests/installall/tests/iupsrclib/compile.sh
+++ /dev/null
@@ -1,32 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-pkg=$1
-
-source $PREFIX/buildsetup.sh
-
-export LUA_SUFFIX=
-export LUA_INC=$MT_TEST_RUN_DIR/lua52/include
-
-if [[ $pkg == "lua52" ]]; then
-    (cd $pkg/src;make $PLATFORM)
-else
-    (cd $pkg/src;make)
-fi
-

DELETED tests/installall/tests/iupsrclib/download.logpro
Index: tests/installall/tests/iupsrclib/download.logpro
==================================================================
--- tests/installall/tests/iupsrclib/download.logpro
+++ /dev/null
@@ -1,28 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "README file should show up" #/README/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-
-(expect:ignore   in "LogFileBody" >= 0 "Ignore files with error in name" #/error.[ch]/)
-(expect:ignore   in "LogFileBody" >= 0 "Ignore files with errors in name" #/errors.[ch]/)
-(expect:ignore   in "LogFileBody" >= 0 "Ignore files with warn in name"  #/warning.[ch]/)
-
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/iupsrclib/download.sh
Index: tests/installall/tests/iupsrclib/download.sh
==================================================================
--- tests/installall/tests/iupsrclib/download.sh
+++ /dev/null
@@ -1,29 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh
-
-mkdir -p $PREFIX/iuplib
-for a in cd-5.6.1_Sources.tar.gz  im-3.8.1_Sources.tar.gz  iup-3.8_Sources.tar.gz lua-5.2.1_Sources.tar.gz; do
-    if ! [[ -e ${DOWNLOADS}/$a ]] ; then
-	(cd ${DOWNLOADS};wget http://www.kiatoa.com/matt/iup/$a)
-    fi
-    tar xfvz ${DOWNLOADS}/$a
-done
-
-find . -type d -exec chmod ug+x {} \;

DELETED tests/installall/tests/iupsrclib/im.logpro
Index: tests/installall/tests/iupsrclib/im.logpro
==================================================================
--- tests/installall/tests/iupsrclib/im.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(load "compile.logpro")

DELETED tests/installall/tests/iupsrclib/install.logpro
Index: tests/installall/tests/iupsrclib/install.logpro
==================================================================
--- tests/installall/tests/iupsrclib/install.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/iupsrclib/install.sh
Index: tests/installall/tests/iupsrclib/install.sh
==================================================================
--- tests/installall/tests/iupsrclib/install.sh
+++ /dev/null
@@ -1,37 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh
-
-# The so files
-cp -f im/lib/Linux26g4/*.so $PREFIX/lib
-cp -f cd/lib/Linux26g4/*.so $PREFIX/lib
-cp -f iup/lib/Linux26g4/*.so $PREFIX/lib
-
-# The development files
-mkdir -p $PREFIX/include/im
-cp -fR im/include/*.h $PREFIX/include/im
-cp -f im/lib/Linux26g4/*.a $PREFIX/lib
-
-mkdir -p $PREFIX/include/cd
-cp -f cd/include/*.h $PREFIX/include/cd
-cp -f cd/lib/Linux26g4/*.a $PREFIX/lib
-
-mkdir -p /usr/include/iup
-cp -f iup/include/*.h $PREFIX/include/iup             
-cp -f iup/lib/Linux26g4/*.a $PREFIX/lib     

DELETED tests/installall/tests/iupsrclib/iup.logpro
Index: tests/installall/tests/iupsrclib/iup.logpro
==================================================================
--- tests/installall/tests/iupsrclib/iup.logpro
+++ /dev/null
@@ -1,18 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(expect:ignore in "LogFileBody" >= 0 "Ignore these binary operator errors for now" #/error: missing binary operator/ expires: "10/10/2013")
-
-(load "compile.logpro")

DELETED tests/installall/tests/iupsrclib/lua.logpro
Index: tests/installall/tests/iupsrclib/lua.logpro
==================================================================
--- tests/installall/tests/iupsrclib/lua.logpro
+++ /dev/null
@@ -1,16 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-(load "compile.logpro")

DELETED tests/installall/tests/iupsrclib/testconfig
Index: tests/installall/tests/iupsrclib/testconfig
==================================================================
--- tests/installall/tests/iupsrclib/testconfig
+++ /dev/null
@@ -1,37 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-download download.sh
-lua compile.sh lua52
-im compile.sh im
-cd compile.sh cd
-iup compile.sh iup
-
-# Test requirements are specified here
-[requirements]
-waiton ffcall setup
-
-# Iteration for your tests are controlled by the items section
-[items]
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Install the iup library if it is not already installed
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/iupsrclib/untar.logpro
Index: tests/installall/tests/iupsrclib/untar.logpro
==================================================================
--- tests/installall/tests/iupsrclib/untar.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/iupsrclib/untar.sh
Index: tests/installall/tests/iupsrclib/untar.sh
==================================================================
--- tests/installall/tests/iupsrclib/untar.sh
+++ /dev/null
@@ -1,19 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh

DELETED tests/installall/tests/mmisc/clone.logpro
Index: tests/installall/tests/mmisc/clone.logpro
==================================================================
--- tests/installall/tests/mmisc/clone.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Output from fossil" #/^repository:\s+/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/i)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/mmisc/clone.sh
Index: tests/installall/tests/mmisc/clone.sh
==================================================================
--- tests/installall/tests/mmisc/clone.sh
+++ /dev/null
@@ -1,26 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh
-
-fossil clone http://www.kiatoa.com/fossils/$FSLPKG $FSLPKG.fossil
-
-mkdir src
-cd src 
-fossil open ../$FSLPKG.fossil --nested
-fossil co ${$FSLPKG}_VERSION}

DELETED tests/installall/tests/mmisc/install.logpro
Index: tests/installall/tests/mmisc/install.logpro
==================================================================
--- tests/installall/tests/mmisc/install.logpro
+++ /dev/null
@@ -1,24 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Always get a chmod at the end of install" #/chmod.*logpro.setup-info/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in setup-error-handling" #/setup-error-handling/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/i)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/mmisc/install.sh
Index: tests/installall/tests/mmisc/install.sh
==================================================================
--- tests/installall/tests/mmisc/install.sh
+++ /dev/null
@@ -1,31 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh
-cd src
-if [ $FSLPKG == "logpro" ];then
-  chicken-install
-elif [ $FSLPKG == "stml" ];then
-  cp install.cfg.template install.cfg
-  cp requirements.scm.template requirements.scm
-  make 
-  make install
-else
-  make
-  make install PREFIX=$PREFIX
-fi

DELETED tests/installall/tests/mmisc/testconfig
Index: tests/installall/tests/mmisc/testconfig
==================================================================
--- tests/installall/tests/mmisc/testconfig
+++ /dev/null
@@ -1,36 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-clone clone.sh
-install install.sh
-
-# Test requirements are specified here
-[requirements]
-waiton eggs setup
-
-# Iteration for your tests are controlled by the items section
-[items]
-FSLPKG logpro stml megatest
-
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Install the logpro tool
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/opensrc/clone.logpro
Index: tests/installall/tests/opensrc/clone.logpro
==================================================================
--- tests/installall/tests/opensrc/clone.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Output from fossil" (list #/^repository:\s+/ #/comment:/))
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/i)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/opensrc/clone.sh
Index: tests/installall/tests/opensrc/clone.sh
==================================================================
--- tests/installall/tests/opensrc/clone.sh
+++ /dev/null
@@ -1,37 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh
-
-parentdir=$MT_LINKTREE/$MT_TARGET/$MT_RUNNAME
-
-lockfile $parentdir/clone.lock
-if [ ! -e $parentdir/opensrc.fossil ];then
-  fossil clone http://www.kiatoa.com/fossils/opensrc $parentdir/opensrc.fossil
-fi
-
-if [ ! -e $parentdir/src/dbi ];then
-  mkdir -p $parentdir/src
-  (cd $parentdir/src;fossil open $parentdir/opensrc.fossil --nested)
-else
-  (cd $parentdir/src;fossil sync;fossil co trunk;fossil status)
-fi
-rm -f $parentdir/clone.lock
-
-ln -sf $parentdir/src $MT_TEST_RUN_DIR/src
-

DELETED tests/installall/tests/opensrc/install.logpro
Index: tests/installall/tests/opensrc/install.logpro
==================================================================
--- tests/installall/tests/opensrc/install.logpro
+++ /dev/null
@@ -1,24 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Always get a chmod at the end of install" #/chmod.*.setup-info/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in setup-error-handling" #/setup-error-handling/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/i)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/opensrc/install.sh
Index: tests/installall/tests/opensrc/install.sh
==================================================================
--- tests/installall/tests/opensrc/install.sh
+++ /dev/null
@@ -1,21 +0,0 @@
-#!/usr/bin/env bash
-
-## This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
- Run your step here
-source $PREFIX/buildsetup.sh
-cd src/$MODULE_NAME
-chicken-install

DELETED tests/installall/tests/opensrc/testconfig
Index: tests/installall/tests/opensrc/testconfig
==================================================================
--- tests/installall/tests/opensrc/testconfig
+++ /dev/null
@@ -1,35 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-clone clone.sh
-install install.sh
-
-# Test requirements are specified here
-[requirements]
-waiton eggs setup sqlite3
-
-# Iteration for your tests are controlled by the items section
-[items]
-MODULE_NAME dbi margs qtree vcd xfig mutils
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Install the eggs from the opensrc fossil
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/setup/setup.logpro
Index: tests/installall/tests/setup/setup.logpro
==================================================================
--- tests/installall/tests/setup/setup.logpro
+++ /dev/null
@@ -1,25 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "ALL DONE" #/ALL DONE$/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-
-
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/setup/setup.sh
Index: tests/installall/tests/setup/setup.sh
==================================================================
--- tests/installall/tests/setup/setup.sh
+++ /dev/null
@@ -1,50 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-cksetupsh=$PREFIX/setup-chicken4x.sh
-cksetupcsh=$PREFIX/setup-chicken4x.csh
-setupsh=$PREFIX/buildsetup.sh
-
-# make a cache dir
-mkdir -p $DOWNLOADS
-mkdir -p $PREFIX
-
-# File for users to source to run chicken
-echo "# Source me to setup to to run chicken" > $cksetupsh
-echo "export PATH=$PREFIX/bin:\$PATH" > $cksetupsh
-echo "export LD_LIBRARY_PATH=$PREFIX/lib" >> $cksetupsh
-
-# tcsh version
-echo "setenv PATH $PREFIX/bin:\$PATH" > $cksetupcsh
-echo "setenv LD_LIBRARY_PATH $PREFIX/lib" >> $cksetupcsh
-
-# File to source for build process
-echo "export PATH=$PREFIX/bin:\$PATH" > $setupsh
-echo "export LD_LIBRARY_PATH=$PREFIX/lib" >> $setupsh
-
-if [[ $proxy == "" ]]; then 
-  echo 'Please set the environment variable "proxy" to host.com:port (e.g. foo.com:1234) to use a proxy'
-else
-  echo "export http_proxy=http://$proxy" >> $setupsh
-  echo "export PROX=\"-proxy $proxy\""   >> $setupsh
-fi
-
-echo "export PREFIX=$PREFIX" >> $setupsh
-
-echo ALL DONE

DELETED tests/installall/tests/setup/testconfig
Index: tests/installall/tests/setup/testconfig
==================================================================
--- tests/installall/tests/setup/testconfig
+++ /dev/null
@@ -1,33 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-setup setup.sh
-
-# Test requirements are specified here
-[requirements]
-# priority 10
-
-# Iteration for your tests are controlled by the items section
-[items]
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Download and install chicken scheme
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/sqlite3/compile.logpro
Index: tests/installall/tests/sqlite3/compile.logpro
==================================================================
--- tests/installall/tests/sqlite3/compile.logpro
+++ /dev/null
@@ -1,24 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Leaving directory" #/(Leaving directory|Nothing to be done for|creating sqlite3)/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  >= 0 "Ignore strerror_r" #/strerror_r/i)
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/sqlite3/compile.sh
Index: tests/installall/tests/sqlite3/compile.sh
==================================================================
--- tests/installall/tests/sqlite3/compile.sh
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-
-cd sqlite-autoconf-$SQLITE3_VERSION
-./configure --prefix=$PREFIX
-
-make

DELETED tests/installall/tests/sqlite3/download.logpro
Index: tests/installall/tests/sqlite3/download.logpro
==================================================================
--- tests/installall/tests/sqlite3/download.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "sqlite-autoconf" #/sqlite-autoconf/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/sqlite3/download.sh
Index: tests/installall/tests/sqlite3/download.sh
==================================================================
--- tests/installall/tests/sqlite3/download.sh
+++ /dev/null
@@ -1,29 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-
-echo Install sqlite3
-if ! [[ -e ${DOWNLOADS}/sqlite-autoconf-${SQLITE3_VERSION}.tar.gz ]]; then
-    (cd ${DOWNLOADS};wget http://www.sqlite.org/sqlite-autoconf-${SQLITE3_VERSION}.tar.gz)
-fi
-
-tar xfz ${DOWNLOADS}/sqlite-autoconf-${SQLITE3_VERSION}.tar.gz 
-
-ls -l sqlite-autoconf-${SQLITE3_VERSION}.tar.gz

DELETED tests/installall/tests/sqlite3/install.logpro
Index: tests/installall/tests/sqlite3/install.logpro
==================================================================
--- tests/installall/tests/sqlite3/install.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Leaving directory" #/Leaving directory/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/sqlite3/install.sh
Index: tests/installall/tests/sqlite3/install.sh
==================================================================
--- tests/installall/tests/sqlite3/install.sh
+++ /dev/null
@@ -1,24 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-
-cd sqlite-autoconf-$SQLITE3_VERSION
-make install
-

DELETED tests/installall/tests/sqlite3/installegg.logpro
Index: tests/installall/tests/sqlite3/installegg.logpro
==================================================================
--- tests/installall/tests/sqlite3/installegg.logpro
+++ /dev/null
@@ -1,24 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "chmod sqlite3" #/chmod.*sqlite3/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  >= 0 "Ignore setup-error-handling" #/setup-error-handling/)
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/sqlite3/installegg.sh
Index: tests/installall/tests/sqlite3/installegg.sh
==================================================================
--- tests/installall/tests/sqlite3/installegg.sh
+++ /dev/null
@@ -1,22 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-
-CSC_OPTIONS="-I$PREFIX/include -L$PREFIX/lib" $PREFIX/bin/chicken-install $PROX sqlite3

DELETED tests/installall/tests/sqlite3/testconfig
Index: tests/installall/tests/sqlite3/testconfig
==================================================================
--- tests/installall/tests/sqlite3/testconfig
+++ /dev/null
@@ -1,39 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-download download.sh
-compile compile.sh
-install install.sh
-installegg installegg.sh
-
-# Test requirements are specified here
-[requirements]
-# We waiton chicken because this one installs the egg. It would behove us to split this
-# into two tests ...
-waiton tougheggs
-priority 2
-
-# Iteration for your tests are controlled by the items section
-[items]
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Install sqlite3 library for systems where it is not installed
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/tougheggs/install.logpro
Index: tests/installall/tests/tougheggs/install.logpro
==================================================================
--- tests/installall/tests/tougheggs/install.logpro
+++ /dev/null
@@ -1,24 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Last thing done is chmod ..." #/chmod /)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody" >= 0 "Ignore someword-errors"        #/\w+-error/)
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/tougheggs/install.sh
Index: tests/installall/tests/tougheggs/install.sh
==================================================================
--- tests/installall/tests/tougheggs/install.sh
+++ /dev/null
@@ -1,24 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh
-
-lockfile $PREFIX/eggs.lock
-$PREFIX/bin/chicken-install $PROX $EGG_NAME
-rm -f $PREFIX/eggs.lock

DELETED tests/installall/tests/tougheggs/testconfig
Index: tests/installall/tests/tougheggs/testconfig
==================================================================
--- tests/installall/tests/tougheggs/testconfig
+++ /dev/null
@@ -1,34 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-install install.sh
-
-# Test requirements are specified here
-[requirements]
-waiton eggs
-
-# Iteration for your tests are controlled by the items section
-[items]
-EGG_NAME intarweb http-client awful uri-common spiffy-request-vars spiffy apropos spiffy-directory-listing
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Download and install eggs with no significant prerequisites
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/zmq/install.logpro
Index: tests/installall/tests/zmq/install.logpro
==================================================================
--- tests/installall/tests/zmq/install.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/zmq/install.sh
Index: tests/installall/tests/zmq/install.sh
==================================================================
--- tests/installall/tests/zmq/install.sh
+++ /dev/null
@@ -1,19 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh

DELETED tests/installall/tests/zmq/testconfig
Index: tests/installall/tests/zmq/testconfig
==================================================================
--- tests/installall/tests/zmq/testconfig
+++ /dev/null
@@ -1,33 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-install install.sh
-
-# Test requirements are specified here
-[requirements]
-waiton zmqlib chicken setup
-
-# Iteration for your tests are controlled by the items section
-[items]
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Install the zmq egg
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/zmqlib/compile.logpro
Index: tests/installall/tests/zmqlib/compile.logpro
==================================================================
--- tests/installall/tests/zmqlib/compile.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/zmqlib/compile.sh
Index: tests/installall/tests/zmqlib/compile.sh
==================================================================
--- tests/installall/tests/zmqlib/compile.sh
+++ /dev/null
@@ -1,19 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh

DELETED tests/installall/tests/zmqlib/download.logpro
Index: tests/installall/tests/zmqlib/download.logpro
==================================================================
--- tests/installall/tests/zmqlib/download.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/zmqlib/download.sh
Index: tests/installall/tests/zmqlib/download.sh
==================================================================
--- tests/installall/tests/zmqlib/download.sh
+++ /dev/null
@@ -1,19 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh

DELETED tests/installall/tests/zmqlib/install.logpro
Index: tests/installall/tests/zmqlib/install.logpro
==================================================================
--- tests/installall/tests/zmqlib/install.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/zmqlib/install.sh
Index: tests/installall/tests/zmqlib/install.sh
==================================================================
--- tests/installall/tests/zmqlib/install.sh
+++ /dev/null
@@ -1,20 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-
-source $PREFIX/buildsetup.sh

DELETED tests/installall/tests/zmqlib/testconfig
Index: tests/installall/tests/zmqlib/testconfig
==================================================================
--- tests/installall/tests/zmqlib/testconfig
+++ /dev/null
@@ -1,36 +0,0 @@
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Add additional steps here. Format is "stepname script"
-[ezsteps]
-download download.sh
-untar untar.sh
-compile compile.sh
-install install.sh
-
-# Test requirements are specified here
-[requirements]
-waiton setup
-
-# Iteration for your tests are controlled by the items section
-[items]
-
-# test_meta is a section for storing additional data on your test
-[test_meta]
-author matt
-owner  matt
-description Install the zmq library if it doesn't already exist
-tags tagone,tagtwo
-reviewed never

DELETED tests/installall/tests/zmqlib/untar.logpro
Index: tests/installall/tests/zmqlib/untar.logpro
==================================================================
--- tests/installall/tests/zmqlib/untar.logpro
+++ /dev/null
@@ -1,23 +0,0 @@
-;; This file is part of Megatest.
-;; 
-;;     Megatest is free software: you can redistribute it and/or modify
-;;     it under the terms of the GNU General Public License as published by
-;;     the Free Software Foundation, either version 3 of the License, or
-;;     (at your option) any later version.
-;; 
-;;     Megatest is distributed in the hope that it will be useful,
-;;     but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;     GNU General Public License for more details.
-;; 
-;;     You should have received a copy of the GNU General Public License
-;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-;; You should have at least one expect:required. This ensures that your process ran
-(expect:required in "LogFileBody" > 0 "Put description here" #/put pattern here/)
-
-;; You may need ignores to suppress false error or warning hits from the later expects
-;; NOTE: Order is important here!
-(expect:ignore   in "LogFileBody"  < 99 "Ignore the word error in comments" #/^\/\/.*error/)
-(expect:warning  in "LogFileBody"  = 0 "Any warning" #/warn/)
-(expect:error    in "LogFileBody"  = 0 "Any error"  (list #/ERROR/ #/error/i)) ;; but disallow any other errors

DELETED tests/installall/tests/zmqlib/untar.sh
Index: tests/installall/tests/zmqlib/untar.sh
==================================================================
--- tests/installall/tests/zmqlib/untar.sh
+++ /dev/null
@@ -1,19 +0,0 @@
-#!/usr/bin/env bash
-
-# This file is part of Megatest.
-# 
-#     Megatest is free software: you can redistribute it and/or modify
-#     it under the terms of the GNU General Public License as published by
-#     the Free Software Foundation, either version 3 of the License, or
-#     (at your option) any later version.
-# 
-#     Megatest is distributed in the hope that it will be useful,
-#     but WITHOUT ANY WARRANTY; without even the implied warranty of
-#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#     GNU General Public License for more details.
-# 
-#     You should have received a copy of the GNU General Public License
-#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
-
-# Run your step here
-source $PREFIX/buildsetup.sh

Index: tests/manual.sh
==================================================================
--- tests/manual.sh
+++ tests/manual.sh
@@ -1,1 +1,18 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 (cd ..;make install) && `realpath ../bin/megatest` -runtests manual_example :sysname ubuntu :fsname afs :datapath none :runname testing -setvars TARGETDISPLAY=:0,TARGETHOST=localhost,TARGETDIR=/tmp/blah,TARGETUSER=matt 

Index: tests/mintest/megatest.config
==================================================================
--- tests/mintest/megatest.config
+++ tests/mintest/megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/runconfigs.config
==================================================================
--- tests/mintest/runconfigs.config
+++ tests/mintest/runconfigs.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/a/testconfig
==================================================================
--- tests/mintest/tests/a/testconfig
+++ tests/mintest/tests/a/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/a1/testconfig
==================================================================
--- tests/mintest/tests/a1/testconfig
+++ tests/mintest/tests/a1/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/b/testconfig
==================================================================
--- tests/mintest/tests/b/testconfig
+++ tests/mintest/tests/b/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/b1/testconfig
==================================================================
--- tests/mintest/tests/b1/testconfig
+++ tests/mintest/tests/b1/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/c/testconfig
==================================================================
--- tests/mintest/tests/c/testconfig
+++ tests/mintest/tests/c/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/c1/testconfig
==================================================================
--- tests/mintest/tests/c1/testconfig
+++ tests/mintest/tests/c1/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/d/testconfig
==================================================================
--- tests/mintest/tests/d/testconfig
+++ tests/mintest/tests/d/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/d1fail/testconfig
==================================================================
--- tests/mintest/tests/d1fail/testconfig
+++ tests/mintest/tests/d1fail/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/e/testconfig
==================================================================
--- tests/mintest/tests/e/testconfig
+++ tests/mintest/tests/e/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/e1/testconfig
==================================================================
--- tests/mintest/tests/e1/testconfig
+++ tests/mintest/tests/e1/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/f/testconfig
==================================================================
--- tests/mintest/tests/f/testconfig
+++ tests/mintest/tests/f/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/g/testconfig
==================================================================
--- tests/mintest/tests/g/testconfig
+++ tests/mintest/tests/g/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/h/testconfig
==================================================================
--- tests/mintest/tests/h/testconfig
+++ tests/mintest/tests/h/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/i/testconfig
==================================================================
--- tests/mintest/tests/i/testconfig
+++ tests/mintest/tests/i/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/j/testconfig
==================================================================
--- tests/mintest/tests/j/testconfig
+++ tests/mintest/tests/j/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/k/testconfig
==================================================================
--- tests/mintest/tests/k/testconfig
+++ tests/mintest/tests/k/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/mintest/tests/l/testconfig
==================================================================
--- tests/mintest/tests/l/testconfig
+++ tests/mintest/tests/l/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/ods-test.scm
==================================================================
--- tests/ods-test.scm
+++ tests/ods-test.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/Makefile
==================================================================
--- tests/release/Makefile
+++ tests/release/Makefile
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/megatest.config
==================================================================
--- tests/release/megatest.config
+++ tests/release/megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/runconfigs.config
==================================================================
--- tests/release/runconfigs.config
+++ tests/release/runconfigs.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/dependencies/simpleresults.logpro
==================================================================
--- tests/release/tests/dependencies/simpleresults.logpro
+++ tests/release/tests/dependencies/simpleresults.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/dependencies/testconfig
==================================================================
--- tests/release/tests/dependencies/testconfig
+++ tests/release/tests/dependencies/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/fullrun/results.logpro
==================================================================
--- tests/release/tests/fullrun/results.logpro
+++ tests/release/tests/fullrun/results.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/fullrun/testconfig
==================================================================
--- tests/release/tests/fullrun/testconfig
+++ tests/release/tests/fullrun/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/itemwait/testconfig
==================================================================
--- tests/release/tests/itemwait/testconfig
+++ tests/release/tests/itemwait/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/itemwait/watchrun.sh
==================================================================
--- tests/release/tests/itemwait/watchrun.sh
+++ tests/release/tests/itemwait/watchrun.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/rollup/firstres.logpro
==================================================================
--- tests/release/tests/rollup/firstres.logpro
+++ tests/release/tests/rollup/firstres.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/rollup/results.logpro
==================================================================
--- tests/release/tests/rollup/results.logpro
+++ tests/release/tests/rollup/results.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/rollup/testconfig
==================================================================
--- tests/release/tests/rollup/testconfig
+++ tests/release/tests/rollup/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/test2/results.logpro
==================================================================
--- tests/release/tests/test2/results.logpro
+++ tests/release/tests/test2/results.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/test2/results_a.logpro
==================================================================
--- tests/release/tests/test2/results_a.logpro
+++ tests/release/tests/test2/results_a.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/test2/results_b.logpro
==================================================================
--- tests/release/tests/test2/results_b.logpro
+++ tests/release/tests/test2/results_b.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/test2/testconfig
==================================================================
--- tests/release/tests/test2/testconfig
+++ tests/release/tests/test2/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/testpatt/cleanres.logpro
==================================================================
--- tests/release/tests/testpatt/cleanres.logpro
+++ tests/release/tests/testpatt/cleanres.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/testpatt/results.logpro
==================================================================
--- tests/release/tests/testpatt/results.logpro
+++ tests/release/tests/testpatt/results.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/testpatt/testconfig
==================================================================
--- tests/release/tests/testpatt/testconfig
+++ tests/release/tests/testpatt/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/testpatt_envvar/results.logpro
==================================================================
--- tests/release/tests/testpatt_envvar/results.logpro
+++ tests/release/tests/testpatt_envvar/results.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/testpatt_envvar/testconfig
==================================================================
--- tests/release/tests/testpatt_envvar/testconfig
+++ tests/release/tests/testpatt_envvar/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/toprun/results.logpro
==================================================================
--- tests/release/tests/toprun/results.logpro
+++ tests/release/tests/toprun/results.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/release/tests/toprun/testconfig
==================================================================
--- tests/release/tests/toprun/testconfig
+++ tests/release/tests/toprun/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/resources/ruby/librunscript.rb
==================================================================
--- tests/resources/ruby/librunscript.rb
+++ tests/resources/ruby/librunscript.rb
@@ -1,7 +1,9 @@
 # This is the library of stuff for megatest
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/rununittest.sh
==================================================================
--- tests/rununittest.sh
+++ tests/rununittest.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/simplerun/megatest.config
==================================================================
--- tests/simplerun/megatest.config
+++ tests/simplerun/megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/simplerun/runconfigs.config
==================================================================
--- tests/simplerun/runconfigs.config
+++ tests/simplerun/runconfigs.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/simplerun/test.config
==================================================================
--- tests/simplerun/test.config
+++ tests/simplerun/test.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/simplerun/tests/test1/step1.logpro
==================================================================
--- tests/simplerun/tests/test1/step1.logpro
+++ tests/simplerun/tests/test1/step1.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/simplerun/tests/test1/step1.sh
==================================================================
--- tests/simplerun/tests/test1/step1.sh
+++ tests/simplerun/tests/test1/step1.sh
@@ -1,5 +1,22 @@
 #!/usr/bin/env bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 # Run your step here
 echo Got here!
 

Index: tests/simplerun/tests/test1/step2.logpro
==================================================================
--- tests/simplerun/tests/test1/step2.logpro
+++ tests/simplerun/tests/test1/step2.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/simplerun/tests/test1/step2.sh
==================================================================
--- tests/simplerun/tests/test1/step2.sh
+++ tests/simplerun/tests/test1/step2.sh
@@ -1,6 +1,23 @@
 #!/usr/bin/env bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 # Run your step here
 echo Got here eh!
 
 

Index: tests/simplerun/tests/test1/testconfig
==================================================================
--- tests/simplerun/tests/test1/testconfig
+++ tests/simplerun/tests/test1/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/simplerun/tests/test2/step1.logpro
==================================================================
--- tests/simplerun/tests/test2/step1.logpro
+++ tests/simplerun/tests/test2/step1.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/simplerun/tests/test2/step1.sh
==================================================================
--- tests/simplerun/tests/test2/step1.sh
+++ tests/simplerun/tests/test2/step1.sh
@@ -1,3 +1,20 @@
 #!/usr/bin/env bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 # Run your step here

Index: tests/simplerun/tests/test2/step2.logpro
==================================================================
--- tests/simplerun/tests/test2/step2.logpro
+++ tests/simplerun/tests/test2/step2.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/simplerun/tests/test2/step2.sh
==================================================================
--- tests/simplerun/tests/test2/step2.sh
+++ tests/simplerun/tests/test2/step2.sh
@@ -1,3 +1,20 @@
 #!/usr/bin/env bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
+# This file is part of Megatest.
+# 
+#     Megatest is free software: you can redistribute it and/or modify
+#     it under the terms of the GNU General Public License as published by
+#     the Free Software Foundation, either version 3 of the License, or
+#     (at your option) any later version.
+# 
+#     Megatest is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#     GNU General Public License for more details.
+# 
+#     You should have received a copy of the GNU General Public License
+#     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
+
 # Run your step here

Index: tests/simplerun/tests/test2/testconfig
==================================================================
--- tests/simplerun/tests/test2/testconfig
+++ tests/simplerun/tests/test2/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/speedtest/megatest.config
==================================================================
--- tests/speedtest/megatest.config
+++ tests/speedtest/megatest.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/speedtest/runconfigs.config
==================================================================
--- tests/speedtest/runconfigs.config
+++ tests/speedtest/runconfigs.config
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/speedtest/tests/speedtest/main.sh
==================================================================
--- tests/speedtest/tests/speedtest/main.sh
+++ tests/speedtest/tests/speedtest/main.sh
@@ -1,6 +1,8 @@
 #!/bin/bash
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/speedtest/tests/speedtest/testconfig
==================================================================
--- tests/speedtest/tests/speedtest/testconfig
+++ tests/speedtest/tests/speedtest/testconfig
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/supportfiles/ruby/librunscript.rb
==================================================================
--- tests/supportfiles/ruby/librunscript.rb
+++ tests/supportfiles/ruby/librunscript.rb
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: tests/test7.logpro
==================================================================
--- tests/test7.logpro
+++ tests/test7.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/unit.logpro
==================================================================
--- tests/unit.logpro
+++ tests/unit.logpro
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/unittests/all-rmt.scm
==================================================================
--- tests/unittests/all-rmt.scm
+++ tests/unittests/all-rmt.scm
@@ -1,10 +1,12 @@
 
 ;;======================================================================
 ;;  A L L - R M T 
 ;;======================================================================
 
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/unittests/basicserver.scm
==================================================================
--- tests/unittests/basicserver.scm
+++ tests/unittests/basicserver.scm
@@ -1,8 +1,10 @@
 ;;======================================================================
 ;; S E R V E R
 ;;======================================================================
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/unittests/configfiles.scm
==================================================================
--- tests/unittests/configfiles.scm
+++ tests/unittests/configfiles.scm
@@ -1,8 +1,10 @@
 ;;======================================================================
 ;; C O N F I G   F I L E S 
 ;;======================================================================
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/unittests/dbrdbstruct.scm
==================================================================
--- tests/unittests/dbrdbstruct.scm
+++ tests/unittests/dbrdbstruct.scm
@@ -1,8 +1,10 @@
 ;;======================================================================
 ;; S E R V E R
 ;;======================================================================
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/unittests/inmemdb.scm
==================================================================
--- tests/unittests/inmemdb.scm
+++ tests/unittests/inmemdb.scm
@@ -1,8 +1,10 @@
 ;;======================================================================
 ;; S E R V E R
 ;;======================================================================
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/unittests/misc.scm
==================================================================
--- tests/unittests/misc.scm
+++ tests/unittests/misc.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/unittests/runs.scm
==================================================================
--- tests/unittests/runs.scm
+++ tests/unittests/runs.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/unittests/server.scm
==================================================================
--- tests/unittests/server.scm
+++ tests/unittests/server.scm
@@ -1,8 +1,10 @@
 ;;======================================================================
 ;; S E R V E R
 ;;======================================================================
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/unittests/tests.scm
==================================================================
--- tests/unittests/tests.scm
+++ tests/unittests/tests.scm
@@ -1,6 +1,8 @@
 ;; ;;======================================================================
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/vectors-vs-records.scm
==================================================================
--- tests/vectors-vs-records.scm
+++ tests/vectors-vs-records.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: tests/watch-monitor.sh
==================================================================
--- tests/watch-monitor.sh
+++ tests/watch-monitor.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: trackback.scm
==================================================================
--- trackback.scm
+++ trackback.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: utils/checkPreReqs
==================================================================
--- utils/checkPreReqs
+++ utils/checkPreReqs
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/cleanup-links-dir.sh
==================================================================
--- utils/cleanup-links-dir.sh
+++ utils/cleanup-links-dir.sh
@@ -1,7 +1,9 @@
 #!/usr/bin/env bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/cleanup-pkts.sh
==================================================================
--- utils/cleanup-pkts.sh
+++ utils/cleanup-pkts.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/deploy.sh
==================================================================
--- utils/deploy.sh
+++ utils/deploy.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/editwiki
==================================================================
--- utils/editwiki
+++ utils/editwiki
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/example-launch-dispatcher.scm
==================================================================
--- utils/example-launch-dispatcher.scm
+++ utils/example-launch-dispatcher.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: utils/find-unused-globals.sh
==================================================================
--- utils/find-unused-globals.sh
+++ utils/find-unused-globals.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/fslrept.scm
==================================================================
--- utils/fslrept.scm
+++ utils/fslrept.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: utils/homehost_check.sh
==================================================================
--- utils/homehost_check.sh
+++ utils/homehost_check.sh
@@ -1,7 +1,9 @@
 #! /bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/installall.logpro
==================================================================
--- utils/installall.logpro
+++ utils/installall.logpro
@@ -1,7 +1,9 @@
 ;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
 ;;  
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: utils/installck.sh
==================================================================
--- utils/installck.sh
+++ utils/installck.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/loadrunner
==================================================================
--- utils/loadrunner
+++ utils/loadrunner
@@ -1,7 +1,9 @@
 #!/bin/bash 
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/lock-stats.sh
==================================================================
--- utils/lock-stats.sh
+++ utils/lock-stats.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/memproblem.scm
==================================================================
--- utils/memproblem.scm
+++ utils/memproblem.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: utils/mk_wrapper
==================================================================
--- utils/mk_wrapper
+++ utils/mk_wrapper
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/mt_ezstep
==================================================================
--- utils/mt_ezstep
+++ utils/mt_ezstep
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/mt_laststep
==================================================================
--- utils/mt_laststep
+++ utils/mt_laststep
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/mt_runstep
==================================================================
--- utils/mt_runstep
+++ utils/mt_runstep
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/mt_xterm
==================================================================
--- utils/mt_xterm
+++ utils/mt_xterm
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/mtgetfile
==================================================================
--- utils/mtgetfile
+++ utils/mtgetfile
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/mtrept.sh
==================================================================
--- utils/mtrept.sh
+++ utils/mtrept.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 #
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/mtrunner
==================================================================
--- utils/mtrunner
+++ utils/mtrunner
@@ -1,7 +1,9 @@
 #! /bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/mtutils.csh
==================================================================
--- utils/mtutils.csh
+++ utils/mtutils.csh
@@ -1,8 +1,10 @@
 # Better to use the mt_* snippet scripts in utils 
 #   To use the snippets set PREFIX then install with "make installall"
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/nbfake
==================================================================
--- utils/nbfake
+++ utils/nbfake
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/nbfind
==================================================================
--- utils/nbfind
+++ utils/nbfind
@@ -1,7 +1,9 @@
 #!/bin/bash 
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/plot-code.scm
==================================================================
--- utils/plot-code.scm
+++ utils/plot-code.scm
@@ -1,7 +1,9 @@
 #!/mfs/pkgs/chicken/4.8.0.5/bin/csi -nbq
 
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: utils/remrun
==================================================================
--- utils/remrun
+++ utils/remrun
@@ -7,10 +7,12 @@
 # remrun behavior can be changed by setting the following env var:
 #   NBFAKE_LOG        Logfile for nbfake output
 #
 ###############################################################################
 #
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/run2mock.scm
==================================================================
--- utils/run2mock.scm
+++ utils/run2mock.scm
@@ -1,8 +1,10 @@
 #!/p/foundry/env/pkgs/chicken/4.10.1_v1.63/bin/csi -s
 ; -*- Mode: Scheme; -*-
 
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: utils/runner
==================================================================
--- utils/runner
+++ utils/runner
@@ -1,7 +1,9 @@
 #!/usr/bin/perl -w
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/triage.rb
==================================================================
--- utils/triage.rb
+++ utils/triage.rb
@@ -1,7 +1,9 @@
 #!/usr/bin/env ruby
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/unlock_db.sh
==================================================================
--- utils/unlock_db.sh
+++ utils/unlock_db.sh
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/viewscreen
==================================================================
--- utils/viewscreen
+++ utils/viewscreen
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/watch-close-wait.sh
==================================================================
--- utils/watch-close-wait.sh
+++ utils/watch-close-wait.sh
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: utils/whodunit.scm
==================================================================
--- utils/whodunit.scm
+++ utils/whodunit.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: vg-test.scm
==================================================================
--- vg-test.scm
+++ vg-test.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: vg_records.scm
==================================================================
--- vg_records.scm
+++ vg_records.scm
@@ -1,8 +1,10 @@
 ;; Created by records.sh. DO NOT EDIT THIS FILE. Edit records.sh instead
 ;; Generated using make-vector-record -safe vg lib comps
 
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: widgets.scm
==================================================================
--- widgets.scm
+++ widgets.scm
@@ -1,5 +1,7 @@
+;;  Copyright 2006-2017, Matthew Welland.
+;; 
 ;; This file is part of Megatest.
 ;; 
 ;;     Megatest is free software: you can redistribute it and/or modify
 ;;     it under the terms of the GNU General Public License as published by
 ;;     the Free Software Foundation, either version 3 of the License, or

Index: wrappers/cfg.sh
==================================================================
--- wrappers/cfg.sh
+++ wrappers/cfg.sh
@@ -1,5 +1,7 @@
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: wrappers/dashboard
==================================================================
--- wrappers/dashboard
+++ wrappers/dashboard
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or

Index: wrappers/megatest
==================================================================
--- wrappers/megatest
+++ wrappers/megatest
@@ -1,7 +1,9 @@
 #!/bin/bash
 
+#  Copyright 2006-2017, Matthew Welland.
+# 
 # This file is part of Megatest.
 # 
 #     Megatest is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
 #     the Free Software Foundation, either version 3 of the License, or