File 2895-snmp-test-Skip-when-RPC-fails.patch of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 2895-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

Places

File 2895-snmp-test-Skip-when-RPC-fails.patch of Package erlang

Places