Bug 349045: Allow config variables to be overriden in the apache config, so more than one install can live in the same docroot

r=gerv


git-svn-id: svn://10.0.0.236/branches/MDC_HENDRIX_BRANCH@208274 18797224-902f-48f8-a5cc-f745e15eee43

mozilla/tools/tinderbox-configs/firefox/linux/tinder-config.pl

@@ -1,248 +0,0 @@
-#
-### hostname: bl-bldlnx03.office.mozilla.org
-### uname: Linux bl-bldlnx03.office.mozilla.org 2.6.18-1.2798.fc6 #1 SMP Mon Oct 16 14:54:20 EDT 2006 i686 i686 i386 GNU/Linux
-##
-#
-#- tinder-config.pl - Tinderbox configuration file.
-#-    Uncomment the variables you need to set.
-#-    The default values are the same as the commented variables.
-
-# $ENV{XPCOM_CC_DO_NOTHING}
-#-----------------------------------------------------------------------------
-#  Default: 0
-#   Values: 0 | 1
-#  Purpose: Turn graydon's cycle collector on/off
-#$ENV{XPCOM_CC_DO_NOTHING} = 0;
-
-# $ENV{MOZ_PACKAGE_MSI}
-#-----------------------------------------------------------------------------
-#  Default: 0
-#   Values: 0 | 1
-#  Purpose: Controls whether a MSI package is made.
-# Requires: Windows and a local MakeMSI installation.
-#$ENV{MOZ_PACKAGE_MSI} = 0;
-
-# $ENV{MOZ_SYMBOLS_TRANSFER_TYPE}
-#-----------------------------------------------------------------------------
-#  Default: scp
-#   Values: scp | rsync
-#  Purpose: Use scp or rsync to transfer symbols to the Talkback server.
-# Requires: The selected type requires the command be available both locally
-#           and on the Talkback server.
-#$ENV{MOZ_SYMBOLS_TRANSFER_TYPE} = "scp";
-
-#- PLEASE FILL THIS IN WITH YOUR PROPER EMAIL ADDRESS
-#$BuildAdministrator = "$ENV{USER}\@$ENV{HOST}";
-#$BuildAdministrator = ($ENV{USER} || "cltbld") . "\@" . ($ENV{HOST} || "dhcp");
-
-#- You'll need to change these to suit your machine's needs
-#$DisplayServer = ':0.0';
-
-#- Default values of command-line opts
-#-
-#$BuildDepend       = 1;      # Depend or Clobber
-#$BuildDebug        = 0;      # Debug or Opt (Darwin)
-#$ReportStatus      = 1;      # Send results to server, or not
-#$ReportFinalStatus = 1;      # Finer control over $ReportStatus.
-#$UseTimeStamp      = 1;      # Use the CVS 'pull-by-timestamp' option, or not
-#$BuildOnce         = 0;      # Build once, don't send results to server
-$TestOnly          = 1;      # Only run tests, don't pull/build
-#$BuildEmbed        = 0;      # After building seamonkey, go build embed app.
-#$SkipMozilla       = 0;      # Use to debug post-mozilla.pl scripts.
-#$SkipCheckout      = 0;      # Use to debug build process without checking out new source.
-#$BuildLocales      = 0;      # Do l10n packaging?
-
-# Tests
-$CleanProfile             = 1;
-#$ResetHomeDirForTests     = 1;
-#$ProductName              = "Mozilla";
-$VendorName               = 'mozilla';
-
-#$RunMozillaTests          = 1;  # Allow turning off of all tests if needed.
-$RegxpcomTest             = 1;
-$AliveTest                = 1;
-#$JavaTest                 = 0;
-#$ViewerTest               = 0;
-#$BloatTest                = 0;  # warren memory bloat test
-#$BloatTest2               = 0;  # dbaron memory bloat test, require tracemalloc
-#$DomToTextConversionTest  = 0;  
-#$XpcomGlueTest            = 0;
-$CodesizeTest             = 0;  # Z,  require mozilla/tools/codesighs
-$EmbedCodesizeTest        = 0;  # mZ, require mozilla/tools/codesigns
-#$MailBloatTest            = 0;
-#$EmbedTest                = 0;  # Assumes you wanted $BuildEmbed=1
-$LayoutPerformanceTest    = 1;  # Tp
-$LayoutPerformanceLocalTest   = 1;  # Tp
-$DHTMLPerformanceTest     = 1;  # Tdhtml
-#$QATest                   = 0;  
-$XULWindowOpenTest        = 1;  # Txul
-$StartupPerformanceTest   = 1;  # Ts
-
-$TestsPhoneHome           = 1;  # Should test report back to server?
-$TestOnlyTinderbox = 1;
-$DownloadBuildFile = 'firefox-3.0a7pre.en-US.linux-i686.tar.bz2';
-$DownloadBuildURL = 'http://stage.mozilla.org/pub/mozilla.org/firefox/tinderbox-builds/fx-linux-tbox-trunk';
-$DownloadBuildDir = 'firefox';
-
-# If TestOnlyTinderbox is enabled, fetch the latest build info from tinderbox in a 
-# parseable format
-$TinderboxServerURL = 'http://tinderbox.mozilla.org/showbuilds.cgi?tree=Firefox&quickparse=1';
-$MatchBuildname = 'Linux fx-linux-tbox Depend Nightly';
-$GraphNameOverride        = "bl-bldlnx03_fx-linux-tbox-HEAD"; # Override name built from ::hostname() and $BuildTag
-
-# $results_server
-#----------------------------------------------------------------------------
-# Server on which test results will be accessible.  This was originally tegu,
-# then became axolotl.  Once we moved services from axolotl, it was time
-# to give this service its own hostname to make future transitions easier.
-# - cmp@mozilla.org
-#$results_server           = "build-graphs.mozilla.org";
-
-$pageload_server          = "spider.office.mozilla.org";
-
-#
-# Timeouts, values are in seconds.
-#
-#$CVSCheckoutTimeout               = 3600;
-#$CreateProfileTimeout             = 45;
-#$RegxpcomTestTimeout              = 120;
-
-$AliveTestTimeout                 = 5;
-#$ViewerTestTimeout                = 45;
-#$EmbedTestTimeout                 = 45;
-#$BloatTestTimeout                 = 120;   # seconds
-#$MailBloatTestTimeout             = 120;   # seconds
-#$JavaTestTimeout                  = 45;
-#$DomTestTimeout	                  = 45;    # seconds
-#$XpcomGlueTestTimeout             = 15;
-#$CodesizeTestTimeout              = 900;     # seconds
-#$CodesizeTestType                 = "auto";  # {"auto"|"base"}
-#$LayoutPerformanceTestTimeout     = 1200;  # entire test, seconds
-#$LayoutPerformanceLocalTestTimeout     = 1200;  # entire test, seconds
-#$DHTMLPerformanceTestTimeout      = 1200;  # entire test, seconds
-#$QATestTimeout                    = 1200;   # entire test, seconds
-#$LayoutPerformanceTestPageTimeout = 30000; # each page, ms
-#$StartupPerformanceTestTimeout    = 15;    # seconds
-#$XULWindowOpenTestTimeout	      = 150;   # seconds
-
-
-#$MozConfigFileName = 'mozconfig';
-
-#$UseMozillaProfile = 1;
-#$MozProfileName = 'default';
-
-#- Set these to what makes sense for your system
-#$Make          = 'gmake';       # Must be GNU make
-#$MakeOverrides = '';
-#$mail          = '/bin/mail';
-#$CVS           = 'cvs -q';
-#$CVSCO         = 'checkout -P';
-
-# win32 usually doesn't have /bin/mail
-#$blat           = 'c:/nstools/bin/blat';
-#$use_blat       = 0;
-
-# Set moz_cvsroot to something like:
-# :pserver:$ENV{USER}%netscape.com\@cvs.mozilla.org:/cvsroot
-# :pserver:anonymous\@cvs-mirror.mozilla.org:/cvsroot
-#
-# Note that win32 may not need \@, depends on ' or ".
-# :pserver:$ENV{USER}%netscape.com@cvs.mozilla.org:/cvsroot
-
-#$moz_cvsroot   = $ENV{CVSROOT};
-
-#- Set these proper values for your tinderbox server
-#$Tinderbox_server = 'tinderbox-daemon@tinderbox.mozilla.org';
-
-# Allow for non-client builds, e.g. camino.
-#$moz_client_mk = 'client.mk';
-
-#- Set if you want to build in a separate object tree
-#$ObjDir = '';
-
-# Extra build name, if needed.
-$BuildNameExtra = "fx-linux-tbox perf test";
-
-# User comment, eg. ip address for dhcp builds.
-# ex: $UserComment = "ip = 208.12.36.108";
-#$UserComment = 0;
-
-#-
-#- The rest should not need to be changed
-#-
-
-#- Minimum wait period from start of build to start of next build in minutes.
-$BuildSleep = 1;
-
-#- Until you get the script working. When it works,
-#- change to the tree you're actually building
-$BuildTree  = 'MozillaExperimental';
-
-$BuildTag = 'HEAD';
-#$BuildConfigDir = 'mozilla/config';
-#$Topsrcdir = 'mozilla';
-
-$BinaryName = 'firefox-bin';
-
-#
-# For embedding app, use:
-#$EmbedBinaryName = 'TestGtkEmbed';
-#$EmbedDistDir    = 'dist/bin'
-
-
-#$ShellOverride = ''; # Only used if the default shell is too stupid
-#$ConfigureArgs = '';
-#$ConfigureEnvArgs = '';
-#$Compiler = 'gcc';
-#$NSPRArgs = '';
-#$ShellOverride = '';
-
-# Release build options
-#$ReleaseBuild  = 1;
-#$clean_objdir = 1; # remove objdir when starting release cycle?
-#$clean_srcdir = 1; # remove srcdir when starting release cycle?
-#$shiptalkback  = 1;
-#$ReleaseToLatest = 1; # Push the release to latest-<milestone>?
-#$ReleaseToDated = 1; # Push the release to YYYY-MM-DD-HH-<milestone>?
-#$ReleaseGroup = ''; # group to set uploaded files to
-#$build_hour    = "8";
-#$package_creation_path = "/xpinstall/packager";
-# needs setting for mac + talkback: $mac_bundle_path = "/browser/app";
-#$ssh_version   = "2";
-#$ssh_user      = "cltbld";
-#$ssh_server    = "stage.mozilla.org";
-#$ftp_path      = "/home/ftp/pub/mozilla/nightly/experimental";
-#$url_path      = "http://ftp.mozilla.org/pub/mozilla.org/mozilla/nightly/experimental";
-#$tbox_ftp_path = $ftp_path;
-#$tbox_url_path = $url_path;
-#$milestone     = "trunk";
-#$notify_list   = "cmp\@mozilla.org";
-#$stub_installer = 1;
-#$sea_installer = 1;
-#$archive       = 0;
-#$push_raw_xpis = 1;
-
-# Reboot the OS at the end of build-and-test cycle. This is primarily
-# intended for Win9x, which can't last more than a few cycles before
-# locking up (and testing would be suspect even after a couple of cycles).
-# Right now, there is only code to force the reboot for Win9x, so even
-# setting this to 1, will not have an effect on other platforms. Setting
-# up win9x to automatically logon and begin running tinderbox is left 
-# as an exercise to the reader. 
-#$RebootSystem = 0;
-
-# LogCompression specifies the type of compression used on the log file.
-# Valid options are 'gzip', and 'bzip2'. Please make sure the binaries
-# for 'gzip' or 'bzip2' are in the user's path before setting this
-# option.
-#$LogCompression = '';
-
-# LogEncoding specifies the encoding format used for the logs. Valid
-# options are 'base64', and 'uuencode'. If $LogCompression is set above,
-# this needs to be set to 'base64' or 'uuencode' to ensure that the
-# binary data is transferred properly.
-#$LogEncoding = '';
-
-# Prevent Extension Manager from spawning child processes during tests
-# - processes that tbox scripts cannot kill. 
-#$ENV{NO_EM_RESTART} = '1';

