scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Make it a bit more portable. 

Change default port from webcache to http-alt.
This commit is contained in:
interp 2003-11-21 19:05:02 +00:00
parent 73dfefd439
commit 25fa9fbca5
1 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
scheme/httpd/surflets/start-surflet-server
View File

@ -1,12 +1,13 @@
#!/bin/sh #!/bin/sh
echo "Loading..." echo "Loading..."
fullpath=`which $0` fullpath=`which $0`
# $sunet is either $SUNETHOME or created out of fullpath # $sunet is either $SUNET or created out of fullpath
# Kind of a hack, I know. # Kind of a hack, I know. We're still waiting for this library
sunet=${SUNETHOME:-`dirname $fullpath`/../..} #installing system.
ssax=${SSAXPATH:-$sunet/SSAX} # path to SSAX sunethome=${SUNET:-`dirname $fullpath`/../..}
ssaxhome=${SSAX:-`dirname $fullpath`/../../../SSAX} # path to SSAX
exec scsh -lm $sunet/packages.scm -lm $ssax/lib/packages.scm -lm $sunet/httpd/surflets/packages.scm -dm -o surflet-server -e main -s "$0" "$@" exec scsh -lm $sunethome/packages.scm -lm $ssaxhome/lib/packages.scm -lm $sunethome/httpd/surflets/packages.scm -dm -o surflet-server -e main -s "$0" "$@"
!# !#
(define-structure surflet-server (define-structure surflet-server
@ -38,7 +39,7 @@ exec scsh -lm $sunet/packages.scm -lm $ssax/lib/packages.scm -lm $sunet/httpd/su
htdocs-dir directory of html files (default: ./web-server/root/htdocs) htdocs-dir directory of html files (default: ./web-server/root/htdocs)
surflet-dir directory of SUrflet files (default: ./web-server/root/surflets) surflet-dir directory of SUrflet files (default: ./web-server/root/surflets)
images-dir directory of images files (default: ./web-server/root/img) images-dir directory of images files (default: ./web-server/root/img)
port port server is listening to (default: 8080) port port server is listening to (default: 8008)
log-file-name directory where to store the logfile in CLF log-file-name directory where to store the logfile in CLF
(default: ./web-server/httpd.log) (default: ./web-server/httpd.log)
requests maximal amount of simultaneous requests (default 5) requests maximal amount of simultaneous requests (default 5)
@ -61,7 +62,7 @@ exec scsh -lm $sunet/packages.scm -lm $ssax/lib/packages.scm -lm $sunet/httpd/su
(set! htdocs-dir "./web-server/root/htdocs") (set! htdocs-dir "./web-server/root/htdocs")
(set! images-dir "./web-server/root/img") (set! images-dir "./web-server/root/img")
; (set! cgi-bin-dir "./web-server/root/cgi-bin") ; (set! cgi-bin-dir "./web-server/root/cgi-bin")
(set! port "8088") (set! port "8008")
(set! log-file-name "./web-server/httpd.log") (set! log-file-name "./web-server/httpd.log")
(set! root "./web-server/root") (set! root "./web-server/root")
(set! surflet-dir "./web-server/root/surflets") (set! surflet-dir "./web-server/root/surflets")