#! /usr/bin/perl
#
# Gnats installation script -- written by Brian White <bcwhite@pobox.com>
# (This was my very first attempt at learning perl... please forgive me!)
#


###############################################################################
#
# Common initialization for install scripts
#

chop($site = `hostname -f`);
if ($site =~ m/\./) {
	$site =~ s/^.*\.([^\.]*)\.[^\.]*$/$1/;
}

$gnatsid    = 41;
$gnatsgid	= 41;
$mailfile   = "/etc/aliases";
$passwdfile = "/etc/passwd";
$gnatsdir   = "/usr/lib/gnats";
$gnatsdbpar = "/var/lib/gnats";
$gnatsdbdir = "$gnatsdbpar/gnats-db";
$gnatshome	= "$gnatsdbdir";
$gnatssite  = "$gnatsdbdir/$site";
$configfile = "$gnatsdbdir/gnats-adm/config";
$gnatsentry = "gnats:*:$gnatsid:$gnatsgid:Gnats Bug-Reporting System:$gnatshome:/bin/sh";
$waitcr     = 0;
