X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=bugcfg.pm;h=0fdbcccfc5512f3545796c1a03fc4c3f07852f18;hp=2d3c59c64f035ca477efe673171217a7818d11b5;hb=c3906cb5915ca5fc9924508449bb29c0ff357692;hpb=fb44329222f15a8caed242d73e1abf406ad42868 diff --git a/bugcfg.pm b/bugcfg.pm index 2d3c59c..0fdbccc 100644 --- a/bugcfg.pm +++ b/bugcfg.pm @@ -6,30 +6,36 @@ use warnings; package bugcfg; our ($spooldir,$maintainerlist,$debian_ftproot,$debian_sources,$pseudolist); +use Debbugs::Config qw(:config); + # General configuration stuff -my $host=`hostname`; -chomp $host; -if ($host eq "master" or $host eq "spohr" or $host eq "rietz") { - $spooldir = "/org/bugs.debian.org/debbugs/spool/db-h"; - $maintainerlist = "/etc/debbugs/Maintainers"; - $debian_ftproot = "/org/bugs.debian.org/etc/indices/ftp/testing"; - $debian_sources = "/etc/debbugs/indices/ftp.sources"; - $pseudolist = "/org/bugs.debian.org/etc/pseudo-packages.description"; -} elsif ($host eq "merkel") { - $spooldir = "/org/bugs.debian.org/spool/db-h"; - $maintainerlist = "/etc/debbugs/Maintainers"; - $debian_ftproot = "/org/bugs.debian.org/etc/indices/ftp/testing"; - $debian_sources = "/etc/debbugs/indices/ftp.sources"; - $pseudolist = "/org/bugs.debian.org/etc/pseudo-packages.description"; -} else { - die "Unknown machine, please configure paths in bugcfg.pm\n"; +$spooldir = $config{spool_dir}.'/db-h'; +$maintainerlist = $config{maintainer_file}; +$debian_sources = "/etc/debbugs/indices/ftp.sources"; +$debian_ftproot = "/srv/bugs.debian.org/etc/indices/ftp/testing"; +$pseudolist = $config{pseudo_desc_file}; + +# this is just the default, and should always be overriden by the +# Debbugs::Config; set values +our $debian_releases = {testing => 'stretch', + stable => 'jessie', + unstable => 'sid', + oldstable => 'wheezy', + }; +# figure out debian releases from distribution aliases +for my $alias (keys %{$config{distribution_aliases}//{}}) { + next if $alias eq $config{distribution_aliases}{$alias}; + $debian_releases->{$config{distribution_aliases}{$alias}} = + $alias; } -# alpha excluded to RM request -our @architectures = ( "i386", "amd64", "sparc", "powerpc", "armel", "hppa", "ia64", "mips", "mipsel", "s390" ); +# check out: +# http://release.debian.org/stretch/arch_qualify.html +# and then generally include architectures which are currently in testing +our @architectures = qw(amd64 arm64 armel armhf i386 mips mipsel ppc64el s390x); our @sections = ( "main", "contrib", "non-free" ); -our @priorities = ( "serious", "grave", "critical" ); +our @priorities = @{$config{strong_severities}}; our @skiptags = ( ); 1;