sipwise
/
ngcp-panel
mirror of https://github.com/sipwise/ngcp-panel.git
1
0
Fork 0
Code Issues Releases Wiki Activity

use the message utility for all controllers

Browse Source
agranig/peering-route
Gerhard Jungwirth 13 years ago
parent 562a9ccce6
commit 4e49c963aa
9 changed files with 259 additions and 103 deletions
Show Stats Download Patch File Download Diff File

22
lib/NGCP/Panel/Controller/Administrator.pm
Unescape View File

@ -4,6 +4,7 @@ use namespace::sweep;
BEGIN { extends 'Catalyst::Controller'; }
use NGCP::Panel::Form::Administrator::Reseller;
use NGCP::Panel::Form::Administrator::Admin;
use NGCP::Panel::Utils::Message;
use NGCP::Panel::Utils::Navigation;
sub auto :Does(ACL) :ACLDetachTo('/denied_page') :AllowedRole(admin) :AllowedRole(reseller) {
@ -106,8 +107,11 @@ sub create :Chained('list_admin') :PathPart('create') :Args(0) {
delete $c->session->{created_objects}->{reseller};
$c->flash(messages => [{type => 'success', text => 'Administrator successfully created'}]);
} catch($e) {
$c->log->error("failed to create administrator: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create administrator'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create administrator.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/administrator'));
}
@ -180,8 +184,11 @@ sub edit :Chained('base') :PathPart('edit') :Args(0) {
delete $c->session->{created_objects}->{reseller};
$c->flash(messages => [{type => 'success', text => 'Administrator successfully updated'}]);
} catch($e) {
$c->log->error("failed to update administrator: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update administrator'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update administrator.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/administrator'));
}
@ -203,8 +210,11 @@ sub delete :Chained('base') :PathPart('delete') :Args(0) {
$c->stash->{administrator}->delete;
$c->flash(messages => [{type => 'success', text => 'Administrator successfully deleted'}]);
} catch($e) {
$c->log->error("failed to delete administrator: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to delete administrator'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete administrator.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/administrator'));
}

50
lib/NGCP/Panel/Controller/Billing.pm
Unescape View File

@ -13,6 +13,7 @@ use NGCP::Panel::Form::BillingZone;
use NGCP::Panel::Form::BillingPeaktimeWeekdays;
use NGCP::Panel::Form::BillingPeaktimeSpecial;
use NGCP::Panel::Form::BillingFeeUpload;
use NGCP::Panel::Utils::Message;
use NGCP::Panel::Utils::Navigation;
use NGCP::Panel::Utils::Datatables;
@ -128,8 +129,11 @@ sub edit :Chained('base') :PathPart('edit') {
$c->flash(messages => [{type => 'success', text => 'Billing profile successfully updated'}]);
} catch($e) {
$c->log->error("failed to update billing profile: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update billing profile'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update billing profile.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/billing'));
}
@ -182,8 +186,11 @@ sub create :Chained('profile_list') :PathPart('create') :Args(0) {
$c->flash(messages => [{type => 'success', text => 'Billing profile successfully created'}]);
} catch($e) {
$c->log->error("failed to create billing profile: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create billing profile'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create billing profile.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/billing'));
}
@ -421,8 +428,11 @@ sub zones_create :Chained('zones_list') :PathPart('create') :Args(0) {
$c->session->{created_objects}->{billing_zone} = { id => $zone->id };
$c->flash(messages => [{type => 'success', text => 'Billing Zone successfully created'}]);
} catch($e) {
$c->log->error("failed to create billing zone: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create billing zone'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create billing zone.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{zones_root_uri});
}
@ -458,8 +468,11 @@ sub zones_delete :Chained('zones_base') :PathPart('delete') :Args(0) {
$c->stash->{zone_result}->delete;
$c->flash(messages => [{type => 'success', text => 'Billing zone successfully deleted'}]);
} catch($e) {
$c->log->error("failed to delete billing zone: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to delete billing zone'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete billing zone.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{zones_root_uri});
}
@ -619,8 +632,11 @@ sub peaktime_specials_edit :Chained('peaktime_specials_base') :PathPart('edit')
$c->stash->{special_result}->update($form->values);
$c->flash(messages => [{type => 'success', text => 'Special offpeak entry successfully updated'}]);
} catch($e) {
$c->log->error("failed to update special peaktime: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update special offpeak entry'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update special offpeak entry.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{peaktimes_root_uri});
}
@ -635,8 +651,11 @@ sub peaktime_specials_delete :Chained('peaktime_specials_base') :PathPart('delet
$c->stash->{special_result}->delete;
$c->flash(messages => [{type => 'success', text => 'Special offpeak entry successfully deleted'}]);
} catch($e) {
$c->log->error("failed to delete special peaktime: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to delete special offpeak entry'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete special offpeak entry.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{peaktimes_root_uri});
}
@ -665,8 +684,11 @@ sub peaktime_specials_create :Chained('peaktimes_list') :PathPart('date/create')
->create($form->values);
$c->flash(messages => [{type => 'success', text => 'Special offpeak entry successfully created'}]);
} catch($e) {
$c->log->error("failed to create special offpeak entry: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create special offpeak entry'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create special offpeak entry.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{peaktimes_root_uri});
}

22
lib/NGCP/Panel/Controller/Contact.pm
Unescape View File

@ -5,6 +5,7 @@ BEGIN { extends 'Catalyst::Controller'; }
use NGCP::Panel::Form::Contact::Reseller;
use NGCP::Panel::Form::Contact::Admin;
use NGCP::Panel::Utils::Message;
use NGCP::Panel::Utils::Navigation;
sub auto :Does(ACL) :ACLDetachTo('/denied_page') :AllowedRole(admin) :AllowedRole(reseller) {
@ -79,8 +80,11 @@ sub create :Chained('list_contact') :PathPart('create') :Args(0) {
$c->session->{created_objects}->{contact} = { id => $contact->id };
$c->flash(messages => [{type => 'success', text => 'Contact successfully created'}]);
} catch($e) {
$c->log->error("failed to create contact: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create contact'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create contact.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/contact'));
}
@ -152,8 +156,11 @@ sub edit :Chained('base') :PathPart('edit') :Args(0) {
$c->flash(messages => [{type => 'success', text => 'Contact successfully changed'}]);
delete $c->session->{created_objects}->{reseller};
} catch($e) {
$c->log->error("failed to update contact: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update contact'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update contact.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/contact'));
}
@ -177,8 +184,11 @@ sub delete :Chained('base') :PathPart('delete') :Args(0) {
$c->stash->{contact}->delete;
$c->flash(messages => [{type => 'success', text => 'Contact successfully deleted'}]);
} catch($e) {
$c->log->error("failed to delete contact: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to delete contact'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete contact.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/contact'));
}

43
lib/NGCP/Panel/Controller/Contract.pm
Unescape View File

@ -3,6 +3,7 @@ use Sipwise::Base;
BEGIN { extends 'Catalyst::Controller'; }
use NGCP::Panel::Form::Contract;
use NGCP::Panel::Utils::Message;
use NGCP::Panel::Utils::Navigation;
use NGCP::Panel::Utils::Contract;
use NGCP::Panel::Utils::Subscriber;
@ -124,8 +125,11 @@ sub create :Chained('contract_list') :PathPart('create') :Args(0) {
$c->flash(messages => [{type => 'success', text => 'Contract successfully created!'}]);
});
} catch($e) {
$c->log->error("Failed to create contract: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create contract'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create contract.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/contract'));
}
@ -222,8 +226,11 @@ sub edit :Chained('base') :PathPart('edit') :Args(0) {
});
$c->flash(messages => [{type => 'success', text => 'Contract successfully changed!'}]);
} catch($e) {
$c->log->error("failed to update contract: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update contract'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update contract.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/contract'));
}
@ -253,8 +260,11 @@ sub terminate :Chained('base') :PathPart('terminate') :Args(0) {
}
$c->flash(messages => [{type => 'success', text => 'Contract successfully terminated'}]);
} catch ($e) {
$c->log->error("failed to terminate contract: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to terminate contract'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to terminate contract.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/contract'));
}
@ -339,8 +349,11 @@ sub peering_create :Chained('peering_list') :PathPart('create') :Args(0) {
$c->flash(messages => [{type => 'success', text => 'Contract successfully created'}]);
});
} catch($e) {
$c->log->error("Failed to create contract: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create contract'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create contract.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/contract'));
}
@ -419,8 +432,11 @@ sub customer_create :Chained('customer_list') :PathPart('create') :Args(0) {
$c->flash(messages => [{type => 'success', text => 'Contract successfully created'}]);
});
} catch($e) {
$c->log->error("Failed to create contract: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create contract'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create contract.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/contract'));
}
@ -501,8 +517,11 @@ sub reseller_create :Chained('reseller_list') :PathPart('create') :Args(0) {
$c->flash(messages => [{type => 'success', text => 'Contract successfully created'}]);
});
} catch($e) {
$c->log->error("Failed to create contract: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create contract'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create contract.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/contract'));
}

22
lib/NGCP/Panel/Controller/Customer.pm
Unescape View File

@ -7,6 +7,7 @@ use NGCP::Panel::Form::CustomerMonthlyFraud;
use NGCP::Panel::Form::CustomerDailyFraud;
use NGCP::Panel::Form::CustomerBalance;
use NGCP::Panel::Form::CustomerSubscriber;
use NGCP::Panel::Utils::Message;
use NGCP::Panel::Utils::Navigation;
use UUID qw/generate unparse/;
@ -98,8 +99,11 @@ sub base :Chained('list_customer') :PathPart('') :CaptureArgs(1) {
contract => $contract->first,
);
} catch($e) {
$c->log->error("Failed to create contract balance: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create contract balance!'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create contract balance.",
);
$c->response->redirect($c->uri_for());
return;
}
@ -265,8 +269,11 @@ sub subscriber_create :Chained('base') :PathPart('subscriber/create') :Args(0) {
$c->response->redirect($c->uri_for_action('/customer/details', [$contract->id]));
return;
} catch($e) {
$c->log->error("Failed to create subscriber: $e");
$c->flash(messages => [{type => 'error', text => 'Creating subscriber failed!'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create subscriber.",
);
$c->response->redirect($c->uri_for_action('/customer/details', [$contract->id]));
return;
}
@ -334,8 +341,11 @@ sub delete_fraud :Chained('base') :PathPart('fraud/delete') :Args(1) {
"fraud_".$type."_notify" => undef,
});
} catch($e) {
$c->log->error("Failed to clear fraud interval: $e");
$c->flash(messages => [{type => 'error', text => "Failed to clear fraud interval!"}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to clear fraud interval.",
);
$c->response->redirect($c->uri_for_action("/customer/details", [$c->stash->{contract}->id]));
return;
}

52
lib/NGCP/Panel/Controller/NCOS.pm
Unescape View File

@ -7,11 +7,10 @@ use NGCP::Panel::Form::NCOS::ResellerLevel;
use NGCP::Panel::Form::NCOS::AdminLevel;
use NGCP::Panel::Form::NCOS::Pattern;
use NGCP::Panel::Form::NCOS::LocalAC;
use NGCP::Panel::Utils::Message;
use NGCP::Panel::Utils::Navigation;
use NGCP::Panel::Utils::Datatables;
use HTML::FormHandler;
sub auto :Does(ACL) :ACLDetachTo('/denied_page') :AllowedRole(admin) :AllowedRole(reseller) {
my ($self, $c) = @_;
$c->log->debug(__PACKAGE__ . '::auto');
@ -113,8 +112,11 @@ sub edit :Chained('base') :PathPart('edit') {
delete $c->session->{created_objects}->{reseller};
$c->flash(messages => [{type => 'success', text => 'NCOS level successfully updated'}]);
} catch($e) {
$c->log->error("failed to update ncos level: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update NCOS level'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update NCOS level.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/ncos'));
}
@ -133,8 +135,11 @@ sub delete :Chained('base') :PathPart('delete') {
$c->stash->{level_result}->delete;
$c->flash(messages => [{type => 'success', text => 'NCOS level successfully deleted'}]);
} catch ($e) {
$c->flash(messages => [{type => 'error', text => 'Failed to delete NCOS level'}]);
$c->log->error("failed to delete ncos level: $e");
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete NCOS level.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for);
}
@ -174,8 +179,11 @@ sub create :Chained('levels_list') :PathPart('create') :Args(0) {
delete $c->session->{created_objects}->{reseller};
$c->flash(messages => [{type => 'success', text => 'NCOS level successfully created'}]);
} catch($e) {
$c->log->error("failed to create ncos level: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create NCOS level'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create NCOS level.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/ncos'));
}
@ -254,8 +262,11 @@ sub pattern_edit :Chained('pattern_base') :PathPart('edit') {
$c->stash->{pattern_result}->update($form->values);
$c->flash(messages => [{type => 'success', text => 'NCOS pattern successfully updated'}]);
} catch($e) {
$c->log->error("failed to update ncos pattern: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update NCOS pattern'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update NCOS pattern.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{pattern_base_uri});
}
@ -274,8 +285,11 @@ sub pattern_delete :Chained('pattern_base') :PathPart('delete') {
$c->stash->{pattern_result}->delete;
$c->flash(messages => [{type => 'success', text => 'NCOS pattern successfully deleted'}]);
} catch ($e) {
$c->log->error("failed to delete ncos pattern: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to delete NCOS pattern'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete NCOS pattern.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{pattern_base_uri});
}
@ -300,8 +314,11 @@ sub pattern_create :Chained('pattern_list') :PathPart('create') :Args(0) {
$c->stash->{pattern_rs}->create($form->values);
$c->flash(messages => [{type => 'success', text => 'NCOS pattern successfully created'}]);
} catch($e) {
$c->log->error("failed to create ncos pattern: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create NCOS pattern'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create NCOS pattern.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{pattern_base_uri});
}
@ -334,8 +351,11 @@ sub pattern_edit_local_ac :Chained('pattern_list') :PathPart('edit_local_ac') :A
$c->stash->{level_result}->update($form->values);
$c->flash(messages => [{type => 'success', text => 'Setting successfully updated'}]);
} catch($e) {
$c->log->error("failed to update ncos level setting: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update NCOS level setting'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update NCOS level setting.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{pattern_base_uri});
}

65
lib/NGCP/Panel/Controller/Peering.pm
Unescape View File

@ -4,11 +4,11 @@ use Sipwise::Base;
BEGIN { extends 'Catalyst::Controller'; }
use NGCP::Panel::Utils::Navigation;
use NGCP::Panel::Form::PeeringGroup;
use NGCP::Panel::Form::PeeringRule;
use NGCP::Panel::Form::PeeringServer;
use NGCP::Panel::Utils::XMLDispatcher;
use NGCP::Panel::Utils::Message;
use NGCP::Panel::Utils::Navigation;
use NGCP::Panel::Utils::Preferences;
@ -112,8 +112,11 @@ sub edit :Chained('base') :PathPart('edit') {
delete $c->session->{created_objects}->{contract};
$c->flash(messages => [{type => 'success', text => 'Peering group successfully updated'}]);
} catch ($e) {
$c->flash(messages => [{type => 'error', text => 'Failed to update peering group'}]);
$c->log->error("failed to update peering group: $e");
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update peering group.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for)
}
@ -130,8 +133,11 @@ sub delete :Chained('base') :PathPart('delete') {
$self->_sip_lcr_reload;
$c->flash(messages => [{type => 'success', text => 'Peering Group successfully deleted'}]);
} catch ($e) {
$c->flash(messages => [{type => 'error', text => 'Failed to delete peering group'}]);
$c->log->error("failed to delete peering group: $e");
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete peering group.",
);
};
$c->response->redirect($c->uri_for());
}
@ -162,8 +168,11 @@ sub create :Chained('group_list') :PathPart('create') :Args(0) {
delete $c->session->{created_objects}->{contract};
$c->flash(messages => [{type => 'success', text => 'Peering group successfully created'}]);
} catch ($e) {
$c->flash(rules_messages => [{type => 'error', text => 'Failed to create peering group'}]);
$c->log->error("failed to create peering group: $e");
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create peering group.",
);
};
$c->response->redirect($c->uri_for_action('/peering/root'));
return;
@ -212,8 +221,11 @@ sub servers_create :Chained('servers_list') :PathPart('create') :Args(0) {
$self->_sip_lcr_reload;
$c->flash(messages => [{type => 'success', text => 'Peering server successfully created'}]);
} catch($e) {
$c->log->error("failed to create peering server: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create peering server'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create peering server.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for_action('/peering/servers_root', [$c->req->captures->[0]]));
}
@ -268,8 +280,11 @@ sub servers_edit :Chained('servers_base') :PathPart('edit') :Args(0) {
$self->_sip_lcr_reload;
$c->flash(messages => [{type => 'success', text => 'Peering server successfully updated'}]);
} catch ($e) {
$c->log->error("failed to update peering server: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update peering server'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update peering server.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for_action('/peering/servers_root', [$c->req->captures->[0]]));
}
@ -289,8 +304,11 @@ sub servers_delete :Chained('servers_base') :PathPart('delete') :Args(0) {
$self->_sip_lcr_reload;
$c->flash(messages => [{type => 'success', text => 'Peering server successfully deleted'}]);
} catch ($e) {
$c->log->error("failed to delete peering server: $e");
$c->flash(rules_messages => [{type => 'error', text => 'Failed to delete peering server'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete peering server.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for_action('/peering/servers_root', [$c->req->captures->[0]]));
}
@ -414,8 +432,11 @@ sub rules_create :Chained('rules_list') :PathPart('create') :Args(0) {
$self->_sip_lcr_reload;
$c->flash(rules_messages => [{type => 'success', text => 'Peering rule successfully created'}]);
} catch ($e) {
$c->log->error("failed to create peering rule: $e");
$c->flash(rules_messages => [{type => 'error', text => 'Failed to create peering rule'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create peering rule.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for_action('/peering/servers_root', [$c->req->captures->[0]]));
}
@ -471,8 +492,11 @@ sub rules_edit :Chained('rules_base') :PathPart('edit') :Args(0) {
$self->_sip_lcr_reload;
$c->flash(rules_messages => [{type => 'success', text => 'Peering rule successfully changed'}]);
} catch ($e) {
$c->log->error("failed to update peering rule: $e");
$c->flash(rules_messages => [{type => 'error', text => 'Failed to update peering rule'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update peering rule.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for_action('/peering/servers_root', [$c->req->captures->[0]]));
}
@ -492,8 +516,11 @@ sub rules_delete :Chained('rules_base') :PathPart('delete') :Args(0) {
$self->_sip_lcr_reload;
$c->flash(rules_messages => [{type => 'success', text => 'Peering rule successfully deleted'}]);
} catch ($e) {
$c->log->error("failed to delete peering rule: $e");
$c->flash(rules_messages => [{type => 'error', text => 'Failed to delete peering rule'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete peering rule.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for_action('/peering/servers_root', [$c->req->captures->[0]]));
}

29
lib/NGCP/Panel/Controller/Reseller.pm
Unescape View File

@ -7,6 +7,7 @@ use HTTP::Status qw(HTTP_SEE_OTHER);
use NGCP::Panel::Form::Reseller;
use NGCP::Panel::Utils::Navigation;
use NGCP::Panel::Utils::Contract;
use NGCP::Panel::Utils::Message;
sub auto :Does(ACL) :ACLDetachTo('/denied_page') :AllowedRole(admin) {
my ($self, $c) = @_;
@ -88,8 +89,11 @@ sub create :Chained('list_reseller') :PathPart('create') :Args(0) {
$c->flash(messages => [{type => 'success', text => 'Reseller successfully created'}]);
} catch($e) {
$c->log->error($e);
$c->flash(messages => [{type => 'error', text => 'Failed to create reseller'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create reseller.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/reseller'));
}
@ -238,8 +242,11 @@ sub edit :Chained('base') :PathPart('edit') :Args(0) {
delete $c->session->{edit_contract_id};
$c->flash(messages => [{type => 'success', text => 'Reseller successfully updated'}]);
} catch($e) {
$c->log->error($e);
$c->flash(messages => [{type => 'error', text => 'Failed to update reseller'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update reseller.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/reseller'));
}
@ -272,8 +279,11 @@ sub terminate :Chained('base') :PathPart('terminate') :Args(0) {
});
$c->flash(messages => [{type => 'success', text => 'Successfully terminated reseller'}]);
} catch($e) {
$c->log->error("failed to terminate reseller: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to terminate reseller'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to terminate reseller.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/reseller'));
}
@ -389,8 +399,11 @@ sub create_defaults :Path('create_defaults') :Args(0) {
);
});
} catch($e) {
$c->log->error($e);
$c->flash(messages => [{type => 'error', text => 'Failed to create reseller'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create reseller.",
);
};
$c->flash(messages => [{type => 'success', text => "Reseller successfully created with login <b>".$defaults{admins}->{login}."</b> and password <b>".$defaults{admins}->{md5pass}."</b>, please review your settings below" }]);
$c->res->redirect($c->uri_for_action('/reseller/details', [$r{resellers}->id]));

57
lib/NGCP/Panel/Controller/Rewrite.pm
Unescape View File

@ -7,6 +7,7 @@ use NGCP::Panel::Form::RewriteRule::AdminSet;
use NGCP::Panel::Form::RewriteRule::ResellerSet;
use NGCP::Panel::Form::RewriteRule::CloneSet;
use NGCP::Panel::Form::RewriteRule::Rule;
use NGCP::Panel::Utils::Message;
use NGCP::Panel::Utils::XMLDispatcher;
use NGCP::Panel::Utils::Navigation;
@ -99,8 +100,11 @@ sub set_edit :Chained('set_base') :PathPart('edit') {
delete $c->session->{created_objects}->{reseller};
$c->flash(messages => [{type => 'success', text => 'Rewrite rule set successfully updated'}]);
} catch($e) {
$c->log->error("failed to update rewrite rule set: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update rewrite rule set'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update rewrite rule set.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/rewrite'));
}
@ -116,8 +120,11 @@ sub set_delete :Chained('set_base') :PathPart('delete') {
$c->stash->{set_result}->delete;
$c->flash(messages => [{type => 'success', text => 'Rewrite rule set successfully deleted'}]);
} catch($e) {
$c->log->error("failed to delete rewrite rule set: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to delete rewrite rule set'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete rewrite rule set.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/rewrite'));
}
@ -160,8 +167,11 @@ sub set_clone :Chained('set_base') :PathPart('clone') {
$c->flash(messages => [{type => 'success', text => 'Rewrite rule set successfully cloned'}]);
} catch($e) {
$c->log->error("failed to clone rewrite rule set: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to clone rewrite rule set'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to clone rewrite rule set.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/rewrite'));
}
@ -208,8 +218,11 @@ sub set_create :Chained('set_list') :PathPart('create') :Args(0) {
delete $c->session->{created_objects}->{reseller};
$c->flash(messages => [{type => 'success', text => 'Rewrite rule set successfully created'}]);
} catch($e) {
$c->log->error("failed to create rewrite rule set: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create rewrite rule set'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create rewrite rule set.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->uri_for('/rewrite'));
}
@ -263,8 +276,11 @@ sub rules_root :Chained('rules_list') :PathPart('') :Args(0) {
$elem->update;
}
} catch($e) {
$c->log->error("failed to move rewrite rule: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to move rewrite rule'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to move rewrite rule.",
);
}
}
@ -352,8 +368,11 @@ sub rules_edit :Chained('rules_base') :PathPart('edit') {
$self->_sip_dialplan_reload();
$c->flash(messages => [{type => 'success', text => 'Rewrite rule successfully updated'}]);
} catch($e) {
$c->log->error("failed to update rewrite rule: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to update rewrite rule'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to update rewrite rule.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{rules_uri});
}
@ -370,8 +389,11 @@ sub rules_delete :Chained('rules_base') :PathPart('delete') {
$self->_sip_dialplan_reload();
$c->flash(messages => [{type => 'success', text => 'Rewrite rule successfully deleted'}]);
} catch($e) {
$c->log->error("failed to delete rewrite rule: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to delete rewrite rule'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to delete rewrite rule.",
);
};
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{rules_uri});
}
@ -399,8 +421,11 @@ sub rules_create :Chained('rules_list') :PathPart('create') :Args(0) {
$self->_sip_dialplan_reload();
$c->flash(messages => [{type => 'success', text => 'Rewrite rule successfully created'}]);
} catch($e) {
$c->log->error("failed to create rewrite rule: $e");
$c->flash(messages => [{type => 'error', text => 'Failed to create rewrite rule'}]);
NGCP::Panel::Utils::Message->error(
c => $c,
error => $e,
desc => "Failed to create rewrite rule.",
);
}
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{rules_uri});
}

Write Preview
Loading…
Cancel
Save