summaryrefslogtreecommitdiffstats
path: root/extensions/AntiSpam/lib/Config.pm
blob: b6d1234d920d00e0d96625742a6332b605825f1f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
# This Source Code Form is subject to the terms of the Mozilla Public
# License, v. 2.0. If a copy of the MPL was not distributed with this
# file, You can obtain one at http://mozilla.org/MPL/2.0/.
#
# This Source Code Form is "Incompatible With Secondary Licenses", as
# defined by the Mozilla Public License, v. 2.0.

package Bugzilla::Extension::AntiSpam::Config;

use 5.10.1;
use strict;
use warnings;

use Bugzilla::Config::Common;
use Bugzilla::Group;

our $sortkey = 511;

sub get_param_list {
    my ($class) = @_;

    my @param_list = (
        {
            name => 'antispam_spammer_exclude_group',
            type => 's',
            choices => \&_get_all_group_names,
            default => 'canconfirm',
            checker => \&check_group
        },
        {
            name => 'antispam_spammer_comment_count',
            type => 't',
            default => '3',
            checker => \&check_numeric
        },
        {
            name => 'antispam_spammer_disable_text',
            type => 'l',
            default =>
                "This account has been automatically disabled as a result of " .
                "a high number of spam comments.<br>\n<br>\n" .
                "Please contact the address at the end of this message if " .
                "you believe this to be an error."
        },
        {
            name => 'antispam_abusive_comment_count',
            type => 't',
            default => '5',
            checker => \&check_numeric
        },
        {
            name => 'antispam_abusive_disable_text',
            type => 'l',
            default =>
                "This account has been automatically disabled as a result of " .
                "a high number of comments tagged as abusive.<br>\n<br>\n" .
                "All interactions on Bugzilla should follow our " .
                "<a href=\"https://bugzilla.mozilla.org/page.cgi?id=etiquette.html\">" .
                "etiquette guidelines</a>.<br>\n<br>\n" .
                "Please contact the address at the end of this message if you " .
                "believe this to be an error, or if you would like your account " .
                "reactivated in order to interact within our etiquette " .
                "guidelines."
        },
        {
            name => 'antispam_multi_user_limit_age',
            type => 't',
            default => '2',
            checker => \&check_numeric,
        },
        {
            name => 'antispam_multi_user_limit_count',
            type => 't',
            default => '5',
            checker => \&check_numeric,
        },
    );

    return @param_list;
}

sub _get_all_group_names {
    my @group_names = map {$_->name} Bugzilla::Group->get_all;
    unshift(@group_names, '');
    return \@group_names;
}

1;