diff --git a/data/cgi/missing_handler.cgi b/data/cgi/missing_handler.cgi new file mode 100755 index 0000000000..9ea1765ff5 --- /dev/null +++ b/data/cgi/missing_handler.cgi @@ -0,0 +1,101 @@ +#!/usr/bin/perl +# Copyright (c) Juli 1997. Wolfram Schneider , Berlin. +# +# missing_handler.cgi - User friendly error response (Apache style) +# +# +# default apache message: +# ---------------------------------------------------------------------- +# File Not found +# The requested URL /~wosch/test/bla was not found on this server. +# ---------------------------------------------------------------------- +# +# +# missing_handler.cgi message: +# ---------------------------------------------------------------------- +# FreeBSD.org - Document not found +# +# The file +# +# http://www.FreeBSD.org/~wosch/test/bla +# +# does not exist at this server. You are coming from +# +# http://www.freebsd.org/~wosch/test/error.html. +# +# The closest match to your request is http://www.freebsd.org. +# Please contact the server administrator wosch@FreeBSD.org. +# +# Thank you very much! +# +# _________________________________________________________________ +# +# $Date: 1997-07-17 17:30:20 $ +# ---------------------------------------------------------------------- +# +# +# $Id: missing_handler.cgi,v 1.1 1997-07-17 17:30:20 wosch Exp $ + +# output title +$title = $ENV{'MISSING_HANDLER_TITLE'} || + 'FreeBSD.org - Document not found'; + +# footer message +$footer = $ENV{'MISSING_HANDLER_FOOT'} || ''; + + +# Server environment variables +$http_referer=$ENV{'HTTP_REFERER'}; +$redirect_url=$ENV{'REDIRECT_URL'}; +$server_admin=$ENV{'SERVER_ADMIN'}; +$http_host=$ENV{'HTTP_HOST'}; +$server_name=$ENV{'SERVER_NAME'}; + + +# HTTP header +print "Content-type: text/html\n\n"; + +# HTML title +print < +$title + + + + +

$title

+EOF + +# HTML body +print qq[The file
+http://$http_host$redirect_url +
+does not exist at this server.\n]; + +if ($http_referer) { + print qq{You are coming from +
+$http_referer. +
+

\n}; +} + +print qq[ +The closest match to your request is +http://$server_name. + +Please contact the server administrator +$server_admin.

+ +Thank you very much!

+]; + +# HTML footer +print < +$footer +\$Date: 1997-07-17 17:30:20 $ + +EOF + +exit(0); diff --git a/en/cgi/missing_handler.cgi b/en/cgi/missing_handler.cgi new file mode 100755 index 0000000000..9ea1765ff5 --- /dev/null +++ b/en/cgi/missing_handler.cgi @@ -0,0 +1,101 @@ +#!/usr/bin/perl +# Copyright (c) Juli 1997. Wolfram Schneider , Berlin. +# +# missing_handler.cgi - User friendly error response (Apache style) +# +# +# default apache message: +# ---------------------------------------------------------------------- +# File Not found +# The requested URL /~wosch/test/bla was not found on this server. +# ---------------------------------------------------------------------- +# +# +# missing_handler.cgi message: +# ---------------------------------------------------------------------- +# FreeBSD.org - Document not found +# +# The file +# +# http://www.FreeBSD.org/~wosch/test/bla +# +# does not exist at this server. You are coming from +# +# http://www.freebsd.org/~wosch/test/error.html. +# +# The closest match to your request is http://www.freebsd.org. +# Please contact the server administrator wosch@FreeBSD.org. +# +# Thank you very much! +# +# _________________________________________________________________ +# +# $Date: 1997-07-17 17:30:20 $ +# ---------------------------------------------------------------------- +# +# +# $Id: missing_handler.cgi,v 1.1 1997-07-17 17:30:20 wosch Exp $ + +# output title +$title = $ENV{'MISSING_HANDLER_TITLE'} || + 'FreeBSD.org - Document not found'; + +# footer message +$footer = $ENV{'MISSING_HANDLER_FOOT'} || ''; + + +# Server environment variables +$http_referer=$ENV{'HTTP_REFERER'}; +$redirect_url=$ENV{'REDIRECT_URL'}; +$server_admin=$ENV{'SERVER_ADMIN'}; +$http_host=$ENV{'HTTP_HOST'}; +$server_name=$ENV{'SERVER_NAME'}; + + +# HTTP header +print "Content-type: text/html\n\n"; + +# HTML title +print < +$title + + + + +

$title

+EOF + +# HTML body +print qq[The file
+http://$http_host$redirect_url +
+does not exist at this server.\n]; + +if ($http_referer) { + print qq{You are coming from +
+$http_referer. +
+

\n}; +} + +print qq[ +The closest match to your request is +http://$server_name. + +Please contact the server administrator +$server_admin.

+ +Thank you very much!

+]; + +# HTML footer +print < +$footer +\$Date: 1997-07-17 17:30:20 $ + +EOF + +exit(0);