editworkflow.cgi: code style

hinted-selects
Vitaliy Filippov 2014-10-08 16:48:59 +04:00
parent 87c257b0b9
commit 1c94360e18
1 changed files with 68 additions and 51 deletions

View File

@ -1,6 +1,4 @@
#!/usr/bin/perl -wT
# -*- Mode: perl; indent-tabs-mode: nil -*-
#
# The contents of this file are subject to the Mozilla Public
# License Version 1.1 (the "License"); you may not use this file
# except in compliance with the License. You may obtain a copy of
@ -33,80 +31,88 @@ my $cgi = Bugzilla->cgi;
my $dbh = Bugzilla->dbh;
my $user = Bugzilla->login(LOGIN_REQUIRED);
$user->in_group('admin')
|| ThrowUserError('auth_failure', {group => 'admin',
action => 'modify',
object => 'workflow'});
$user->in_group('admin') || ThrowUserError('auth_failure', {
group => 'admin',
action => 'modify',
object => 'workflow',
});
my $action = $cgi->param('action') || 'edit';
my $token = $cgi->param('token');
sub get_workflow {
sub get_workflow
{
my $dbh = Bugzilla->dbh;
my $workflow = $dbh->selectall_arrayref('SELECT old_status, new_status, require_comment
FROM status_workflow');
my $workflow = $dbh->selectall_arrayref(
'SELECT old_status, new_status, require_comment FROM status_workflow'
);
my %workflow;
foreach my $row (@$workflow) {
foreach my $row (@$workflow)
{
my ($old, $new, $type) = @$row;
$workflow{$old || 0}{$new} = $type;
}
return \%workflow;
}
sub load_template {
sub load_template
{
my ($filename, $message) = @_;
my $template = Bugzilla->template;
my $vars = {};
$vars->{'statuses'} = [Bugzilla::Status->get_all];
$vars->{'workflow'} = get_workflow();
$vars->{'token'} = issue_session_token("workflow_$filename");
$vars->{'message'} = $message;
$vars->{statuses} = [Bugzilla::Status->get_all];
$vars->{workflow} = get_workflow();
$vars->{token} = issue_session_token("workflow_$filename");
$vars->{message} = $message;
$template->process("admin/workflow/$filename.html.tmpl", $vars)
|| ThrowTemplateError($template->error());
exit;
|| ThrowTemplateError($template->error());
}
if ($action eq 'edit') {
if ($action eq 'edit')
{
load_template('edit');
}
elsif ($action eq 'update') {
elsif ($action eq 'update')
{
check_token_data($token, 'workflow_edit');
my $statuses = [Bugzilla::Status->get_all];
my $statuses = [ Bugzilla::Status->get_all ];
my $workflow = get_workflow();
my $sth_insert = $dbh->prepare('INSERT INTO status_workflow (old_status, new_status)
VALUES (?, ?)');
my $sth_delete = $dbh->prepare('DELETE FROM status_workflow
WHERE old_status = ? AND new_status = ?');
my $sth_delnul = $dbh->prepare('DELETE FROM status_workflow
WHERE old_status IS NULL AND new_status = ?');
my $sth_insert = $dbh->prepare('INSERT INTO status_workflow (old_status, new_status) VALUES (?, ?)');
my $sth_delete = $dbh->prepare('DELETE FROM status_workflow WHERE old_status = ? AND new_status = ?');
my $sth_delnul = $dbh->prepare('DELETE FROM status_workflow WHERE old_status IS NULL AND new_status = ?');
# Part 1: Initial bug statuses.
foreach my $new (@$statuses) {
if (($new->is_open || $new->name eq Bugzilla->params->{duplicate_or_move_bug_status}) && $cgi->param('w_0_' . $new->id)) {
$sth_insert->execute(undef, $new->id)
unless defined $workflow->{0}->{$new->id};
foreach my $new (@$statuses)
{
if (($new->is_open || $new->name eq Bugzilla->params->{duplicate_or_move_bug_status}) &&
$cgi->param('w_0_' . $new->id))
{
$sth_insert->execute(undef, $new->id) unless defined $workflow->{0}->{$new->id};
}
else {
else
{
$sth_delnul->execute($new->id);
}
}
# Part 2: Bug status changes.
foreach my $old (@$statuses) {
foreach my $new (@$statuses) {
foreach my $old (@$statuses)
{
foreach my $new (@$statuses)
{
next if $old->id == $new->id;
# All transitions to 'duplicate_or_move_bug_status' must be valid.
if ($cgi->param('w_' . $old->id . '_' . $new->id)
|| ($new->name eq Bugzilla->params->{'duplicate_or_move_bug_status'}))
if ($cgi->param('w_' . $old->id . '_' . $new->id) ||
$new->name eq Bugzilla->params->{duplicate_or_move_bug_status})
{
$sth_insert->execute($old->id, $new->id)
unless defined $workflow->{$old->id}->{$new->id};
$sth_insert->execute($old->id, $new->id) unless defined $workflow->{$old->id}->{$new->id};
}
else {
else
{
$sth_delete->execute($old->id, $new->id);
}
}
@ -114,29 +120,38 @@ elsif ($action eq 'update') {
delete_token($token);
load_template('edit', 'workflow_updated');
}
elsif ($action eq 'edit_comment') {
elsif ($action eq 'edit_comment')
{
load_template('comment');
}
elsif ($action eq 'update_comment') {
elsif ($action eq 'update_comment')
{
check_token_data($token, 'workflow_comment');
my $workflow = get_workflow();
my $sth_update = $dbh->prepare('UPDATE status_workflow SET require_comment = ?
WHERE old_status = ? AND new_status = ?');
my $sth_updnul = $dbh->prepare('UPDATE status_workflow SET require_comment = ?
WHERE old_status IS NULL AND new_status = ?');
foreach my $old (keys %$workflow) {
my $sth_update = $dbh->prepare(
'UPDATE status_workflow SET require_comment = ?'.
' WHERE old_status = ? AND new_status = ?'
);
my $sth_updnul = $dbh->prepare(
'UPDATE status_workflow SET require_comment = ?'.
' WHERE old_status IS NULL AND new_status = ?'
);
foreach my $old (keys %$workflow)
{
# Hashes cannot have undef as a key, so we use 0. But the DB
# must store undef, for referential integrity.
my $old_id_for_db = $old || undef;
foreach my $new (keys %{$workflow->{$old}}) {
foreach my $new (keys %{$workflow->{$old}})
{
my $comment_required = $cgi->param("c_${old}_$new") ? 1 : 0;
next if ($workflow->{$old}->{$new} == $comment_required);
if ($old_id_for_db) {
next if $workflow->{$old}->{$new} == $comment_required;
if ($old_id_for_db)
{
$sth_update->execute($comment_required, $old_id_for_db, $new);
}
else {
else
{
$sth_updnul->execute($comment_required, $new);
}
}
@ -144,6 +159,8 @@ elsif ($action eq 'update_comment') {
delete_token($token);
load_template('comment', 'workflow_updated');
}
else {
else
{
ThrowCodeError("action_unrecognized", {action => $action});
}
exit;