Bugzilla::Status code style

master
Vitaliy Filippov 2014-04-14 17:03:34 +04:00
parent 1eb8f0e64b
commit e1b83084a1
1 changed files with 66 additions and 59 deletions

View File

@ -1,5 +1,3 @@
# -*- Mode: perl; indent-tabs-mode: nil -*-
#
# The contents of this file are subject to the Mozilla Public # The contents of this file are subject to the Mozilla Public
# License Version 1.1 (the "License"); you may not use this file # License Version 1.1 (the "License"); you may not use this file
# except in compliance with the License. You may obtain a copy of # except in compliance with the License. You may obtain a copy of
@ -29,7 +27,7 @@ use base qw(Bugzilla::Field::Choice Exporter);
BUG_STATE_OPEN BUG_STATE_OPEN
SPECIAL_STATUS_WORKFLOW_ACTIONS SPECIAL_STATUS_WORKFLOW_ACTIONS
is_open_state is_open_state
closed_bug_statuses closed_bug_statuses
); );
@ -48,11 +46,13 @@ use constant DB_TABLE => 'bug_status';
use constant FIELD_NAME => 'bug_status'; use constant FIELD_NAME => 'bug_status';
# This has all the standard Bugzilla::Field::Choice columns plus "is_open" # This has all the standard Bugzilla::Field::Choice columns plus "is_open"
sub DB_COLUMNS { sub DB_COLUMNS
{
return ($_[0]->SUPER::DB_COLUMNS, 'is_open'); return ($_[0]->SUPER::DB_COLUMNS, 'is_open');
} }
sub VALIDATORS { sub VALIDATORS
{
my $invocant = shift; my $invocant = shift;
my $validators = $invocant->SUPER::VALIDATORS; my $validators = $invocant->SUPER::VALIDATORS;
$validators->{is_open} = \&Bugzilla::Object::check_boolean; $validators->{is_open} = \&Bugzilla::Object::check_boolean;
@ -64,7 +64,8 @@ sub VALIDATORS {
# Database Manipulation # # Database Manipulation #
######################### #########################
sub create { sub create
{
my $class = shift; my $class = shift;
my $self = $class->SUPER::create(@_); my $self = $class->SUPER::create(@_);
delete Bugzilla->request_cache->{status_bug_state_open}; delete Bugzilla->request_cache->{status_bug_state_open};
@ -72,15 +73,14 @@ sub create {
return $self; return $self;
} }
sub remove_from_db { sub remove_from_db
{
my $self = shift; my $self = shift;
my $dbh = Bugzilla->dbh; my $dbh = Bugzilla->dbh;
my $id = $self->id; my $id = $self->id;
$dbh->bz_start_transaction(); $dbh->bz_start_transaction();
$self->SUPER::remove_from_db(); $self->SUPER::remove_from_db();
$dbh->do('DELETE FROM status_workflow $dbh->do('DELETE FROM status_workflow WHERE old_status = ? OR new_status = ?', undef, $id, $id);
WHERE old_status = ? OR new_status = ?',
undef, $id, $id);
$dbh->bz_commit_transaction(); $dbh->bz_commit_transaction();
delete Bugzilla->request_cache->{status_bug_state_open}; delete Bugzilla->request_cache->{status_bug_state_open};
} }
@ -89,13 +89,13 @@ sub remove_from_db {
##### Accessors #### ##### Accessors ####
############################### ###############################
sub is_active { return $_[0]->{'isactive'}; } sub is_active { return $_[0]->{isactive}; }
sub is_open { return $_[0]->{'is_open'}; } sub is_open { return $_[0]->{is_open}; }
sub is_static { sub is_static
{
my $self = shift; my $self = shift;
if ($self->name eq 'UNCONFIRMED' if ($self->name eq 'UNCONFIRMED' || $self->name eq Bugzilla->params->{duplicate_or_move_bug_status})
|| $self->name eq Bugzilla->params->{'duplicate_or_move_bug_status'})
{ {
return 1; return 1;
} }
@ -106,96 +106,101 @@ sub is_static {
# Validators # # Validators #
############## ##############
sub _check_value { sub _check_value
{
my $invocant = shift; my $invocant = shift;
my $value = $invocant->SUPER::_check_value(@_); my $value = $invocant->SUPER::_check_value(@_);
if (grep { lc($value) eq lc($_) } SPECIAL_STATUS_WORKFLOW_ACTIONS) { if (grep { lc($value) eq lc($_) } SPECIAL_STATUS_WORKFLOW_ACTIONS)
ThrowUserError('fieldvalue_reserved_word', {
{ field => $invocant->field, value => $value }); ThrowUserError('fieldvalue_reserved_word', { field => $invocant->field, value => $value });
} }
return $value; return $value;
} }
############################### ###############################
##### Methods #### ##### Methods ####
############################### ###############################
sub BUG_STATE_OPEN { sub BUG_STATE_OPEN
{
my $dbh = Bugzilla->dbh; my $dbh = Bugzilla->dbh;
my $cache = Bugzilla->request_cache; my $cache = Bugzilla->request_cache;
$cache->{status_bug_state_open} ||= $cache->{status_bug_state_open} ||= $dbh->selectcol_arrayref('SELECT value FROM bug_status WHERE is_open = 1');
$dbh->selectcol_arrayref('SELECT value FROM bug_status
WHERE is_open = 1');
return @{ $cache->{status_bug_state_open} }; return @{ $cache->{status_bug_state_open} };
} }
# Tells you whether or not the argument is a valid "open" state. # Tells you whether or not the argument is a valid "open" state.
# FIXME Remove is_open_state # FIXME Remove is_open_state
sub is_open_state { sub is_open_state
{
my ($state) = @_; my ($state) = @_;
return (grep($_ eq $state, BUG_STATE_OPEN) ? 1 : 0); return (grep($_ eq $state, BUG_STATE_OPEN) ? 1 : 0);
} }
sub closed_bug_statuses { sub closed_bug_statuses
{
my @bug_statuses = Bugzilla::Status->get_all; my @bug_statuses = Bugzilla::Status->get_all;
@bug_statuses = grep { !$_->is_open } @bug_statuses; @bug_statuses = grep { !$_->is_open } @bug_statuses;
return @bug_statuses; return @bug_statuses;
} }
sub can_change_to { sub can_change_to
{
my $self = shift; my $self = shift;
my $dbh = Bugzilla->dbh; my $dbh = Bugzilla->dbh;
if (!ref($self) || !defined $self->{'can_change_to'}) { if (!ref($self) || !defined $self->{can_change_to})
{
my ($cond, @args, $self_exists); my ($cond, @args, $self_exists);
if (ref($self)) { if (ref($self))
{
$cond = '= ?'; $cond = '= ?';
push(@args, $self->id); push(@args, $self->id);
$self_exists = 1; $self_exists = 1;
} }
else { else
{
$cond = 'IS NULL'; $cond = 'IS NULL';
# Let's do it so that the code below works in all cases. # Let's do it so that the code below works in all cases.
$self = {}; $self = {};
} }
my $new_status_ids = $dbh->selectcol_arrayref("SELECT new_status my $new_status_ids = $dbh->selectcol_arrayref(
FROM status_workflow "SELECT new_status FROM status_workflow".
INNER JOIN bug_status " INNER JOIN bug_status ON id = new_status".
ON id = new_status " WHERE isactive = 1 AND old_status $cond".
WHERE isactive = 1 " ORDER BY sortkey", undef, @args
AND old_status $cond );
ORDER BY sortkey",
undef, @args);
# Allow the bug status to remain unchanged. # Allow the bug status to remain unchanged.
push(@$new_status_ids, $self->id) if $self_exists; push(@$new_status_ids, $self->id) if $self_exists;
$self->{'can_change_to'} = Bugzilla::Status->new_from_list($new_status_ids); $self->{can_change_to} = Bugzilla::Status->new_from_list($new_status_ids);
} }
return $self->{'can_change_to'}; return $self->{can_change_to};
} }
sub comment_required_on_change_from { sub comment_required_on_change_from
{
my ($self, $old_status) = @_; my ($self, $old_status) = @_;
my ($cond, $values) = $self->_status_condition($old_status); my ($cond, $values) = $self->_status_condition($old_status);
my ($require_comment) = Bugzilla->dbh->selectrow_array( my ($require_comment) = Bugzilla->dbh->selectrow_array(
"SELECT require_comment FROM status_workflow "SELECT require_comment FROM status_workflow WHERE $cond", undef, @$values
WHERE $cond", undef, @$values); );
return $require_comment; return $require_comment;
} }
# Used as a helper for various functions that have to deal with old_status # Used as a helper for various functions that have to deal with old_status
# sometimes being NULL and sometimes having a value. # sometimes being NULL and sometimes having a value.
sub _status_condition { sub _status_condition
{
my ($self, $old_status) = @_; my ($self, $old_status) = @_;
my @values; my @values;
my $cond = 'old_status IS NULL'; my $cond = 'old_status IS NULL';
# For newly-filed bugs # For newly-filed bugs
if ($old_status) { if ($old_status)
{
$cond = 'old_status = ?'; $cond = 'old_status = ?';
push(@values, $old_status->id); push(@values, $old_status->id);
} }
@ -204,25 +209,27 @@ sub _status_condition {
return ($cond, \@values); return ($cond, \@values);
} }
sub add_missing_bug_status_transitions { sub add_missing_bug_status_transitions
my $bug_status = shift || Bugzilla->params->{'duplicate_or_move_bug_status'}; {
my $bug_status = shift || Bugzilla->params->{duplicate_or_move_bug_status};
my $dbh = Bugzilla->dbh; my $dbh = Bugzilla->dbh;
my $new_status = new Bugzilla::Status({name => $bug_status}); my $new_status = new Bugzilla::Status({ name => $bug_status });
# Silently discard invalid bug statuses. # Silently discard invalid bug statuses.
$new_status || return; $new_status || return;
my $missing_statuses = $dbh->selectcol_arrayref('SELECT id my $missing_statuses = $dbh->selectcol_arrayref(
FROM bug_status 'SELECT id FROM bug_status'.
LEFT JOIN status_workflow ' LEFT JOIN status_workflow ON old_status = id AND new_status = ?'.
ON old_status = id ' WHERE old_status IS NULL', undef, $new_status->id
AND new_status = ? );
WHERE old_status IS NULL',
undef, $new_status->id);
my $sth = $dbh->prepare('INSERT INTO status_workflow my $sth = $dbh->prepare(
(old_status, new_status) VALUES (?, ?)'); 'INSERT INTO status_workflow (old_status, new_status) VALUES (?, ?)'
);
foreach my $old_status_id (@$missing_statuses) { foreach my $old_status_id (@$missing_statuses)
{
next if ($old_status_id == $new_status->id); next if ($old_status_id == $new_status->id);
$sth->execute($old_status_id, $new_status->id); $sth->execute($old_status_id, $new_status->id);
} }