File 6804-inets-Add-callback-attributes-to-mod_security.patch of Package erlang
From 750a6b735ce230f8048f9412adf2e9971a2e5bfc Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas@erlang.org>
Date: Wed, 27 Sep 2023 16:26:25 +0200
Subject: [PATCH 4/5] inets: Add callback attributes to mod_security
---
lib/inets/src/http_server/mod_security.erl | 20 +++++++++++++++++++-
1 file changed, 19 insertions(+), 1 deletion(-)
diff --git a/lib/inets/src/http_server/mod_security.erl b/lib/inets/src/http_server/mod_security.erl
index 15451a5dd5..5670af16f9 100644
--- a/lib/inets/src/http_server/mod_security.erl
+++ b/lib/inets/src/http_server/mod_security.erl
@@ -36,9 +36,27 @@
-define(VMODULE,"SEC").
+
+%%====================================================================
+%% Internal application API
+%%====================================================================
+-callback event(What, Port, Dir, Data) -> term() when
+ What :: auth_fail | user_block | user_unblock,
+ Port :: integer(),
+ Dir :: string(),
+ Data :: [Info],
+ Info :: {Name :: term(), Value :: term()}.
+-callback event(What, Address, Port, Dir, Data) -> term() when
+ What :: auth_fail | user_block | user_unblock,
+ Port :: integer(),
+ Address :: inet:ip4_address() | string(),
+ Dir :: string(),
+ Data :: [Info],
+ Info :: {Name :: term(), Value :: term()}.
+
%%====================================================================
%% Internal application API
-%%====================================================================
+%%====================================================================
do(Info) ->
%% Check and see if any user has been authorized.
case proplists:get_value(remote_user, Info#mod.data,not_defined_user) of
--
2.35.3