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

TT#13973 fix http method override

Browse Source 
the factory Catalyst::ActionRole::HTTPMethods action role
is set for any action, and in race with our own
NGCP::Panel::Role::HTTPMethods. the testcase could have
been misleading ever since, as it uses DELETE /api/customers,
which was present when implemting the method override initially,
but dropped on the road to 4.5.

the issue is resolved by overriding
Catalyst::Controller::gather_default_action_roles.
until the class hierachy refactoring is completed, only
consistent way is to add the override to each api controller.
the action_roles config attribute can therefore be
removed.

using Plack::Middleware::MethodOverride as an alternative from
upstream has the drawback to work only with POST. but a required
usecase is to also support translation DELETE requests to PATCH.

Change-Id: I204ba59869a8327bdd5db8a867fbbb061d1c9e7c
changes/70/12470/5
Rene Krenn 9 years ago
parent c9799c6e26
commit 72d9c10650
186 changed files with 1139 additions and 208 deletions
Show Stats Download Patch File Download Diff File

7
lib/NGCP/Panel/Controller/API/Admins.pm
Unescape View File

@ -75,9 +75,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/ApplyRewrites.pm
Unescape View File

@ -53,9 +53,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/AutoAttendants.pm
Unescape View File

@ -56,9 +56,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/AutoAttendantsItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/BalanceIntervals.pm
Unescape View File

@ -99,9 +99,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/BalanceIntervalsItem.pm
Unescape View File

@ -97,9 +97,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)]
},
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/BillingFees.pm
Unescape View File

@ -64,9 +64,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/BillingFeesItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/BillingNetworks.pm
Unescape View File

@ -89,9 +89,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/BillingNetworksItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/BillingProfiles.pm
Unescape View File

@ -76,9 +76,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/BillingProfilesItem.pm
Unescape View File

@ -51,9 +51,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/BillingZones.pm
Unescape View File

@ -74,9 +74,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/BillingZonesItem.pm
Unescape View File

@ -51,9 +51,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CCMapEntries.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CCMapEntriesItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CFDestinationSets.pm
Unescape View File

@ -77,9 +77,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CFDestinationSetsItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CFMappings.pm
Unescape View File

@ -68,9 +68,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CFMappingsItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CFSourceSets.pm
Unescape View File

@ -84,9 +84,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CFSourceSetsItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CFTimeSets.pm
Unescape View File

@ -77,9 +77,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CFTimeSetsItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CallControls.pm
Unescape View File

@ -56,9 +56,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CallForwards.pm
Unescape View File

@ -72,9 +72,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CallForwardsItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CallLists.pm
Unescape View File

@ -248,9 +248,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CallListsItem.pm
Unescape View File

@ -42,9 +42,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/Calls.pm
Unescape View File

@ -88,9 +88,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CallsItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/Contracts.pm
Unescape View File

@ -87,9 +87,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/ContractsItem.pm
Unescape View File

@ -55,9 +55,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerBalances.pm
Unescape View File

@ -115,9 +115,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerBalancesItem.pm
Unescape View File

@ -51,9 +51,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerContacts.pm
Unescape View File

@ -75,9 +75,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerContactsItem.pm
Unescape View File

@ -52,9 +52,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerFraudEvents.pm
Unescape View File

@ -66,9 +66,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerFraudEventsItem.pm
Unescape View File

@ -48,9 +48,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }),
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerFraudPreferences.pm
Unescape View File

@ -90,9 +90,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerFraudPreferencesItem.pm
Unescape View File

@ -50,9 +50,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerLocations.pm
Unescape View File

@ -77,9 +77,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerLocationsItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerPreferenceDefs.pm
Unescape View File

@ -46,9 +46,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerPreferences.pm
Unescape View File

@ -66,9 +66,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerPreferencesItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerZoneCosts.pm
Unescape View File

@ -73,9 +73,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/CustomerZoneCostsItem.pm
Unescape View File

@ -44,9 +44,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

9
lib/NGCP/Panel/Controller/API/Customers.pm
Unescape View File