mozilla/tools/tinderbox-configs/firefox/win32/tinder-config.pl

@@ -1,250 +0,0 @@
-#
-#### hostname: bl-bldxp01.office.mozilla.org
-#### uname: CYGWIN_NT-5.1 bl-bldxp01 1.5.19(0.150/4/2) 2006-01-20 13:28 i686 Cygwin
-###
-#
-#- tinder-config.pl - Tinderbox configuration file.
-#-    Uncomment the variables you need to set.
-#-    The default values are the same as the commented variables.
-
-# $ENV{XPCOM_CC_DO_NOTHING}
-#-----------------------------------------------------------------------------
-#  Default: 0
-#   Values: 0 | 1
-#  Purpose: Turn graydon's cycle collector on/off
-#$ENV{XPCOM_CC_DO_NOTHING} = 0;
-
-# $ENV{MOZ_PACKAGE_MSI}
-#-----------------------------------------------------------------------------
-#  Default: 0
-#   Values: 0 | 1
-#  Purpose: Controls whether a MSI package is made.
-# Requires: Windows and a local MakeMSI installation.
-#$ENV{MOZ_PACKAGE_MSI} = 0;
-
-# $ENV{MOZ_SYMBOLS_TRANSFER_TYPE}
-#-----------------------------------------------------------------------------
-#  Default: scp
-#   Values: scp | rsync
-#  Purpose: Use scp or rsync to transfer symbols to the Talkback server.
-# Requires: The selected type requires the command be available both locally
-#           and on the Talkback server.
-#$ENV{MOZ_SYMBOLS_TRANSFER_TYPE} = "scp";
-
-#- PLEASE FILL THIS IN WITH YOUR PROPER EMAIL ADDRESS
-#$BuildAdministrator = "$ENV{USER}\@$ENV{HOST}";
-#$BuildAdministrator = ($ENV{USER} || "cltbld") . "\@" . ($ENV{HOST} || "dhcp");
-
-#- You'll need to change these to suit your machine's needs
-#$DisplayServer = ':0.0';
-
-#- Default values of command-line opts
-#-
-#$BuildDepend       = 1;      # Depend or Clobber
-#$BuildDebug        = 0;      # Debug or Opt (Darwin)
-#$ReportStatus      = 1;      # Send results to server, or not
-#$ReportFinalStatus = 1;      # Finer control over $ReportStatus.
-#$UseTimeStamp      = 1;      # Use the CVS 'pull-by-timestamp' option, or not
-#$BuildOnce         = 0;      # Build once, don't send results to server
-$TestOnly          = 1;      # Only run tests, don't pull/build
-#$BuildEmbed        = 0;      # After building seamonkey, go build embed app.
-#$SkipMozilla       = 0;      # Use to debug post-mozilla.pl scripts.
-#$SkipCheckout      = 0;      # Use to debug build process without checking out new source.
-#$BuildLocales      = 0;      # Do l10n packaging?
-
-# Tests
-$CleanProfile             = 1;
-#$ResetHomeDirForTests     = 1;
-#$ProductName              = "Mozilla";
-$VendorName               = 'mozilla';
-
-#$RunMozillaTests          = 1;  # Allow turning off of all tests if needed.
-$RegxpcomTest             = 0;
-$AliveTest                = 1;
-#$JavaTest                 = 0;
-#$ViewerTest               = 0;
-#$BloatTest                = 0;  # warren memory bloat test
-#$BloatTest2               = 0;  # dbaron memory bloat test, require tracemalloc
-#$DomToTextConversionTest  = 0;  
-#$XpcomGlueTest            = 0;
-$CodesizeTest             = 0;  # Z,  require mozilla/tools/codesighs
-$EmbedCodesizeTest        = 0;  # mZ, require mozilla/tools/codesigns
-#$MailBloatTest            = 0;
-#$EmbedTest                = 0;  # Assumes you wanted $BuildEmbed=1
-$LayoutPerformanceTest    = 1;  # Tp
-$LayoutPerformanceLocalTest = 1;  # Tp2
-$DHTMLPerformanceTest     = 1;  # Tdhtml
-#$QATest                   = 0;  
-$XULWindowOpenTest        = 1;  # Txul
-$StartupPerformanceTest   = 1;  # Ts
-
-$TestsPhoneHome           = 1;  # Should test report back to server?
-# If TestOnlyTinderbox is enabled, fetch the latest build info from tinderbox in a 
-# parseable format
-$TinderboxServerURL = 'http://tinderbox.mozilla.org/showbuilds.cgi?tree=MozillaExperimental&quickparse=1';
-$MatchBuildname = 'WINNT 5.2 fxnewref-win32- Depend Fx-Newref';
-#$GraphNameOverride        = 'Fx-Trunk-win32-test1'; # Override name built from ::hostname() and $BuildTag
-
-# $results_server
-#----------------------------------------------------------------------------
-# Server on which test results will be accessible.  This was originally tegu,
-# then became axolotl.  Once we moved services from axolotl, it was time
-# to give this service its own hostname to make future transitions easier.
-# - cmp@mozilla.org
-#$results_server           = "build-graphs.mozilla.org";
-
-$pageload_server          = "spider.office.mozilla.org";
-
-#
-# Timeouts, values are in seconds.
-#
-#$CVSCheckoutTimeout               = 3600;
-#$CreateProfileTimeout             = 45;
-#$RegxpcomTestTimeout              = 120;
-
-$AliveTestTimeout                 = 45;
-#$ViewerTestTimeout                = 45;
-#$EmbedTestTimeout                 = 45;
-#$BloatTestTimeout                 = 120;   # seconds
-#$MailBloatTestTimeout             = 120;   # seconds
-#$JavaTestTimeout                  = 45;
-#$DomTestTimeout	                  = 45;    # seconds
-#$XpcomGlueTestTimeout             = 15;
-#$CodesizeTestTimeout              = 900;     # seconds
-#$CodesizeTestType                 = "auto";  # {"auto"|"base"}
-#$LayoutPerformanceTestTimeout     = 1200;  # entire test, seconds
-#$LayoutPerformanceLocalTestTimeout     = 1200;  # entire test, seconds
-#$DHTMLPerformanceTestTimeout      = 1200;  # entire test, seconds
-#$QATestTimeout                    = 1200;   # entire test, seconds
-#$LayoutPerformanceTestPageTimeout = 30000; # each page, ms
-#$StartupPerformanceTestTimeout    = 15;    # seconds
-#$XULWindowOpenTestTimeout	      = 150;   # seconds
-
-
-#$MozConfigFileName = 'mozconfig';
-
-#$UseMozillaProfile = 1;
-#$MozProfileName = 'default';
-
-#- Set these to what makes sense for your system
-#$Make          = 'gmake';       # Must be GNU make
-#$MakeOverrides = '';
-#$mail          = '/bin/mail';
-#$CVS           = 'cvs -q';
-#$CVSCO         = 'checkout -P';
-
-# win32 usually doesn't have /bin/mail
-#$blat           = 'c:/nstools/bin/blat';
-#$use_blat       = 0;
-
-# Set moz_cvsroot to something like:
-# :pserver:$ENV{USER}%netscape.com\@cvs.mozilla.org:/cvsroot
-# :pserver:anonymous\@cvs-mirror.mozilla.org:/cvsroot
-#
-# Note that win32 may not need \@, depends on ' or ".
-# :pserver:$ENV{USER}%netscape.com@cvs.mozilla.org:/cvsroot
-
-#$moz_cvsroot   = $ENV{CVSROOT};
-
-#- Set these proper values for your tinderbox server
-#$Tinderbox_server = 'tinderbox-daemon@tinderbox.mozilla.org';
-
-# Allow for non-client builds, e.g. camino.
-#$moz_client_mk = 'client.mk';
-
-#- Set if you want to build in a separate object tree
-#$ObjDir = '';
-
-# Extra build name, if needed.
-$BuildNameExtra = 'fxnewref-win32-tbox perf test';
-
-# User comment, eg. ip address for dhcp builds.
-# ex: $UserComment = "ip = 208.12.36.108";
-#$UserComment = 0;
-
-#-
-#- The rest should not need to be changed
-#-
-
-#- Minimum wait period from start of build to start of next build in minutes.
-#$BuildSleep = 10;
-
-#- Until you get the script working. When it works,
-#- change to the tree you're actually building
-$BuildTree  = 'Firefox';
-
-$BuildTag = 'HEAD';
-#$BuildConfigDir = 'mozilla/config';
-#$Topsrcdir = 'mozilla';
-
-$BinaryName = 'firefox.exe';
-
-#
-# For embedding app, use:
-#$EmbedBinaryName = 'TestGtkEmbed';
-#$EmbedDistDir    = 'dist/bin'
-
-
-#$ShellOverride = ''; # Only used if the default shell is too stupid
-#$ConfigureArgs = '';
-#$ConfigureEnvArgs = '';
-#$Compiler = 'gcc';
-#$NSPRArgs = '';
-#$ShellOverride = '';
-
-# Release build options
-#$ReleaseBuild  = 1;
-#$clean_objdir = 1; # remove objdir when starting release cycle?
-#$clean_srcdir = 1; # remove srcdir when starting release cycle?
-#$shiptalkback  = 1;
-#$ReleaseToLatest = 1; # Push the release to latest-<milestone>?
-#$ReleaseToDated = 1; # Push the release to YYYY-MM-DD-HH-<milestone>?
-#$ReleaseGroup = ''; # group to set uploaded files to
-#$build_hour    = "8";
-#$package_creation_path = "/xpinstall/packager";
-# needs setting for mac + talkback: $mac_bundle_path = "/browser/app";
-#$ssh_version   = "2";
-#$ssh_user      = "cltbld";
-#$ssh_server    = "stage.mozilla.org";
-#$ftp_path      = "/home/ftp/pub/mozilla/nightly/experimental";
-#$url_path      = "http://ftp.mozilla.org/pub/mozilla.org/mozilla/nightly/experimental";
-#$tbox_ftp_path = $ftp_path;
-#$tbox_url_path = $url_path;
-#$milestone     = "trunk";
-#$notify_list   = "cmp\@mozilla.org";
-#$stub_installer = 1;
-#$sea_installer = 1;
-#$archive       = 0;
-#$push_raw_xpis = 1;
-
-# Reboot the OS at the end of build-and-test cycle. This is primarily
-# intended for Win9x, which can't last more than a few cycles before
-# locking up (and testing would be suspect even after a couple of cycles).
-# Right now, there is only code to force the reboot for Win9x, so even
-# setting this to 1, will not have an effect on other platforms. Setting
-# up win9x to automatically logon and begin running tinderbox is left 
-# as an exercise to the reader. 
-#$RebootSystem = 0;
-
-# LogCompression specifies the type of compression used on the log file.
-# Valid options are 'gzip', and 'bzip2'. Please make sure the binaries
-# for 'gzip' or 'bzip2' are in the user's path before setting this
-# option.
-#$LogCompression = '';
-
-# LogEncoding specifies the encoding format used for the logs. Valid
-# options are 'base64', and 'uuencode'. If $LogCompression is set above,
-# this needs to be set to 'base64' or 'uuencode' to ensure that the
-# binary data is transferred properly.
-#$LogEncoding = '';
-
-# Prevent Extension Manager from spawning child processes during tests
-# - processes that tbox scripts cannot kill. 
-#$ENV{NO_EM_RESTART} = '1';
-# If tinderbox is running in a test-only mode, it needs to be able to download
-# the latest build and unpack it rather than building it.
-$TestOnlyTinderbox = 1;
-$DownloadBuildFile = 'firefox-3.0a8pre.en-US.win32.zip';
-$DownloadBuildURL = 'http://stage.mozilla.org/pub/mozilla.org/firefox/nightly/experimental/win32-newref/hourly-builds/latest-trunk';
-$DownloadBuildDir = 'firefox';
-

