Add debug command and update test cases

[~andy/rhawk] / irc.awk

diff --git a/irc.awk b/irc.awk
index 7feb95319a2d8b62be40fdfe9229783e7deb0e50..9b071c91d88def919002b2e92e1fad30e358a9dd 100644 (file)
--- a/irc.awk
+++ b/irc.awk
@@ -21,7 +21,8 @@
 function send(msg) {
        print "  > " msg > "/dev/stderr"
        print msg
-       system("sleep 1")
+       if (!DEBUG)
+               system("sleep 1")
        fflush()
 }
 
@@ -101,13 +102,17 @@ function topic(chan, msg) {
 BEGIN {
        if (CHILD == "") {
                debug("Starting server");
-               cmd = "awk -f rhawk -v CHILD=1 -v START=" systime();
+               cmd = "awk -f rhawk" \
+                     " -v CHILD=1" \
+                     " -v START=" systime() \
+                     " -v DEBUG=" !!DEBUG
                status = system(cmd " -v FIRST=1");
                while (status)
                        status = system(cmd);
                exit(0);
        } else {
                debug("Starting child:" \
+                     " DEBUG=" DEBUG   \
                      " CHILD=" CHILD   \
                      " START=" START   \
                      " FIRST=" FIRST);