enb_registry: fetch_enb_list/0: return sorted list

Change-Id: I51cc55982dda5f88e967b63433fb7e5be292aca1
---
M src/enb_registry.erl
1 file changed, 9 insertions(+), 4 deletions(-)


git pull ssh://gerrit.osmocom.org:29418/erlang/osmo-s1gw refs/changes/02/41102/1

diff --git a/src/enb_registry.erl b/src/enb_registry.erl
index f2be559..0217836 100644
--- a/src/enb_registry.erl
+++ b/src/enb_registry.erl
@@ -215,15 +215,15 @@
 handle_call(fetch_enb_list,
             _From,
             #state{enbs = ENBs} = S) ->
-    Reply = maps:values(ENBs),
-    {reply, Reply, S};
+    EnbList = lists:sort(fun enb_list_sort/2, maps:values(ENBs)),
+    {reply, EnbList, S};
 
 handle_call({fetch_enb_list, Filter},
             _From,
             #state{enbs = ENBs} = S) ->
     Filtered = maps:filter(enb_filter(Filter), ENBs),
-    Reply = maps:values(Filtered),
-    {reply, Reply, S};
+    EnbList = lists:sort(fun enb_list_sort/2, maps:values(Filtered)),
+    {reply, EnbList, S};
 
 handle_call(Info, From, S) ->
     ?LOG_ERROR("unknown ~p() from ~p: ~p", [?FUNCTION_NAME, From, Info]),
@@ -315,6 +315,11 @@
     EnbInfo.
 
 
+-spec enb_list_sort(enb_info(), enb_info()) -> boolean().
+enb_list_sort(#{handle := H0},
+              #{handle := H1}) -> H0 =< H1.
+
+
 -spec enb_filter(enb_filter()) -> fun((enb_handle(), enb_info()) -> boolean()).
 enb_filter({genb_id_str, GlobalENBId}) ->
     fun(_, Item) -> enb_filter_by_field({genb_id_str, GlobalENBId}, Item) end;

