ngcp-panel/lib/NGCP/Panel/Form/Peering/InboundRule.pm

package NGCP::Panel::Form::Peering::InboundRule;
use Sipwise::Base;
use HTML::FormHandler::Moose;
extends 'HTML::FormHandler';

use HTML::FormHandler::Widget::Block::Bootstrap;

has '+widget_wrapper' => ( default => 'Bootstrap' );
has_field 'submitid' => ( type => 'Hidden' );
sub build_render_list {[qw/submitid fields actions/]}
sub build_form_element_class {[qw(form-horizontal)]}

has_field 'field' => ( 
    type => 'Select',
    label => 'Match Field',
    options => [
        { value => 'from_user', label => 'From-User' },
        { value => 'from_domain', label => 'From-Domain' },
        { value => 'from_uri', label => 'From-URI' },
        { value => 'to_user', label => 'To-User' },
        { value => 'to_domain', label => 'To-Domain' },
        { value => 'to_uri', label => 'To-URI' },
        { value => 'ruri_user', label => 'RURI-User' },
        { value => 'ruri_domain', label => 'RURI-Domain' },
        { value => 'ruri_uri', label => 'RURI-URI' },
        { value => 'pai_user', label => 'PAI-User' },
        { value => 'pai_domain', label => 'PAI-Domain' },
        { value => 'pai_uri', label => 'PAI-URI' },
    ],
    element_attr => {
        rel => ['tooltip'],
        title => ['The field of the inbound SIP message to match the pattern against']
    },
);

has_field 'pattern' => (
    type => '+NGCP::Panel::Field::Regexp',
    max_length => 1023,
    element_attr => {
        rel => ['tooltip'],
        title => [q!A POSIX regex matching against the specified field (e.g. '^sip:.+@example\.org$' or '^sip:431') when matching against a full URI!]
    },
);

has_field 'reject_code' => (
    type => 'PosInteger',
    not_nullable => 0,
    range_start => 400,
    range_end => 699,
    element_attr => {
        rel => ['tooltip'],
        title => ['If specified, the call is rejected if the source IP of the request is found in a peering server of the group, but the given pattern does not match; Range of 400-699']
    },
);

has_field 'reject_reason' => (
    type => 'Text',
    not_nullable => 0,
    max_length => 64,
    element_attr => {
        rel => ['tooltip'],
        title => ['If reject code is specified and the call is rejected, the reason in the response is taken from this value']
    },
);

has_field 'enabled' => (
    type => 'Boolean',
    label => 'Enabled',
    default => 1,
    element_attr => {
        rel => ['tooltip'],
        title => ['Rule enabled state.'],
    },
);

has_field 'save' => (
    type => 'Submit',
    value => 'Save',
    element_class => [qw/btn btn-primary/],
    label => '',
);

has_block 'fields' => (
    tag => 'div',
    class => [qw/modal-body/],
    render_list => [qw/field pattern reject_code reject_reason enabled/],
);

has_block 'actions' => (
    tag => 'div',
    class => [qw/modal-footer/],
    render_list => [qw/save/],
);

sub validate {
    my ($self) = @_;
    my $c = $self->ctx;

    my $reason = $self->field('reject_reason');
    my $code = $self->field('reject_code');

    if(defined $code->value && !defined $reason->value) {
        return $reason->add_error($c->loc('reject reason must be filled if reject code is filled'));
    } elsif(defined $reason->value && !defined $code->value) {
        return $code->add_error($c->loc('reject code must be filled if reject reason is filled'));
    }

    return;
}

1;