File Coverage

blib/lib/Net/SecurityCenter/API/User.pm

Criterion	Covered	Total	%
statement	15	36	41.6
branch	0	12	0.0
condition			n/a
subroutine	5	7	71.4
pod	2	2	100.0
total	22	57	38.6

package Net::SecurityCenter::API::User;

use warnings;
use strict;

use Carp;

use parent 'Net::SecurityCenter::Base';

use Net::SecurityCenter::Utils qw(:all);

our $VERSION = '0.311';

my $common_template = {

    id => {
        required => 1,
        allow    => qr/^\d+$/,
        messages => {
            required => 'User ID is required',
            allow    => 'Invalid User ID',
        },
    },

    fields => {
        filter => \&sc_filter_array_to_string
    },

};

#-------------------------------------------------------------------------------
# METHODS
#-------------------------------------------------------------------------------

sub list {

    my ( $self, %args ) = @_;

    my $tmpl = {
        fields => $common_template->{'fields'},
        org_id => {
            allow => qr/^\d+$/,
        },
        raw => {},
    };

    my $params = sc_check_params( $tmpl, \%args );
    my $raw    = delete( $params->{'raw'} );

    my $response = $self->client->get( '/user', $params );

    return if ( !$response );

    if ($raw) {
        return wantarray ? @{$response} : $response;
    }

    return wantarray ? @{ sc_normalize_array($response) } : sc_normalize_array($response);

}

#-------------------------------------------------------------------------------

sub get {

    my ( $self, %args ) = @_;

    my $tmpl = {
        fields => $common_template->{'fields'},
        id     => $common_template->{'id'},
        raw    => {},
    };

    my $params  = sc_check_params( $tmpl, \%args );
    my $raw     = delete( $params->{'raw'} );
    my $user_id = delete( $params->{'id'} );

    my $response = $self->client->get( "/user/$user_id", $params );

    return if ( !$response );

    if ($raw) {
        return $response;
    }

    return sc_normalize_hash($response);

}

#-------------------------------------------------------------------------------

1;

__END__