48 lines
		
	
	
	
		
			899 B
		
	
	
	
		
			Bash
		
	
	
		
			Executable file
		
	
	
	
	
			
		
		
	
	
			48 lines
		
	
	
	
		
			899 B
		
	
	
	
		
			Bash
		
	
	
		
			Executable file
		
	
	
	
	
| #!/bin/rc
 | |
| # DO NOT make this script callable directly from the web!
 | |
| fn do_error{
 | |
| 	echo 'HTTP/1.1 '^$1^$cr
 | |
| 	emit_extra_headers
 | |
| 	echo 'Content-type: text/html; charset=utf-8'^$cr
 | |
| 	echo $cr
 | |
| 	echo '<html>
 | |
| <head>
 | |
| <title>'^$1^'</title>
 | |
| </head>
 | |
| <body>
 | |
| <h1>'^$1^'</h1>'
 | |
| 	echo $2
 | |
| 	echo '<p><i>rc-httpd at' $SERVER_NAME '</i>'
 | |
| 	echo '
 | |
| 	</body>
 | |
| 	</html>
 | |
| 	'
 | |
| }
 | |
| 
 | |
| fn 400{
 | |
| 	do_error '400 Bad Request' \
 | |
| 	'The request was invalid.'
 | |
| }
 | |
| 
 | |
| fn 401{
 | |
| 	do_error '401 Unauthorized' \
 | |
| 	'The requested path '^$"location^' requires authorization.'
 | |
| }
 | |
| 
 | |
| fn 404{
 | |
| 	do_error '404 Not Found' \
 | |
| 	'The requested path '^$"location^' was not found on this server.'
 | |
| }
 | |
| 
 | |
| fn 500{
 | |
| 	do_error '500 Internal Server Error' \
 | |
| 	'The server has encountered an internal misconfiguration and is unable to satisfy your request.'
 | |
| }
 | |
| 
 | |
| fn 503{
 | |
| 	do_error '503 Forbidden' \
 | |
| 	'You do not have permission to access '^$"location^' on this server.'
 | |
| }
 | |
| 
 | |
| do_log $1
 | |
| $1
 | 
