Avoid DNS lookups
This commit is contained in:
parent
7e1b44518f
commit
7afbfadc42
|
@ -148,6 +148,10 @@ exec scsh -lel SSAX-4.9/load.scm -lel sunet-2.1/load.scm -dm -o http-test -e mai
|
||||||
with-syslog? #t
|
with-syslog? #t
|
||||||
with-log-file (lookup-option options 'log-file-name)
|
with-log-file (lookup-option options 'log-file-name)
|
||||||
with-post-bind-thunk become-nobody-if-root
|
with-post-bind-thunk become-nobody-if-root
|
||||||
|
;; The following settings are made to avoid dns lookups.
|
||||||
|
with-reported-port (lookup-option options 'port)
|
||||||
|
with-fqdn "localhost"
|
||||||
|
with-resolve-ips? #f
|
||||||
with-request-handler
|
with-request-handler
|
||||||
(alist-path-dispatcher
|
(alist-path-dispatcher
|
||||||
(list (cons "seval" seval-handler)
|
(list (cons "seval" seval-handler)
|
||||||
|
@ -167,7 +171,7 @@ exec scsh -lel SSAX-4.9/load.scm -lel sunet-2.1/load.scm -dm -o http-test -e mai
|
||||||
(lookup-option options 'cgi-bin-dir))))
|
(lookup-option options 'cgi-bin-dir))))
|
||||||
(tilde-home-dir-handler "public_html"
|
(tilde-home-dir-handler "public_html"
|
||||||
(rooted-file-or-directory-handler
|
(rooted-file-or-directory-handler
|
||||||
(lookup-option options htdocs-dir)))))))))
|
(lookup-option options 'htdocs-dir)))))))))
|
||||||
))
|
))
|
||||||
|
|
||||||
;; EOF
|
;; EOF
|
||||||
|
|
|
@ -140,6 +140,10 @@ exec scsh -lel SSAX-4.9/load.scm -lel sunet-2.1/load.scm -dm -o http-test -e mai
|
||||||
with-syslog? #t
|
with-syslog? #t
|
||||||
with-log-file (lookup-option options 'log-file-name)
|
with-log-file (lookup-option options 'log-file-name)
|
||||||
with-post-bind-thunk become-nobody-if-root
|
with-post-bind-thunk become-nobody-if-root
|
||||||
|
;; The following settings are made to avoid dns lookups.
|
||||||
|
with-reported-port (lookup-option options 'port)
|
||||||
|
with-fqdn "localhost"
|
||||||
|
with-resolve-ips? #f
|
||||||
with-request-handler
|
with-request-handler
|
||||||
(alist-path-dispatcher
|
(alist-path-dispatcher
|
||||||
(list (cons "cgi-bin" (cgi-handler (lookup-option options 'cgi-bin-dir)))
|
(list (cons "cgi-bin" (cgi-handler (lookup-option options 'cgi-bin-dir)))
|
||||||
|
|
Loading…
Reference in New Issue