Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
home:Ledest:erlang:26
erlang
1834-inets-Add-callback-attributes-to-mod_secur...
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File 1834-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
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor