./ct_report/coverage/mongoose_instrument_hooks.COVER.html

1 -module(mongoose_instrument_hooks).
2
3 -export([set_up/2, tear_down/2, execute/2]).
4
5 -include("mongoose.hrl").
6
7 -spec set_up(gen_hook:hook_name(), gen_hook:hook_tag()) -> ok.
8 set_up(HookName, Tag) ->
9 1414 case is_instrumented(HookName) of
10 true ->
11 962 EventName = event_name(HookName),
12 962 persistent_term:put({?MODULE, HookName}, EventName),
13 962 try
14 962 mongoose_instrument:set_up(EventName, labels(Tag), #{metrics => #{count => spiral}})
15 catch
16 error:#{what := inconsistent_labels} ->
17 
:-(
 log_tag_error(HookName, Tag)
18 end;
19 false ->
20 452 ok
21 end.
22
23 -spec log_tag_error(gen_hook:hook_name(), gen_hook:hook_tag()) -> ok.
24 log_tag_error(HookName, Tag) ->
25 
:-(
 ?LOG_ERROR(#{what => inconsistent_hook_handler_tags,
26 text => <<"A single hook should not have both global and host-type handlers. "
27 "Instrumentation is not set up.">>,
28 
:-(
 hook_name => HookName, tag => Tag}).
29
30 -spec tear_down(gen_hook:hook_name(), gen_hook:hook_tag()) -> ok.
31 tear_down(HookName, Tag) ->
32 1009 case is_instrumented(HookName) of
33 true ->
34 762 EventName = event_name(HookName),
35 762 mongoose_instrument:tear_down(EventName, labels(Tag)),
36 762 persistent_term:erase({?MODULE, HookName});
37 false ->
38 247 ok
39 end.
40
41 -spec execute(gen_hook:hook_name(), gen_hook:hook_tag()) -> ok.
42 execute(HookName, Tag) ->
43 49471 case is_instrumented(HookName) of
44 true ->
45 22304 try persistent_term:get({?MODULE, HookName}) of
46 EventName ->
47 19285 mongoose_instrument:execute(EventName, labels(Tag), #{count => 1})
48 catch error:badarg ->
49 3019 ok % no handlers registered for this hook
50 end;
51 false ->
52 27167 ok
53 end.
54
55 -spec event_name(gen_hook:hook_name()) -> mongoose_instrument:event_name().
56 event_name(HookName) ->
57 1724 list_to_atom("hook_" ++ atom_to_list(HookName)).
58
59 -spec labels(gen_hook:hook_tag()) -> mongoose_instrument:labels().
60 4 labels(global) -> #{};
61 21005 labels(HostType) -> #{host_type => HostType}.
62
63 -spec is_instrumented(gen_hook:hook_name()) -> boolean().
64 675 is_instrumented(sm_register_connection) -> false;
65 675 is_instrumented(sm_remove_connection) -> false;
66 16 is_instrumented(auth_failed) -> false;
67 2664 is_instrumented(user_send_packet) -> false;
68 676 is_instrumented(user_send_message) -> false;
69 679 is_instrumented(user_send_presence) -> false;
70 
:-(
 is_instrumented(user_send_iq) -> false;
71 5473 is_instrumented(user_receive_packet) -> false;
72 2642 is_instrumented(user_receive_message) -> false;
73 1454 is_instrumented(user_receive_presence) -> false;
74 
:-(
 is_instrumented(user_receive_iq) -> false;
75 18 is_instrumented(xmpp_bounce_message) -> false;
76 16 is_instrumented(xmpp_stanza_dropped) -> false;
77 7621 is_instrumented(xmpp_send_element) -> false;
78 25 is_instrumented(roster_get) -> false;
79 
:-(
 is_instrumented(roster_set) -> false;
80 
:-(
 is_instrumented(roster_push) -> false;
81 614 is_instrumented(register_user) -> false;
82 614 is_instrumented(remove_user) -> false;
83 16 is_instrumented(privacy_iq_get) -> false;
84 16 is_instrumented(privacy_iq_set) -> false;
85 80 is_instrumented(privacy_check_packet) -> false;
86 82 is_instrumented(mam_get_prefs) -> false;
87 124 is_instrumented(mam_set_prefs) -> false;
88 200 is_instrumented(mam_remove_archive) -> false;
89 2190 is_instrumented(mam_archive_message) -> false;
90 24 is_instrumented(mam_muc_get_prefs) -> false;
91 66 is_instrumented(mam_muc_set_prefs) -> false;
92 210 is_instrumented(mam_muc_remove_archive) -> false;
93 168 is_instrumented(mam_muc_lookup_messages) -> false;
94 828 is_instrumented(mam_muc_archive_message) -> false;
95 24028 is_instrumented(_) -> true.
Line Hits Source