From 5c3f35f96e2ead6a166d7899769c2efea9f3ad02 Mon Sep 17 00:00:00 2001
From: Rene Krenn <rkrenn@sipwise.com>
Date: Wed, 20 Jul 2016 15:40:28 +0200
Subject: [PATCH] MT#21459 ncos "level" filter for api

Change-Id: I289c7c408ccfd4da46a70f42030d8dcb1804225c
---
 lib/NGCP/Panel/Controller/API/NcosLevels.pm | 15 +++++++++++++--
 1 file changed, 13 insertions(+), 2 deletions(-)

diff --git a/lib/NGCP/Panel/Controller/API/NcosLevels.pm b/lib/NGCP/Panel/Controller/API/NcosLevels.pm
index a8897917e7..870d373f7f 100644
--- a/lib/NGCP/Panel/Controller/API/NcosLevels.pm
+++ b/lib/NGCP/Panel/Controller/API/NcosLevels.pm
@@ -38,6 +38,17 @@ sub query_params {
                 second => sub {},
             },
         },
+        {
+            param => 'level',
+            description => 'Filter for levels matching the given pattern',
+            query => {
+                first => sub {
+                    my $q = shift;
+                    { level => { like => $q } };
+                },
+                second => sub { },
+            },
+        },
     ];
 }
 
@@ -113,7 +124,7 @@ sub GET :Allow {
         $hal->resource({
             total_count => $total_count,
         });
-        my $response = HTTP::Response->new(HTTP_OK, undef, 
+        my $response = HTTP::Response->new(HTTP_OK, undef,
             HTTP::Headers->new($hal->http_headers(skip_links => 1)), $hal->as_json);
         $c->response->headers($response->headers);
         $c->response->body($response->content);
@@ -147,7 +158,7 @@ sub POST :Allow {
     my $guard = $c->model('DB')->txn_scope_guard;
     {
         my $resource = $self->get_valid_post_data(
-            c => $c, 
+            c => $c,
             media_type => 'application/json',
         );
         last unless $resource;