Style consistency fixes around bin/aux/* and bin/contrib/*

This commit is contained in:
Uriel 2008-12-21 00:13:53 +01:00
parent e54e3d34fb
commit 7851c334b0
3 changed files with 21 additions and 21 deletions

View file

@ -3,28 +3,28 @@
# A web server in rc by maht
# Originally from http://www.proweb.co.uk/~matt/rc/webserver.rc
ifs = ' '
request = `{sed 1q}
ifs=' '
request=`{sed 1q}
url = $request(2)
file = `{echo $url | sed 's/http:\/\/[^\/]*//' | tr -d \012}
url=$request(2)
file=`{echo $url | sed 's/http:\/\/[^\/]*//' | tr -d \012}
if(test -d $file){
file = $file ^'/index.html'
file=$file ^'/index.html'
}
if (test -e $file) {
response = '200'
if(test -e $file) {
response='200'
}
if not {
response = '404'
file = '404.html'
response='404'
file='404.html'
}
echo 'HTTP/1.1 ' ^$response
echo 'Date: ' `{date}
echo 'Server: rc shell'
echo 'Content-Length: ' `{cat $file | wc -c | tr -d ' '}
echo 'Content-Type: ' `{file -i $file | awk ' { print $2 } '}
echo 'Content-Type: ' `{file -i $file | awk '{ print $2 }'}
echo 'Connection: close'
echo
cat $file