File 0425-snmp-test-More-tweaking-of-test-suites-for-NetBSD.patch of Package erlang

From bd3e85bb09fc6755a7d3f474ffeeec4a396e85c1 Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Wed, 4 Mar 2020 15:01:37 +0100
Subject: [PATCH 6/8] [snmp|test] More tweaking of test suites for NetBSD

The NetSNMP test suite also needs IPv6 skips for
NetBSD (the only NetBSD machine has bad IPv6 config).
---
 lib/snmp/test/snmp_to_snmpnet_SUITE.erl | 43 ++++++++++++++++++++++++++++++---
 1 file changed, 40 insertions(+), 3 deletions(-)

diff --git a/lib/snmp/test/snmp_to_snmpnet_SUITE.erl b/lib/snmp/test/snmp_to_snmpnet_SUITE.erl
index 76a1967513..b5c08fb697 100644
--- a/lib/snmp/test/snmp_to_snmpnet_SUITE.erl
+++ b/lib/snmp/test/snmp_to_snmpnet_SUITE.erl
@@ -200,10 +200,19 @@ end_per_suite(Config) ->
 init_per_group(ipv4, Config) ->
     init_per_group_ip([inet], Config);
 init_per_group(ipv6, Config) ->
-    init_per_group_ipv6([inet6], Config);
+    case os:type() of
+	{unix, netbsd} ->
+	    {skip, "Host *may* not *properly* support IPV6"};
+	_ ->
+	    init_per_group_ipv6([inet6], Config)
+    end;
 init_per_group(ipv4_ipv6, Config) ->
-    init_per_group_ipv6([inet, inet6], Config);
-
+    case os:type() of
+	{unix, netbsd} ->
+	    {skip, "Host *may* not *properly* support IPV6"};
+	_ ->
+	    init_per_group_ipv6([inet, inet6], Config)
+    end;
 init_per_group(snmpget = Exec, Config) ->
     %% From Ubuntu package snmp
     init_per_group_agent(Exec, Config);
@@ -344,11 +353,39 @@ start_agent(Config) ->
     ok = application:set_env(snmp, agent, agent_app_env(Config)),
     ok = application:start(snmp).
 
+%% stop_agent(_Config) ->
+%%     case application:stop(snmp) of
+%% 	ok ->
+%% 	    ok;
+%% 	E1 ->
+%% 	    ct:pal("application:stop(snmp) -> ~p", [E1])
+%%     end,
+%%     case application:unload(snmp) of
+%% 	ok ->
+%% 	    ok;
+%% 	E2 ->
+%% 	    ct:pal("application:unload(snmp) -> ~p", [E2])
+%%     end.
+
 start_manager(Config) ->
     ok = application:load(snmp),
     ok = application:set_env(snmp, manager, manager_app_env(Config)),
     ok = application:start(snmp).
 
+%% stop_manager(_Config) ->
+%%     case application:stop(snmp) of
+%% 	ok ->
+%% 	    ok;
+%% 	E1 ->
+%% 	    ct:pal("application:stop(snmp) -> ~p", [E1])
+%%     end,
+%%     case application:unload(snmp) of
+%% 	ok ->
+%% 	    ok;
+%% 	E2 ->
+%% 	    ct:pal("application:unload(snmp) -> ~p", [E2])
+%%     end.
+
 
 
 %%--------------------------------------------------------------------
-- 
2.16.4

openSUSE Build Service is sponsored by