File 3131-ssh-Add-is_on-0-is_off-0-in-ssh_dbg.patch of Package erlang
From 5526a88e73b96972b99918797642fcf1f3ad56a9 Mon Sep 17 00:00:00 2001
From: Hans Nilsson <hans@erlang.org>
Date: Fri, 17 Apr 2020 15:03:50 +0200
Subject: [PATCH 1/5] ssh: Add is_on/0 is_off/0 in ssh_dbg
---
lib/ssh/src/ssh_dbg.erl | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/lib/ssh/src/ssh_dbg.erl b/lib/ssh/src/ssh_dbg.erl
index 1809b14099..5e3c48d468 100644
--- a/lib/ssh/src/ssh_dbg.erl
+++ b/lib/ssh/src/ssh_dbg.erl
@@ -54,6 +54,8 @@
start_tracer/0, start_tracer/1,
on/1, on/0,
off/1, off/0,
+ is_on/0,
+ is_off/0,
go_on/0,
%% Circular buffer
cbuf_start/0, cbuf_start/1,
@@ -134,10 +136,13 @@ start_tracer(WriteFun, InitAcc) when is_function(WriteFun, 3) ->
%%%----------------------------------------------------------------
on() -> on(?ALL_DBG_TYPES).
on(Type) -> switch(on, Type).
-
+is_on() -> gen_server:call(?SERVER, get_on, ?CALL_TIMEOUT).
+
off() -> off(?ALL_DBG_TYPES). % A bit overkill...
off(Type) -> switch(off, Type).
+is_off() -> ?ALL_DBG_TYPES -- is_on().
+
go_on() ->
IsOn = gen_server:call(?SERVER, get_on, ?CALL_TIMEOUT),
--
2.26.1