mozilla/webtools/hendrix/index.cgi

@@ -0,0 +1,120 @@
+#!/usr/bin/perl -wT
+# -*- Mode: perl; indent-tabs-mode: nil -*-
+
+# ***** BEGIN LICENSE BLOCK *****
+# Version: MPL 1.1
+#
+# The contents of this file are subject to the Mozilla Public License Version
+# 1.1 (the "License"); you may not use this file except in compliance with
+# the License. You may obtain a copy of the License at
+# http://www.mozilla.org/MPL/
+#
+# Software distributed under the License is distributed on an "AS IS" basis,
+# WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+# for the specific language governing rights and limitations under the
+# License.
+#
+# The Original Code is the Hendrix Feedback System.
+#
+# The Initial Developer of the Original Code is
+# Gervase Markham.
+# Portions created by the Initial Developer are Copyright (C) 2004
+# the Initial Developer. All Rights Reserved.
+#
+# Contributor(s):
+#
+# The Initial Developer wrote this software to the Glory of God.
+# ***** END LICENSE BLOCK *****
+
+use strict;
+
+# This application requires installation of the "Email::Send" (note: not 
+# Mail::Send) module.
+use Template;
+use CGI;
+use Email::Send qw(NNTP);
+
+# use CGI::Carp qw(fatalsToBrowser);
+
+# Configuration
+my $newsgroup = $::ENV{'HENDRIX_NEWSGROUP'} || "mozilla.feedback";
+my $server    = $::ENV{'HENDRIX_NNTP_SERVER'} || "news.mozilla.org";
+my $skin      = $::ENV{'HENDRIX_SKIN'} || "skin/planet.css";
+
+my $cgi = new CGI;
+my $form = $cgi->Vars;
+my $vars;
+$vars->{'form'} = $form;
+$vars->{'newsgroup'} = $newsgroup;
+$vars->{'stylesheet'} = $skin;
+
+my $template = Template->new({
+    INCLUDE_PATH => ["template"],
+    PRE_CHOMP => 1,
+    TRIM => 1,
+    FILTERS => {
+        email => \&emailFilter,
+    },  
+}) || die("Template creation failed.\n");
+
+my $action = $cgi->param("action");
+
+if (!$action) {
+    # If no action, show the submission form
+    print "Content-Type: text/html\n\n";
+    $template->process("index.html.tmpl", $vars)
+      || die("Template process failed: " . $template->error() . "\n");
+}
+elsif ($action eq "submit") {
+    # Format the parameters and send to the newsgroup.
+    
+    # Check for compulsory parameters
+    if (!$form->{'name'} || !$form->{'subject'} || !$form->{'product'}) {
+      throwError("bad_parameters");
+    }
+    
+    my $message;
+    my $headers;
+    
+    $template->process("message-headers.txt.tmpl", $vars, \$headers)
+      || die("Template process failed: " . $template->error() . "\n");
+    $template->process("message.txt.tmpl", $vars, \$message)
+      || die("Template process failed: " . $template->error() . "\n");
+       
+    # Post formatted message to newsgroup
+    my $newsMsg = Email::Simple->new($headers . "\n\n" . $message);
+    my $success = send NNTP => $newsMsg, $server;
+
+    throwError("cant_post") if (!$success);
+
+    # Give user feedback on success
+    $vars->{'headers'} = $headers;
+    $vars->{'message'} = $message;
+    
+    print "Content-Type: text/html\n\n";
+    $template->process("submit-successful.html.tmpl", $vars)
+      || die("Template process failed: " . $template->error() . "\n");
+}
+else {
+    die("Unknown action $action\n");
+}
+
+exit;
+
+# Simple email obfuscation
+sub emailFilter {
+    my ($var) = @_;
+    $var =~ s/\@/_at_/;
+    return $var;
+}
+
+sub throwError {
+    my ($error) = @_;
+    $vars->{'error'} = $error;
+    
+    print "Content-Type: text/html\n\n";
+    $template->process("error.html.tmpl", $vars)
+      || die("Template process failed: " . $template->error() . "\n");
+    
+    exit;
+}

