File 6295-snmp-test-Skip-when-RPC-fails.patch of Package erlang
From 8c7ca45a20f5d2dac6e56b2d778a97236f4d1186 Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Tue, 6 Aug 2024 11:33:25 +0200
Subject: [PATCH 5/6] [snmp|test] Skip when RPC fails
When RPC fails (because of nodedown), skip instead
of failing.
---
lib/snmp/test/snmp_agent_test_lib.erl | 9 ++++++++-
1 file changed, 8 insertions(+), 1 deletion(-)
diff --git a/lib/snmp/test/snmp_agent_test_lib.erl b/lib/snmp/test/snmp_agent_test_lib.erl
index 3877123b37..0edc42c426 100644
--- a/lib/snmp/test/snmp_agent_test_lib.erl
+++ b/lib/snmp/test/snmp_agent_test_lib.erl
@@ -1030,7 +1030,12 @@ await_stopped(Pid, Ref) ->
%% --- start subagent supervisor ---
start_sub_sup(Node, Dir) ->
- rpc:call(Node, ?MODULE, start_sub_sup, [Dir]).
+ case rpc:call(Node, ?MODULE, start_sub_sup, [Dir]) of
+ {badrpc, _Reason} = BADRPC ->
+ ?SKIP(BADRPC);
+ Result ->
+ Result
+ end.
start_sub_sup(Dir) ->
?DBG("start_sub -> entry",[]),
@@ -1056,6 +1061,8 @@ start_subagent(SaNode, RegTree, Mib) ->
Func = start_sub_agent,
Args = [MA, RegTree, [Mib1]],
case rpc:call(SaNode, Mod, Func, Args) of
+ {badrpc, _Reason} = BADRPC ->
+ ?SKIP(BADRPC);
{ok, SA} ->
?DBG("start_subagent -> SA: ~p", [SA]),
{ok, SA};
--
2.43.0