mirror of
https://github.com/mozilla/gecko-dev.git
synced 2024-11-27 14:52:16 +00:00
122 lines
4.1 KiB
Perl
Executable File
122 lines
4.1 KiB
Perl
Executable File
#!/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
|
|
# the License at http://www.mozilla.org/MPL/
|
|
#
|
|
# Software distributed under the License is distributed on an "AS
|
|
# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
|
|
# implied. See the License for the specific language governing
|
|
# rights and limitations under the License.
|
|
#
|
|
# The Original Code is the Bugzilla Bug Tracking System.
|
|
#
|
|
# Contributor(s): Frédéric Buclin <LpSolit@gmail.com>
|
|
|
|
use strict;
|
|
use lib ".";
|
|
|
|
use Bugzilla;
|
|
use Bugzilla::Constants;
|
|
use Bugzilla::Error;
|
|
use Bugzilla::Util;
|
|
use Bugzilla::Field;
|
|
|
|
my $cgi = Bugzilla->cgi;
|
|
my $template = Bugzilla->template;
|
|
my $vars = {};
|
|
|
|
# Make sure the user is logged in and is an administrator.
|
|
my $user = Bugzilla->login(LOGIN_REQUIRED);
|
|
$user->in_group('admin')
|
|
|| ThrowUserError('auth_failure', {group => 'admin',
|
|
action => 'edit',
|
|
object => 'custom_fields'});
|
|
|
|
my $action = trim($cgi->param('action') || '');
|
|
|
|
print $cgi->header();
|
|
|
|
# List all existing custom fields if no action is given.
|
|
if (!$action) {
|
|
$vars->{'custom_fields'} = [Bugzilla->get_fields({'custom' => 1})];
|
|
|
|
$template->process('admin/custom_fields/list.html.tmpl', $vars)
|
|
|| ThrowTemplateError($template->error());
|
|
}
|
|
# Interface to add a new custom field.
|
|
elsif ($action eq 'add') {
|
|
$template->process('admin/custom_fields/create.html.tmpl')
|
|
|| ThrowTemplateError($template->error());
|
|
}
|
|
elsif ($action eq 'new') {
|
|
my $name = clean_text($cgi->param('name') || '');
|
|
my $desc = clean_text($cgi->param('desc') || '');
|
|
# For now, there is only one type available for custom fields.
|
|
# In the future, we will have to look at $cgi->param('type').
|
|
my $type = FIELD_TYPE_FREETEXT;
|
|
my $sortkey = $cgi->param('sortkey') || 0;
|
|
|
|
# Validate these fields.
|
|
$name || ThrowUserError('customfield_missing_name');
|
|
# Prepend cf_ to the custom field name to distinguish it from standard fields.
|
|
if ($name !~ /^cf_/) {
|
|
$name = 'cf_' . $name;
|
|
}
|
|
my $field = new Bugzilla::Field({'name' => $name});
|
|
ThrowUserError('customfield_already_exists', {'field' => $field }) if $field;
|
|
|
|
$desc || ThrowUserError('customfield_missing_description', {'name' => $name});
|
|
|
|
my $skey = $sortkey;
|
|
detaint_natural($sortkey)
|
|
|| ThrowUserError('customfield_invalid_sortkey', {'name' => $name,
|
|
'sortkey' => $skey});
|
|
|
|
# All fields have been validated. We can create this new custom field.
|
|
trick_taint($name);
|
|
trick_taint($desc);
|
|
|
|
$vars->{'name'} = $name;
|
|
$vars->{'desc'} = $desc;
|
|
$vars->{'sortkey'} = $sortkey;
|
|
$vars->{'type'} = $type;
|
|
$vars->{'custom'} = 1;
|
|
$vars->{'in_new_bugmail'} = $cgi->param('new_bugmail') ? 1 : 0;
|
|
$vars->{'editable_on_enter_bug'} = $cgi->param('enter_bug') ? 1 : 0;
|
|
$vars->{'is_obsolete'} = $cgi->param('obsolete') ? 1 : 0;
|
|
|
|
Bugzilla::Field::create_or_update($vars);
|
|
|
|
$vars->{'custom_fields'} = [Bugzilla->get_fields({'custom' => 1})];
|
|
$vars->{'message'} = 'custom_field_created';
|
|
|
|
$template->process('admin/custom_fields/list.html.tmpl', $vars)
|
|
|| ThrowTemplateError($template->error());
|
|
}
|
|
elsif ($action eq 'edit') {
|
|
my $name = $cgi->param('name') || ThrowUserError('customfield_missing_name');
|
|
trick_taint($name);
|
|
my @field = Bugzilla->get_fields({'name' => $name, 'custom' => 1});
|
|
scalar(@field) || ThrowUserError('customfield_nonexistent', {'name' => $name});
|
|
|
|
$vars->{'field'} = $field[0];
|
|
|
|
$template->process('admin/custom_fields/edit.html.tmpl', $vars)
|
|
|| ThrowTemplateError($template->error());
|
|
}
|
|
elsif ($action eq 'update') {
|
|
die "not yet implemented...\n";
|
|
}
|
|
elsif ($action eq 'del') {
|
|
die "not yet implemented...\n";
|
|
}
|
|
elsif ($action eq 'delete') {
|
|
die "not yet implemented...\n";
|
|
}
|
|
else {
|
|
ThrowUserError('no_valid_action', {'field' => 'custom_field'});
|
|
}
|