mozilla/webtools/hendrix/skin/default.css

@@ -0,0 +1,68 @@
+/* ***** BEGIN LICENSE BLOCK *****
+ * Version: MPL 1.1
+ *
+ * The contents of this file are subject to the Mozilla Public License Version
+ * 1.1 (the "License"); you may not use this file except in compliance with
+ * the License. You may obtain a copy of the License at
+ * http://www.mozilla.org/MPL/
+ *
+ * Software distributed under the License is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+ * for the specific language governing rights and limitations under the
+ * License.
+ *
+ * The Original Code is the Hendrix Feedback System.
+ *
+ * The Initial Developer of the Original Code is
+ * Gervase Markham.
+ * Portions created by the Initial Developer are Copyright (C) 2004
+ * the Initial Developer. All Rights Reserved.
+ *
+ * Contributor(s):
+ *
+ * ***** END LICENSE BLOCK ***** */
+
+.sidebar {
+  float: right;
+  width: 200px;
+  font-size: small;
+  text-align: center;
+}
+
+#header-img {
+  border: 1px grey solid;
+  margin-left: 10px;
+}
+
+p.error {
+  color: red;
+}
+
+h1 {
+  font-size: x-large;
+}
+
+input[type="text"] {
+  font-family: monospace;
+}
+
+#name, #email {
+  width: 25em;
+}
+
+#subject, #comments {
+  width: 45em;
+}
+
+#comments {
+  height: 20ex;
+}
+
+.label {
+  text-align: right;
+  padding-right: 0.5em;
+}
+
+.newsgroup {
+  font-family: monospace;
+}

