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
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
|
# 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::RequestNagger::Constants;
use strict;
use base qw(Exporter);
our @EXPORT = qw(
FLAG_TYPES
REQUESTEE_NAG_SQL
SETTER_NAG_SQL
WATCHING_REQUESTEE_NAG_SQL
WATCHING_SETTER_NAG_SQL
);
# the order of this array determines the order used in email
use constant FLAG_TYPES => (
{
type => 'review', # flag_type.name
group => 'everyone', # the user must be a member of this group to receive reminders
},
{
type => 'superview',
group => 'everyone',
},
{
type => 'feedback',
group => 'everyone',
},
{
type => 'needinfo',
group => 'editbugs',
},
);
sub REQUESTEE_NAG_SQL {
my $dbh = Bugzilla->dbh;
my @flag_types_sql = map { $dbh->quote($_->{type}) } FLAG_TYPES;
return "
SELECT
flagtypes.name AS flag_type,
flags.id AS flag_id,
flags.bug_id,
flags.attach_id,
flags.modification_date,
setter.userid AS setter_id,
requestee.userid AS requestee_id,
flags.requestee_id AS recipient_id,
flags.requestee_id AS target_id
FROM
flags
INNER JOIN flagtypes ON flagtypes.id = flags.type_id
INNER JOIN profiles AS setter ON setter.userid = flags.setter_id
INNER JOIN profiles AS requestee ON requestee.userid = flags.requestee_id
INNER JOIN bugs ON bugs.bug_id = flags.bug_id
INNER JOIN products ON products.id = bugs.product_id
LEFT JOIN attachments ON attachments.attach_id = flags.attach_id
LEFT JOIN profile_setting ON profile_setting.setting_name = 'request_nagging'
AND profile_setting.user_id = flags.requestee_id
LEFT JOIN nag_defer ON nag_defer.flag_id = flags.id
WHERE
" . $dbh->sql_in('flagtypes.name', \@flag_types_sql) . "
AND flags.status = '?'
AND products.nag_interval != 0
AND TIMESTAMPDIFF(HOUR, flags.modification_date, CURRENT_DATE()) >= products.nag_interval
AND (profile_setting.setting_value IS NULL OR profile_setting.setting_value = 'on')
AND requestee.disable_mail = 0
AND nag_defer.id IS NULL
ORDER BY
flags.requestee_id,
flagtypes.name,
flags.modification_date
";
}
sub SETTER_NAG_SQL {
my $dbh = Bugzilla->dbh;
my @flag_types_sql = map { $dbh->quote($_->{type}) } FLAG_TYPES;
return "
SELECT
flagtypes.name AS flag_type,
flags.id AS flag_id,
flags.bug_id,
flags.attach_id,
flags.modification_date,
setter.userid AS setter_id,
requestee.userid AS requestee_id,
flags.setter_id AS recipient_id,
flags.setter_id AS target_id
FROM
flags
INNER JOIN flagtypes ON flagtypes.id = flags.type_id
INNER JOIN profiles AS setter ON setter.userid = flags.setter_id
LEFT JOIN profiles AS requestee ON requestee.userid = flags.requestee_id
INNER JOIN bugs ON bugs.bug_id = flags.bug_id
INNER JOIN products ON products.id = bugs.product_id
LEFT JOIN attachments ON attachments.attach_id = flags.attach_id
LEFT JOIN profile_setting ON profile_setting.setting_name = 'request_nagging'
AND profile_setting.user_id = flags.setter_id
LEFT JOIN nag_defer ON nag_defer.flag_id = flags.id
WHERE
" . $dbh->sql_in('flagtypes.name', \@flag_types_sql) . "
AND flags.status = '?'
AND products.nag_interval != 0
AND TIMESTAMPDIFF(HOUR, flags.modification_date, CURRENT_DATE()) >= products.nag_interval
AND (profile_setting.setting_value IS NULL OR profile_setting.setting_value = 'on')
AND setter.disable_mail = 0
AND nag_defer.id IS NULL
ORDER BY
flags.setter_id,
flagtypes.name,
flags.modification_date
";
}
sub WATCHING_REQUESTEE_NAG_SQL {
my $dbh = Bugzilla->dbh;
my @flag_types_sql = map { $dbh->quote($_->{type}) } FLAG_TYPES;
return "
SELECT
nag_watch.watcher_id,
flagtypes.name AS flag_type,
flags.id AS flag_id,
flags.bug_id,
flags.attach_id,
flags.modification_date,
setter.userid AS setter_id,
requestee.userid AS requestee_id,
nag_watch.watcher_id AS recipient_id,
requestee.userid AS target_id
FROM
flags
INNER JOIN flagtypes ON flagtypes.id = flags.type_id
INNER JOIN profiles AS setter ON setter.userid = flags.setter_id
INNER JOIN profiles AS requestee ON requestee.userid = flags.requestee_id
INNER JOIN bugs ON bugs.bug_id = flags.bug_id
INNER JOIN products ON products.id = bugs.product_id
LEFT JOIN attachments ON attachments.attach_id = flags.attach_id
LEFT JOIN nag_defer ON nag_defer.flag_id = flags.id
INNER JOIN nag_watch ON nag_watch.nagged_id = flags.requestee_id
INNER JOIN profiles AS watcher ON watcher.userid = nag_watch.watcher_id
WHERE
" . $dbh->sql_in('flagtypes.name', \@flag_types_sql) . "
AND flags.status = '?'
AND products.nag_interval != 0
AND TIMESTAMPDIFF(HOUR, flags.modification_date, CURRENT_DATE()) >= products.nag_interval
AND watcher.disable_mail = 0
ORDER BY
nag_watch.watcher_id,
flags.requestee_id,
flags.modification_date
";
}
sub WATCHING_SETTER_NAG_SQL {
my $dbh = Bugzilla->dbh;
my @flag_types_sql = map { $dbh->quote($_->{type}) } FLAG_TYPES;
return "
SELECT
nag_watch.watcher_id,
flagtypes.name AS flag_type,
flags.id AS flag_id,
flags.bug_id,
flags.attach_id,
flags.modification_date,
setter.userid AS setter_id,
requestee.userid AS requestee_id,
nag_watch.watcher_id AS recipient_id,
setter.userid AS target_id
FROM
flags
INNER JOIN flagtypes ON flagtypes.id = flags.type_id
INNER JOIN profiles AS setter ON setter.userid = flags.setter_id
LEFT JOIN profiles AS requestee ON requestee.userid = flags.requestee_id
INNER JOIN bugs ON bugs.bug_id = flags.bug_id
INNER JOIN products ON products.id = bugs.product_id
LEFT JOIN attachments ON attachments.attach_id = flags.attach_id
LEFT JOIN nag_defer ON nag_defer.flag_id = flags.id
INNER JOIN nag_watch ON nag_watch.nagged_id = flags.setter_id
INNER JOIN profiles AS watcher ON watcher.userid = nag_watch.watcher_id
WHERE
" . $dbh->sql_in('flagtypes.name', \@flag_types_sql) . "
AND flags.status = '?'
AND products.nag_interval != 0
AND TIMESTAMPDIFF(HOUR, flags.modification_date, CURRENT_DATE()) >= products.nag_interval
AND watcher.disable_mail = 0
ORDER BY
nag_watch.watcher_id,
flags.requestee_id,
flags.modification_date
";
}
1;
|
