File 7666-snmp-test-Add-skip-condition-for-specific-... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 7666-snmp-test-Add-skip-condition-for-specific-slooow-mac.patch of Package erlang

From 694850491e07635862bc22fa2a751afd8f1f0598 Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Wed, 19 Jan 2022 16:37:26 +0100
Subject: [PATCH 06/12] [snmp|test] Add skip condition for specific *slooow*
 machine

---
 lib/snmp/test/snmp_agent_SUITE.erl | 50 ++++++++++++++++++++++++++++++
 1 file changed, 50 insertions(+)

diff --git a/lib/snmp/test/snmp_agent_SUITE.erl b/lib/snmp/test/snmp_agent_SUITE.erl
index 44ee3abdc0..7f5c2dfec4 100644
--- a/lib/snmp/test/snmp_agent_SUITE.erl
+++ b/lib/snmp/test/snmp_agent_SUITE.erl
@@ -1091,6 +1091,56 @@ init_per_testcase1(v3_inform_i = _Case, Config) when is_list(Config) ->
 	 "~n   Case:   ~p"
 	 "~n   Config: ~p", [_Case, Config]),
     wd_start(10, Config);
+init_per_testcase1(v3_des_priv = _Case, Config) when is_list(Config) ->
+    ?DBG("init_per_testcase1 -> entry with"
+	 "~n   Case:   ~p"
+	 "~n   Config: ~p", [_Case, Config]),
+    %% <CONDITIONAL-SKIP>
+    %% This is intended to catch Yellow Dog Linux release 6.2 (2.6.29)
+    LinuxVersionVerify = 
+	fun() ->
+		case string:to_lower(os:cmd("uname -m")) of
+		    "ppc" ++ _ ->
+			case file:read_file_info("/etc/issue") of
+			    {ok, _} ->
+				case string:to_lower(
+                                       os:cmd("grep -i yellow /etc/issue")) of
+				    "yellow dog " ++ _ ->
+					case os:version() of
+					    {2, 6, 29} ->
+                                                ?IPRINT("(PPC Linux) "
+                                                        "kernel version check: "
+                                                        "{2, 6, 29} => SKIP"),
+						true;
+					    V ->
+                                                ?IPRINT("(PPC Linux) "
+                                                        "kernel version check: "
+                                                        "~p != {2, 6, 29} => "
+                                                        "*NO* SKIP", [V]),
+						false
+					end;
+				    _ -> % Maybe plain Debian or Ubuntu
+                                        ?IPRINT("(PPC Linux) => *NO* SKIP"),
+					false
+				end;
+			    _ ->
+                                ?IPRINT("(PPC Linux) Unknown distro => "
+                                        "*NO* SKIP"),
+				false
+			end;
+		    _ ->
+                        ?IPRINT("(Linux) Not PPC => *NO* SKIP"),
+			false
+		end
+	end,
+    Skippable = [{unix, [{linux, LinuxVersionVerify}]}],
+    %% </CONDITIONAL-SKIP>
+    case ?OS_BASED_SKIP(Skippable) of
+        true ->
+            {skip, "Host *may* not *properly* handle this test case"};
+        false ->
+            wd_start(6, Config)
+    end;
 init_per_testcase1(_Case, Config) when is_list(Config) ->
     ?DBG("init_per_testcase -> entry with"
 	 "~n   Case:   ~p"
-- 
2.34.1

Places

File 7666-snmp-test-Add-skip-condition-for-specific-slooow-mac.patch of Package erlang

Places