mozilla/webtools/hendrix/skin/planet.css

@@ -0,0 +1,100 @@
+/* ***** BEGIN LICENSE BLOCK *****
+ * Version: MPL 1.1
+ *
+ * The contents of this file are subject to the Mozilla Public License Version
+ * 1.1 (the "License"); you may not use this file except in compliance with
+ * the License. You may obtain a copy of the License at
+ * http://www.mozilla.org/MPL/
+ *
+ * Software distributed under the License is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+ * for the specific language governing rights and limitations under the
+ * License.
+ *
+ * The Original Code is a stylesheet for the Hendrix Feedback System.
+ *
+ * The Initial Developer of the Original Code is
+ * KDS Sahambi <kds.sahambi@gmail.com>.
+ * Portions created by the Initial Developer are Copyright (C) 2005
+ * the Initial Developer. All Rights Reserved.
+ *
+ * Contributor(s):
+ *   Gervase Markham <gerv@gerv.net>
+ *
+ * ***** END LICENSE BLOCK ***** */
+
+@import url("http://planet.mozilla.org/planet.css");
+
+input[type="text"] {
+  font-family: monospace;
+}
+
+#name:focus, #email:focus, #subject:focus, #comments:focus, #product:focus {
+  background-color: #e4ecec;
+}
+
+#name, #email {
+  width: 62.5%;
+}
+
+#subject {
+  width: 100%;
+}
+
+#comments {
+  height: 20ex;
+}
+
+#header-img {
+  margin-top: 37px;
+  padding: 2px;
+  border: 2px solid #455372;
+  background: #e4ecec;  
+}
+
+div.sidebar {
+  position: static;
+  float: right;
+  text-align: center;
+}
+
+.label {
+  text-align: right;
+  padding-right: 0.5em;
+}
+
+.newsgroup {
+  font-family: monospace;
+}
+
+p.error {
+  color: red;
+}
+
+h1 { 
+  background-image: url("mozhead.gif");
+  background-repeat: no-repeat;
+  background-position: 2.5% 50%;
+  padding-left: 80px;
+  clear: right;
+}
+
+
+body {
+  background: #fff url("http://www.mozilla.org/images/subsite_back.gif") repeat-x;
+  margin: 20px;
+  margin-top: 0;
+  padding-top: 0; 
+  min-width: 610px;
+}
+
+#mozilla-org a {
+  float: right;
+  display: block;
+  text-indent: -5000em;
+  width: 110px;
+  height: 25px;
+  text-decoration: none;
+  background: url("http://www.mozilla.org/images/subsite_mozilla-org.gif") no-repeat;
+  margin-bottom: 1.5em;
+}

