ngcp-panel/lib/NGCP/Panel/Role/API/BannedIps.pm

package NGCP::Panel::Role::API::BannedIps;

use Sipwise::Base;


use parent qw/NGCP::Panel::Role::API/;

use NGCP::Panel::Utils::Generic qw(:all);
use boolean qw(true);
use HTTP::Status qw(:constants);

sub item_name {
    return 'bannedips';
}

sub resource_name{
    return 'bannedips';
}

sub get_item_id{
    my($self, $c, $item, $resource, $form) = @_;
    return $item->{ip};
}

sub valid_id {
    my ($self, $c, $id) = @_;
    return 1 if $id=~/^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}(?:\/\d{1,2})?$/;
    $self->error($c, HTTP_BAD_REQUEST, "Invalid id in request URI. Should be an ip address.");
    return;
}
sub item_by_id{
    my ($self, $c, $id) = @_;
    my $list = NGCP::Panel::Utils::Security::list_banned_ips($c, id => $id );
    return ref $list eq 'ARRAY' ? $list->[0] : undef ;
}
1;
# vim: set tabstop=4 expandtab: