Перенести все админские эндпоинты на порт 8445 и добавить отдельную авторизацию для админов. Часть 1

src/core/core_user.erl

@@ -4,6 +4,7 @@
 -export([create/2, get_by_id/1, get_by_email/1, update/2, delete/1]).
 -export([email_exists/1]).
 -export([generate_id/0]).
+-export([list_users/0]).
 
 %% Создание пользователя
 create(Email, Password) ->
@@ -86,6 +87,22 @@ update(Id, Updates) ->
 delete(Id) ->
   update(Id, [{status, deleted}]).
 
+list_users() ->
+  Users = mnesia:dirty_match_object(#user{_ = '_'}),
+  ActiveUsers = [U || U <- Users, U#user.status =/= deleted],
+  {ok, [user_to_map(U) || U <- ActiveUsers]}.
+
+user_to_map(User) ->
+  #{
+    id => User#user.id,
+    email => User#user.email,
+    password_hash => User#user.password_hash,
+    role => User#user.role,
+    status => User#user.status,
+    created_at => User#user.created_at,
+    updated_at => User#user.updated_at
+  }.
+
 %% Внутренние функции
 generate_id() ->
   base64:encode(crypto:strong_rand_bytes(16), #{mode => urlsafe, padding => false}).