@ -159,9 +159,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;
@ -307,7 +312,7 @@ sub POST :Allow {
$self->error($c, HTTP_UNPROCESSABLE_ENTITY, "The contact_id is not a valid ngcp:customercontacts item, but an ngcp:systemcontacts item");
last;
}
#todo: strange: why do we check this after customer creation?
#todo: strange: why do we check this after customer creation?
my $tmplfields = $self->get_template_fields_spec();
foreach my $field (keys %$tmplfields){
my $field_table_rel = $tmplfields->{$field}->[1];

7
lib/NGCP/Panel/Controller/API/CustomersItem.pm
Unescape View File

@ -55,9 +55,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/DomainPreferenceDefs.pm
Unescape View File

@ -46,9 +46,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/DomainPreferences.pm
Unescape View File

@ -57,9 +57,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/DomainPreferencesItem.pm
Unescape View File

@ -44,9 +44,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/Domains.pm
Unescape View File

@ -77,9 +77,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/DomainsItem.pm
Unescape View File

@ -54,9 +54,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/EmailTemplates.pm
Unescape View File

@ -75,9 +75,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/EmailTemplatesItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/EmergencyMappingContainers.pm
Unescape View File

@ -74,9 +74,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/EmergencyMappingContainersItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/EmergencyMappings.pm
Unescape View File

@ -93,9 +93,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/EmergencyMappingsItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/Events.pm
Unescape View File

@ -110,9 +110,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/EventsItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/FaxRecordings.pm
Unescape View File

@ -48,9 +48,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/FaxRecordingsItem.pm
Unescape View File

@ -44,9 +44,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/Faxes.pm
Unescape View File

@ -116,9 +116,14 @@ __PACKAGE__->config(
('POST' eq $_) ? (ContentType => ['multipart/form-data']) : (),
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/FaxesItem.pm
Unescape View File

@ -42,9 +42,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/FaxserverSettings.pm
Unescape View File

@ -86,9 +86,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/FaxserverSettingsItem.pm
Unescape View File

@ -55,9 +55,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/Interceptions.pm
Unescape View File

@ -76,9 +76,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/InterceptionsItem.pm
Unescape View File

@ -42,9 +42,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/InvoiceTemplates.pm
Unescape View File

@ -75,9 +75,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/InvoiceTemplatesItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/Invoices.pm
Unescape View File

@ -110,9 +110,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/InvoicesItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/LnpCarriers.pm
Unescape View File

@ -75,9 +75,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/LnpCarriersItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/LnpNumbers.pm
Unescape View File

@ -85,9 +85,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/LnpNumbersItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/MailToFaxSettings.pm
Unescape View File

@ -86,9 +86,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/MailToFaxSettingsItem.pm
Unescape View File

@ -52,9 +52,14 @@ __PACKAGE__->config(
Does => [qw(ACL RequireSSL)],
}) }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/MaliciousCalls.pm
Unescape View File

@ -132,9 +132,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/MaliciousCallsItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/MetaConfigDefs.pm
Unescape View File

@ -44,9 +44,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/NcosLevels.pm
Unescape View File

@ -75,9 +75,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/NcosLevelsItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/NcosLnpCarriers.pm
Unescape View File

@ -75,9 +75,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/NcosLnpCarriersItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/NcosPatterns.pm
Unescape View File

@ -64,9 +64,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/NcosPatternsItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/PartyCallControls.pm
Unescape View File

@ -57,9 +57,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/PbxDeviceConfigFiles.pm
Unescape View File

@ -53,9 +53,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/PbxDeviceConfigFilesItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/PbxDeviceConfigs.pm
Unescape View File

@ -86,9 +86,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/PbxDeviceConfigsItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/PbxDeviceFirmwareBinaries.pm
Unescape View File

@ -53,9 +53,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/PbxDeviceFirmwareBinariesItem.pm
Unescape View File

@ -42,9 +42,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/PbxDeviceFirmwares.pm
Unescape View File

@ -87,9 +87,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/PbxDeviceFirmwaresItem.pm
Unescape View File

@ -41,9 +41,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods }
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

7
lib/NGCP/Panel/Controller/API/PbxDeviceModelImages.pm
Unescape View File

@ -62,9 +62,14 @@ __PACKAGE__->config(
Path => __PACKAGE__->dispatch_path,
} } @{ __PACKAGE__->allowed_methods },
},
action_roles => [qw(+NGCP::Panel::Role::HTTPMethods)],
);
sub gather_default_action_roles {
my ($self, %args) = @_; my @roles = ();
push @roles, 'NGCP::Panel::Role::HTTPMethods' if $args{attributes}->{Method};
return @roles;
}
sub auto :Private {
my ($self, $c) = @_;

Some files were not shown because too many files have changed in this diff Show More

Write Preview
Loading…
Cancel
Save