# 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::Test::Util;

use 5.10.1;
use strict;
use warnings;

use base qw(Exporter);
our @EXPORT = qw(create_user issue_api_key mock_useragent_tx);

use Bugzilla::User;
use Bugzilla::User::APIKey;
use Mojo::Message::Response;
use Test2::Tools::Mock qw(mock);

sub create_user {
    my ($login, $password, %extra) = @_;
    require Bugzilla;
    return Bugzilla::User->create({
        login_name    => $login,
        cryptpassword => $password,
        disabledtext  => "",
        disable_mail  => 0,
        extern_id     => undef,
        %extra,
    });
}

sub issue_api_key {
    my ($login, $given_api_key) = @_;
    my $user = Bugzilla::User->check({ name => $login });

    my $params = {
        user_id     => $user->id,
        description => 'Bugzilla::Test::Util::issue_api_key',
        api_key     => $given_api_key,
    };

    if ($given_api_key) {
        return Bugzilla::User::APIKey->create_special($params);
    } else {
        return Bugzilla::User::APIKey->create($params);
    }
}

sub _json_content_type { $_->headers->content_type('application/json') }

sub mock_useragent_tx {
    my ($body, $modify) = @_;
    $modify //= \&_json_content_type;

    my $res = Mojo::Message::Response->new;
    $res->code(200);
    $res->body($body);
    if ($modify) {
        local $_ = $res;
        $modify->($res);
    }

    return mock({result => $res});
}

1;