#!/usr/bin/tclsh8.5
#
# $Id: d0463db14ace95175eefa3040e12a748db5c2a83 $
#
set Config(vhost) 0;

# Run the init script
source "/usr/local/libexec/nbsp/tclhttpd/httpd.init";

#
# main loop
#
set done 0
while {$done == 0} {
    fileevent stdin readable {set done 1}
    vwait done
    if {[gets stdin line] >= 0} {
        set done 0
    }
}

Httpd_ServerShutdown
#Httpd_SecureServerShutdown
