* also the create link in datatables is now based on helper.base_uri * also the peering controller checks exceptions on every db updateagranig/1_0_subfix
Gerhard Jungwirth
13 years ago
parent
b5449a575e
commit
08d2105b56
@ -0,0 +1,74 @@
|
||||
package NGCP::Panel::Form::PeeringRule;
|
||||
|
||||
use HTML::FormHandler::Moose;
|
||||
use Moose;
|
||||
extends 'HTML::FormHandler';
|
||||
use Moose::Util::TypeConstraints;
|
||||
|
||||
use HTML::FormHandler::Widget::Block::Bootstrap;
|
||||
|
||||
has '+widget_wrapper' => ( default => 'Bootstrap' );
|
||||
sub build_render_list {[qw/fields actions/]}
|
||||
sub build_form_element_class { [qw/form-horizontal/] }
|
||||
|
||||
has_field 'callee_prefix' => (
|
||||
type => 'Text',
|
||||
);
|
||||
|
||||
has_field 'callee_pattern' => (
|
||||
type => 'Text',
|
||||
);
|
||||
|
||||
has_field 'caller_pattern' => (
|
||||
type => 'Text',
|
||||
);
|
||||
|
||||
has_field 'description' => (
|
||||
type => 'Text',
|
||||
);
|
||||
|
||||
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/ callee_prefix callee_pattern caller_pattern description /],
|
||||
);
|
||||
|
||||
has_block 'actions' => (
|
||||
tag => 'div',
|
||||
class => [qw/modal-footer/],
|
||||
render_list => [qw/save/],
|
||||
);
|
||||
|
||||
1;
|
||||
|
||||
__END__
|
||||
|
||||
=head1 NAME
|
||||
|
||||
NGCP::Panel::Form::PeeringRule
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
-
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Gerhard Jungwirth
|
||||
|
||||
=head1 LICENSE
|
||||
|
||||
This library is free software. You can redistribute it and/or modify
|
||||
it under the same terms as Perl itself.
|
||||
|
||||
=cut
|
||||
|
||||
# vim: set tabstop=4 expandtab:
|
||||
@ -0,0 +1,95 @@
|
||||
package NGCP::Panel::Form::PeeringServer;
|
||||
|
||||
use HTML::FormHandler::Moose;
|
||||
use Moose;
|
||||
extends 'HTML::FormHandler';
|
||||
use Moose::Util::TypeConstraints;
|
||||
|
||||
use HTML::FormHandler::Widget::Block::Bootstrap;
|
||||
|
||||
has '+widget_wrapper' => ( default => 'Bootstrap' );
|
||||
sub build_render_list {[qw/fields actions/]}
|
||||
sub build_form_element_class { [qw/form-horizontal/] }
|
||||
|
||||
has_field 'name' => (
|
||||
type => 'Text',
|
||||
required => 1,
|
||||
);
|
||||
|
||||
has_field 'ip' => (
|
||||
type => 'Text', #IP Address
|
||||
required => 1,
|
||||
label => 'IP Address',
|
||||
);
|
||||
|
||||
has_field 'host' => (
|
||||
type => 'Text',
|
||||
label => 'Hostname',
|
||||
);
|
||||
|
||||
has_field 'port' => (
|
||||
type => 'PosInteger',
|
||||
max_range => 65535,
|
||||
default => '5060',
|
||||
);
|
||||
|
||||
has_field 'transport' => (
|
||||
type => 'Select',
|
||||
label => 'Protocol',
|
||||
options => [
|
||||
{ value => '1', label => 'UDP' },
|
||||
{ value => '2', label => 'TCP' },
|
||||
{ value => '3', label => 'TLS' },
|
||||
],
|
||||
);
|
||||
|
||||
has_field 'weight' => (
|
||||
type => 'PosInteger',
|
||||
max_range => 25,
|
||||
);
|
||||
|
||||
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/ name ip host port transport weight /],
|
||||
);
|
||||
|
||||
has_block 'actions' => (
|
||||
tag => 'div',
|
||||
class => [qw/modal-footer/],
|
||||
render_list => [qw/save/],
|
||||
);
|
||||
|
||||
1;
|
||||
|
||||
__END__
|
||||
|
||||
=head1 NAME
|
||||
|
||||
NGCP::Panel::Form::PeeringServer
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
-
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Gerhard Jungwirth
|
||||
|
||||
=head1 LICENSE
|
||||
|
||||
This library is free software. You can redistribute it and/or modify
|
||||
it under the same terms as Perl itself.
|
||||
|
||||
=cut
|
||||
|
||||
# vim: set tabstop=4 expandtab:
|
||||
@ -0,0 +1,43 @@
|
||||
[% site_config.title = 'SIP Peering Group ' _ group.name -%]
|
||||
[%
|
||||
helper.name = 'Peering Servers';
|
||||
helper.messages = messages;
|
||||
helper.column_titles = [ '#', 'Name', 'IP Address', 'Hostname', 'Port', 'Protocol', 'Weight' ];
|
||||
helper.column_fields = [ 'id', 'name', 'ip', 'host', 'port', 'transport', 'weight' ];
|
||||
|
||||
helper.close_target = close_target;
|
||||
helper.create_flag = servers_create_flag;
|
||||
helper.edit_flag = servers_edit_flag;
|
||||
helper.form_object = servers_form;
|
||||
helper.has_edit = 1;
|
||||
helper.has_delete = 1;
|
||||
helper.ajax_uri = c.uri_for_action( "/peering/servers_ajax", [c.req.captures.0] );
|
||||
helper.base_uri = c.uri_for_action( "/peering/servers_root", [c.req.captures.0] );
|
||||
|
||||
helper.extra_buttons = [
|
||||
[ 'Preferences', 'preferences'],
|
||||
];
|
||||
|
||||
PROCESS 'helpers/datatables.tt';
|
||||
-%]
|
||||
|
||||
[%
|
||||
helper.name = 'Peering Rules';
|
||||
helper.messages = rules_messages;
|
||||
helper.column_titles = [ '#', 'Callee Prefix', 'Callee Pattern', 'Caller Pattern', 'Description' ];
|
||||
helper.column_fields = [ 'id', 'callee_prefix', 'callee_pattern', 'caller_pattern', 'description' ];
|
||||
|
||||
helper.close_target = close_target;
|
||||
helper.create_flag = rules_create_flag;
|
||||
helper.edit_flag = rules_edit_flag;
|
||||
helper.form_object = rules_form;
|
||||
helper.has_edit = 1;
|
||||
helper.has_delete = 1;
|
||||
helper.ajax_uri = c.uri_for_action( "/peering/rules_ajax", [c.req.captures.0] );
|
||||
helper.base_uri = c.uri_for( group.id, "rules" );
|
||||
|
||||
helper.extra_buttons = undef;
|
||||
|
||||
PROCESS 'helpers/datatables.tt';
|
||||
-%]
|
||||
[% # vim: set tabstop=4 syntax=html expandtab: -%]
|
||||
Loading…
Reference in new issue