package NGCP::Panel::Form::Subscriber; use HTML::FormHandler::Moose; extends 'HTML::FormHandler'; use Moose::Util::TypeConstraints; use HTML::FormHandler::Widget::Block::Bootstrap; use NGCP::Panel::Field::Domain; use NGCP::Panel::Field::CustomerContract; use NGCP::Panel::Field::PosInteger; use NGCP::Panel::Field::Identifier; 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 'contract' => ( type => '+NGCP::Panel::Field::CustomerContract', label => 'Customer', not_nullable => 1, ); has_field 'webusername' => ( type => 'Text', label => 'Web Username', required => 0, element_attr => { rel => ['tooltip'], title => ['The username to log into the CSC Panel'] }, ); has_field 'webpassword' => ( type => 'Text', label => 'Web Password', required => 0, minlength => 6, element_attr => { rel => ['tooltip'], title => ['The password to log into the CSC Panel'] }, ); has_field 'e164' => ( type => 'Compound', order => 99, required => 0, label => 'E164 Number', do_label => 1, do_wrapper => 1, ); has_field 'e164.cc' => ( type => '+NGCP::Panel::Field::PosInteger', element_attr => { class => ['ngcp_e164_cc'], rel => ['tooltip'], title => ['Country Code, e.g. 1 for US or 43 for Austria'] }, do_label => 0, do_wrapper => 0, ); has_field 'e164.ac' => ( type => '+NGCP::Panel::Field::PosInteger', element_attr => { class => ['ngcp_e164_ac'], rel => ['tooltip'], title => ['Area Code, e.g. 212 for NYC or 1 for Vienna'] }, do_label => 0, do_wrapper => 0, ); has_field 'e164.sn' => ( type => '+NGCP::Panel::Field::PosInteger', element_attr => { class => ['ngcp_e164_sn'], rel => ['tooltip'], title => ['Subscriber Number, e.g. 12345678'] }, do_label => 0, do_wrapper => 0, ); has_field 'username' => ( type => '+NGCP::Panel::Field::Identifier', label => 'SIP Username', required => 1, noupdate => 1, element_attr => { rel => ['tooltip'], title => ['The SIP username for the User-Agents'] }, ); has_field 'domain' => ( type => '+NGCP::Panel::Field::Domain', label => 'SIP Domain', not_nullable => 1, ); has_field 'password' => ( type => 'Text', label => 'SIP Password', required => 1, minlength => 6, element_attr => { rel => ['tooltip'], title => ['The SIP password for the User-Agents'] }, ); has_field 'status' => ( type => '+NGCP::Panel::Field::SubscriberStatusSelect', label => 'Status', not_nullable => 1, ); has_field 'administrative' => ( type => 'Boolean', label => 'Administrative', required => 0, element_attr => { rel => ['tooltip'], title => ['Subscriber can configure other subscribers within the Customer Account'] }, ); has_field 'external_id' => ( type => 'Text', label => 'External ID', required => 0, element_attr => { rel => ['tooltip'], title => ['An external id, e.g. provided by a 3rd party provisioning'] }, ); 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/contract domain e164 webusername webpassword username password status external_id administrative/ ], ); has_block 'actions' => ( tag => 'div', class => [qw/modal-footer/], render_list => [qw/save/], ); sub validate { my $self = shift; my $cc = $self->field('e164.cc')->value; my $sn = $self->field('e164.sn')->value; my %sub_errors = map {$_, 1} ( @{ $self->field('e164.cc')->errors }, @{ $self->field('e164.ac')->errors }, @{ $self->field('e164.sn')->errors } ); for my $sub_error( keys %sub_errors ) { $self->field('e164')->add_error($sub_error); } $self->field('e164.cc')->clear_errors; $self->field('e164.ac')->clear_errors; $self->field('e164.sn')->clear_errors; if ($self->field('e164')->has_errors) { #dont add more errors } elsif (defined $cc && $cc ne '' && (!defined $sn || $sn eq '')) { my $err_msg = 'Subscriber Number required if Country Code is set'; $self->field('e164')->add_error($err_msg); } elsif(defined $sn && $sn ne '' && (!defined $cc || $cc eq '')) { my $err_msg = 'Country Code required if Subscriber Number is set'; $self->field('e164')->add_error($err_msg); } return; } 1; # vim: set tabstop=4 expandtab: