message.pl: Placeholder script (404 for now)

diff --git a/CGI/message.pl b/CGI/message.pl
new file mode 100755 (executable)
index 0000000..2012b6b
--- /dev/null
+++ b/CGI/message.pl
@@ -0,0 +1,35 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use CGI qw/:standard/;
+use CGI::Carp qw(fatalsToBrowser);
+$CGI::POST_MAX=1024 * 100; # max 100K posts
+$CGI::DISABLE_UPLOADS = 1; # no uploads
+
+use Emesinae::Bug;
+use Emesinae::Common;
+
+require 'common.cgi';
+
+readconfig;
+my $dbh = opendb;
+
+sub fourohfour()
+{
+    my $id = shift;
+    print header( -charset => 'utf-8', -status => '404 Not Found');
+    print start_html(
+        -title => $c{TrackerName} . ": 404 - Not found",
+        -style => { 'src' => $c{StyleSheet} }
+    );
+
+    print h1("404 - Not Found");
+    print p([ "No Message Here...", "Cannot find message at: " .code(htmlsanit(url(-absolute=>1)))]);
+    print end_html;
+    exit(0);
+}
+
+# Not implemented yet.
+fourohfour();

diff --git a/Makefile b/Makefile
index 4289bfe37fc96141c64af51f0f885e46e141a23f..f4788f84dec9a946dca5066035bcdf6e7b8ed434 100644 (file)
--- a/Makefile
+++ b/Makefile
@@ -27,6 +27,7 @@ MODULES     := Emesinae/Bug.pm          \
 
 CGIS        := CGI/bug.pl               \
                CGI/bugs.pl              \
+               CGI/message.pl           \
                CGI/common.pl
 
 CSSS        := css/style.css

diff --git a/config/examples/test/apache.conf b/config/examples/test/apache.conf
index 8f468b961b32bbdfae6ca91965585566cb3c5942..b6469f811f96017fa059721dbfa9295f3d230eb3 100644 (file)
--- a/config/examples/test/apache.conf
+++ b/config/examples/test/apache.conf
@@ -17,6 +17,7 @@
        Alias /test/css/ /srv/test/share/emesinae/css/
        Alias /test/static/ /srv/test/var/www/
        ScriptAliasMatch /test/bug/.* /srv/test/lib/emesinae/cgi-bin/bug.cgi
+       ScriptAliasMatch /test/message/.* /srv/test/lib/emesinae/cgi-bin/message.cgi
        ScriptAlias /test/ /srv/test/lib/emesinae/cgi-bin/bugs.cgi
        <Directory "/srv/test/lib/emesinae/cgi-bin">
                AllowOverride None

diff --git a/config/examples/xen-bugs.xenproject.org/apache.conf b/config/examples/xen-bugs.xenproject.org/apache.conf
index ca318c75d8684b9564cfdcdf68d189435d948c95..5ee3ee35c2f6f4dca2e7791c8a03d2bae55727cf 100644 (file)
--- a/config/examples/xen-bugs.xenproject.org/apache.conf
+++ b/config/examples/xen-bugs.xenproject.org/apache.conf
@@ -14,6 +14,7 @@
        Alias /xen/css/ /srv/xen-devel-bugs/share/emesinae/css/
        Alias /xen/static/ /srv/xen-devel-bugs/var/www/
        ScriptAliasMatch /xen/bug/.* /srv/xen-devel-bugs/lib/emesinae/cgi-bin/bug.cgi
+       ScriptAliasMatch /xen/message/.* /srv/xen-devel-bugs/lib/emesinae/cgi-bin/message.cgi
        ScriptAlias /xen/ /srv/xen-devel-bugs/lib/emesinae/cgi-bin/bugs.cgi
        <Directory "/srv/xen-devel-bugs/lib/emesinae/cgi-bin">
                AllowOverride None