mozilla/webtools/hendrix/template/error.html.tmpl

@@ -0,0 +1,57 @@
+[%# ***** BEGIN LICENSE BLOCK *****
+  # Version: MPL 1.1
+  #
+  # The contents of this file are subject to the Mozilla Public License Version
+  # 1.1 (the "License"); you may not use this file except in compliance with
+  # the License. You may obtain a copy of the License at
+  # http://www.mozilla.org/MPL/
+  #
+  # Software distributed under the License is distributed on an "AS IS" basis,
+  # WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+  # for the specific language governing rights and limitations under the
+  # License.
+  #
+  # The Original Code is the Hendrix Feedback System.
+  #
+  # The Initial Developer of the Original Code is
+  # Gervase Markham.
+  # Portions created by the Initial Developer are Copyright (C) 2004
+  # the Initial Developer. All Rights Reserved.
+  #
+  # Contributor(s):
+  #
+  # The Initial Developer wrote this software to the Glory of God.
+  # ***** END LICENSE BLOCK ***** %]
+  
+[% PROCESS header.html.tmpl 
+   title = "Hendrix - Error" %]
+
+<p>Unfortunately, there is a problem with your submission, as follows:
+</p>
+
+[% SWITCH error %]
+  [% CASE "bad_parameters" %]
+    <p class="error">
+      You need to fill in all the required fields - name, product, summary 
+      and your actual feedback.
+    </p>
+  
+    <p>Please press Back and fill in the missing field(s).</p>
+
+  [% CASE "cant_post" %]
+    <p class="error">
+      We are unable to send your feedback to the server.
+    </p>
+    
+    <p>Please try again later. Your feedback is reproduced below so you can 
+    save it somewhere.</p>
+
+    <pre>
+      [% message FILTER html %]
+    </pre>
+
+  [% CASE DEFAULT %]
+    The error is unknown. Please try again later.
+[% END %]
+
+[% PROCESS footer.html.tmpl %]

mozilla/webtools/hendrix/template/footer.html.tmpl

@@ -0,0 +1,27 @@
+[%# ***** BEGIN LICENSE BLOCK *****
+  # Version: MPL 1.1
+  #
+  # The contents of this file are subject to the Mozilla Public License Version
+  # 1.1 (the "License"); you may not use this file except in compliance with
+  # the License. You may obtain a copy of the License at
+  # http://www.mozilla.org/MPL/
+  #
+  # Software distributed under the License is distributed on an "AS IS" basis,
+  # WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+  # for the specific language governing rights and limitations under the
+  # License.
+  #
+  # The Original Code is the Hendrix Feedback System.
+  #
+  # The Initial Developer of the Original Code is
+  # Gervase Markham.
+  # Portions created by the Initial Developer are Copyright (C) 2004
+  # the Initial Developer. All Rights Reserved.
+  #
+  # Contributor(s):
+  #
+  # The Initial Developer wrote this software to the Glory of God.
+  # ***** END LICENSE BLOCK ***** %]
+
+  </body>
+</html>

mozilla/webtools/hendrix/template/header.html.tmpl

@@ -0,0 +1,58 @@
+[%# ***** BEGIN LICENSE BLOCK *****
+  # Version: MPL 1.1
+  #
+  # The contents of this file are subject to the Mozilla Public License Version
+  # 1.1 (the "License"); you may not use this file except in compliance with
+  # the License. You may obtain a copy of the License at
+  # http://www.mozilla.org/MPL/
+  #
+  # Software distributed under the License is distributed on an "AS IS" basis,
+  # WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+  # for the specific language governing rights and limitations under the
+  # License.
+  #
+  # The Original Code is the Hendrix Feedback System.
+  #
+  # The Initial Developer of the Original Code is
+  # Gervase Markham.
+  # Portions created by the Initial Developer are Copyright (C) 2004
+  # the Initial Developer. All Rights Reserved.
+  #
+  # Contributor(s):
+  #
+  # The Initial Developer wrote this software to the Glory of God.
+  # ***** END LICENSE BLOCK ***** %]
+
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
+"http://www.w3.org/TR/html4/loose.dtd">
+
+<html>
+  <head>
+    <title>[% title %]</title>
+    <link rel="stylesheet" href="[% stylesheet FILTER html %]">
+    <script language="JavaScript" type="text/javascript">
+      [% script %]
+    </script>
+  </head>
+  
+  <body onload="[% onload %]">
+  <div id="mozilla-org"><a href="http://www.mozilla.org/" title="Visit mozilla.org">Visit mozilla.org</a></div>
+  [% IF NOT h1 AND title %]
+    [% h1 = title %]
+  [% END %]
+  
+  [% IF h1 %] 
+    <h1>[% h1 %]</h1>
+  [% END %]
+
+<div class="sidebar">
+  <div>
+    <img id="header-img" src="skin/hendrix.jpg">
+    <p class="caption">
+      Why "Hendrix"? The late 
+      <a href="http://en.wikipedia.org/wiki/Jimi_Hendrix">Jimi Hendrix</a>
+      is credited with making popular the technique of using feedback
+      in the creation of music.
+    </p>
+  </div>
+</div>

mozilla/webtools/hendrix/template/index.html.tmpl

@@ -0,0 +1,141 @@
+[%# ***** BEGIN LICENSE BLOCK *****
+  # Version: MPL 1.1
+  #
+  # The contents of this file are subject to the Mozilla Public License Version
+  # 1.1 (the "License"); you may not use this file except in compliance with
+  # the License. You may obtain a copy of the License at
+  # http://www.mozilla.org/MPL/
+  #
+  # Software distributed under the License is distributed on an "AS IS" basis,
+  # WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+  # for the specific language governing rights and limitations under the
+  # License.
+  #
+  # The Original Code is the Hendrix Feedback System.
+  #
+  # The Initial Developer of the Original Code is
+  # Gervase Markham.
+  # Portions created by the Initial Developer are Copyright (C) 2004
+  # the Initial Developer. All Rights Reserved.
+  #
+  # Contributor(s):
+  #
+  # The Initial Developer wrote this software to the Glory of God.
+  # ***** END LICENSE BLOCK ***** %]
+  
+[% script = BLOCK %]
+var ids = ["name", "subject", "comments"];
+
+function checkSubmitEnable() {
+  /* To enable the button, all fields must have a value */
+  var enable = true;
+  
+  for (var i = 0; i < ids.length; i++) {
+    if (document.getElementById(ids[i]).value == "") {
+      enable = false;
+      break;
+    }  
+  }
+  
+  document.getElementById("send-feedback").disabled = !enable;
+}
+
+function onLoad() {
+  /* Add the event listeners, and disable the button initially */
+  for (var i = 0; i < ids.length; i++) {
+    document.getElementById(ids[i]).onkeyup = checkSubmitEnable;
+  }
+  
+  checkSubmitEnable();
+}  
+[% END %]
+  
+[% PROCESS header.html.tmpl 
+   title = "Hendrix - mozilla.org Feedback System"
+   onload = "onLoad()"
+%]
+
+<p>This is Hendrix - the mozilla.org system for leaving quick feedback on and suggestions for our products. Looking for support? <a href="http://www.mozilla.org/support/">See our support pages</a>.</p>
+
+<p>If you are using the latest developer release of Firefox, and have noticed a website is broken, please instead pull down the Help menu and select "Report Broken Web Site". If you have a specific and detailed bug report, please file it in 
+<a href="https://bugzilla.mozilla.org/enter_bug.cgi">Bugzilla</a>.</p>
+
+<p>Due to the number of suggestions and comments that are received, you should not expect a direct response. But your views are important to us, so please do let us know what you think.</p>
+
+<form id="feedback-form" method="POST">
+  <table id="feedback-table">
+    <tr>
+      <td class="label">Name:</td>
+      <td class="widget">
+        <input id="name" name="name" type="text" 
+               value="[% form.email FILTER html %]"/>
+      </td>
+    </tr>
+    <tr>
+      <td class="label">Email:</td>
+      <td class="widget">
+        <input id="email" name="email" type="text"
+               value="[% form.email FILTER html %]"/> (optional)
+      </td>
+    </tr>
+    <tr>
+      <td class="label">
+        Product: 
+      </td>
+      <td class="widget">
+        <select id="product" name="product">
+          <option name="Firefox">Firefox</option>
+          <option name="Thunderbird">Thunderbird</option>
+          <option name="Mozilla Suite">Mozilla Suite</option>
+          <option name="SeaMonkey">SeaMonkey</option>
+          <option name="Sunbird">Sunbird</option>
+          <option name="Camino">Camino</option>
+          <option name="Bon Echo">Bon Echo</option>
+          <option name="Minefield">Minefield</option>
+          <option name="Other">Other (please state)</option>
+        </select>
+      </td>
+    </tr>
+    <tr>
+      <td class="label">
+        Summary: 
+      </td>
+      <td class="widget">
+        <input id="subject" name="subject" type="text"
+               value="[% form.subject FILTER html %]"/>
+      </td>
+    </tr>
+    <tr>
+      <td class="label">
+        Detailed Comments: 
+      </td>
+      <td class="widget">
+        <textarea id="comments" name="comments" wrap="hard" cols="72"
+        >[% form.comments FILTER html %]</textarea>
+      </td>
+    </tr>
+    <tr>
+      <td></td>
+      <td>
+        <input id="send-feedback" type="submit" value="Send Feedback"/>
+      </td>
+    </tr>
+  </table>
+  <input type="hidden" name="useragent" id="useragent" value=""/>  
+  
+  <script type="text/javascript">
+    if (document.getElementById)
+    {
+      var useragent = navigator.userAgent;
+      document.getElementById("useragent").setAttribute("value", useragent);
+    }
+  </script>
+  
+  <input type="hidden" name="action" value="submit"/>  
+</form>
+
+<p>
+Information from this form will be published to the newsgroup <span class="newsgroup">[% newsgroup %]</span> so project contributors can read it. Do not submit any information unless you wish it to be made public. Your email address will be obfuscated to make life difficult for spammers.
+</p>
+
+[% PROCESS footer.html.tmpl %]

mozilla/webtools/hendrix/template/message-headers.txt.tmpl

@@ -0,0 +1,34 @@
+[%# ***** BEGIN LICENSE BLOCK *****
+  # Version: MPL 1.1
+  #
+  # The contents of this file are subject to the Mozilla Public License Version
+  # 1.1 (the "License"); you may not use this file except in compliance with
+  # the License. You may obtain a copy of the License at
+  # http://www.mozilla.org/MPL/
+  #
+  # Software distributed under the License is distributed on an "AS IS" basis,
+  # WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+  # for the specific language governing rights and limitations under the
+  # License.
+  #
+  # The Original Code is the Hendrix Feedback System.
+  #
+  # The Initial Developer of the Original Code is
+  # Gervase Markham.
+  # Portions created by the Initial Developer are Copyright (C) 2004
+  # the Initial Developer. All Rights Reserved.
+  #
+  # Contributor(s):
+  #
+  # The Initial Developer wrote this software to the Glory of God.
+  # ***** END LICENSE BLOCK ***** %]
+[% from = form.name %]
+[% IF form.email %]
+  [% from = BLOCK %]
+    [% from %] <[% form.email FILTER email %]>
+  [% END %]
+[% END %]
+Newsgroups: [% newsgroup %]
+From: [% from %]
+X-Hendrix-Product: [% form.product %]
+Subject: [Hendrix] [% form.subject %]

mozilla/webtools/hendrix/template/message.txt.tmpl

@@ -0,0 +1,37 @@
+[%# ***** BEGIN LICENSE BLOCK *****
+  # Version: MPL 1.1
+  #
+  # The contents of this file are subject to the Mozilla Public License Version
+  # 1.1 (the "License"); you may not use this file except in compliance with
+  # the License. You may obtain a copy of the License at
+  # http://www.mozilla.org/MPL/
+  #
+  # Software distributed under the License is distributed on an "AS IS" basis,
+  # WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+  # for the specific language governing rights and limitations under the
+  # License.
+  #
+  # The Original Code is the Hendrix Feedback System.
+  #
+  # The Initial Developer of the Original Code is
+  # Gervase Markham.
+  # Portions created by the Initial Developer are Copyright (C) 2004
+  # the Initial Developer. All Rights Reserved.
+  #
+  # Contributor(s):
+  #
+  # The Initial Developer wrote this software to the Glory of God.
+  # ***** END LICENSE BLOCK ***** %]
+Name:    [% form.name %]
+[% IF form.email %]
+Email:   [% form.email FILTER email %]
+[% END %]
+Product: [% form.product %]
+Summary: [% form.subject %]
+
+Comments: 
+[%+ form.comments %]
+
+[% IF form.useragent %]
+Browser Details: [% form.useragent %]
+[% END %]

mozilla/webtools/hendrix/template/submit-successful.html.tmpl

@@ -0,0 +1,37 @@
+[%# ***** BEGIN LICENSE BLOCK *****
+  # Version: MPL 1.1
+  #
+  # The contents of this file are subject to the Mozilla Public License Version
+  # 1.1 (the "License"); you may not use this file except in compliance with
+  # the License. You may obtain a copy of the License at
+  # http://www.mozilla.org/MPL/
+  #
+  # Software distributed under the License is distributed on an "AS IS" basis,
+  # WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+  # for the specific language governing rights and limitations under the
+  # License.
+  #
+  # The Original Code is the Hendrix Feedback System.
+  #
+  # The Initial Developer of the Original Code is
+  # Gervase Markham.
+  # Portions created by the Initial Developer are Copyright (C) 2004
+  # the Initial Developer. All Rights Reserved.
+  #
+  # Contributor(s):
+  #
+  # The Initial Developer wrote this software to the Glory of God.
+  # ***** END LICENSE BLOCK ***** %]
+  
+[% PROCESS header.html.tmpl 
+   title = "Hendrix - Submission Successful" %]
+
+<p>Thank you for your feedback, and for using our software.</p>
+
+<p>Your message was:</p>
+
+<pre>
+[% message FILTER html %]
+</pre>
+
+[% PROCESS footer.html.tmpl %]