# 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::BzAPI::Resources::Bugzilla;

use 5.10.1;
use strict;

use Bugzilla;
use Bugzilla::Constants;
use Bugzilla::Error;
use Bugzilla::Keyword;
use Bugzilla::Product;
use Bugzilla::Status;
use Bugzilla::Field;
use Bugzilla::Util qw(correct_urlbase);

use Bugzilla::Extension::BzAPI::Constants;

use Digest::MD5 qw(md5_base64);

#########################
# REST Resource Methods #
#########################

BEGIN {
    require Bugzilla::WebService::Bugzilla;
    *Bugzilla::WebService::Bugzilla::get_configuration = \&get_configuration;
    *Bugzilla::WebService::Bugzilla::get_empty = \&get_empty;
}

sub rest_handlers {
    my $rest_handlers = [
        qr{^/$}, {
            GET => {
                resource => {
                    method => 'get_empty'
                }
            }
        },
        qr{^/configuration$}, {
            GET  => {
                resource => {
                    method => 'get_configuration'
                }
            }
        }
    ];
    return $rest_handlers;
}

sub get_configuration {
    my ($self) = @_;
    my $user   = Bugzilla->user;
    my $params = Bugzilla->input_params;

    # Get data from the shadow DB as they don't change very often.
    Bugzilla->switch_to_shadow_db;

    # Pass a bunch of Bugzilla configuration to the templates.
    my $vars = {};
    $vars->{'priority'}   = get_legal_field_values('priority');
    $vars->{'severity'}   = get_legal_field_values('bug_severity');
    $vars->{'platform'}   = get_legal_field_values('rep_platform');
    $vars->{'op_sys'}     = get_legal_field_values('op_sys');
    $vars->{'keyword'}    = [ map($_->name, Bugzilla::Keyword->get_all) ];
    $vars->{'resolution'} = get_legal_field_values('resolution');
    $vars->{'status'}     = get_legal_field_values('bug_status');
    $vars->{'custom_fields'} =
        [ grep {$_->is_select} Bugzilla->active_custom_fields ];

    # Include a list of product objects.
    if ($params->{'product'}) {
        my @products = $params->{'product'};
        foreach my $product_name (@products) {
            my $product = new Bugzilla::Product({ name => $product_name });
            if ($product && $user->can_see_product($product->name)) {
                push (@{$vars->{'products'}}, $product);
            }
        }
    } else {
        $vars->{'products'} = $user->get_selectable_products;
    }

    # We set the 2nd argument to 1 to also preload flag types.
    Bugzilla::Product::preload($vars->{'products'}, 1, { is_active => 1 });

    # Allow consumers to specify whether or not they want flag data.
    if (defined $params->{'flags'}) {
        $vars->{'show_flags'} = $params->{'flags'};
    }
    else {
        # We default to sending flag data.
        $vars->{'show_flags'} = 1;
    }

    # Create separate lists of open versus resolved statuses.  This should really
    # be made part of the configuration.
    my @open_status;
    my @closed_status;
    foreach my $status (@{$vars->{'status'}}) {
        is_open_state($status) ? push(@open_status, $status)
                               : push(@closed_status, $status);
    }
    $vars->{'open_status'} = \@open_status;
    $vars->{'closed_status'} = \@closed_status;

    # Generate a list of fields that can be queried.
    my @fields = @{Bugzilla::Field->match({obsolete => 0})};
    # Exclude fields the user cannot query.
    if (!Bugzilla->user->is_timetracker) {
        @fields = grep { $_->name !~ /^(estimated_time|remaining_time|work_time|percentage_complete|deadline)$/ } @fields;
    }
    $vars->{'field'} = \@fields;

    my $json;
    Bugzilla->template->process('config.json.tmpl', $vars, \$json);
    my $result = {};
    if ($json) {
        $result = $self->json->decode($json);
    }
    return $result;
}

sub get_empty {
    my ($self) = @_;
    return {
        urlbase       => $self->type('string', correct_urlbase() . "bzapi/"),
        documentation => $self->type('string', BZAPI_DOC),
        version       => $self->type('string', BUGZILLA_VERSION)
    };
}

1;