[XrdCl] Make the debug level for TLS component configurable.

xrootd · Jun 18, 2020 · 4d34764 · 4d34764
1 parent 4e0994e
commit 4d34764
Show file tree

Hide file tree

Showing 4 changed files with 29 additions and 1 deletion.
diff --git a/docs/man/xrdcp.1 b/docs/man/xrdcp.1
@@ -317,6 +317,13 @@ Available topics: AppMsg, UtilityMsg, FileMsg, PollerMsg, PostMasterMsg,
 XRootDTransportMsg, TaskMgrMsg, XRootDMsg, FileSystemMsg, AsyncSockMsg
 .RE
 
+XRD_TLSDBGLVL
+.RS 5
+Determine the debug level for the TLS component. Valid values are:
+\fIOFF\fR, \fICTX\fR, \fISOK\fR, \fISIO\fR, \fIALL\fR and \fIOUT\fR.
+The default value is \fIOFF\fR.
+.RE
+
 XRD_PARALLELEVTLOOP
 .RS 5
 The number of event loops.

diff --git a/src/XrdCl/XrdClConstants.hh b/src/XrdCl/XrdClConstants.hh
@@ -96,6 +96,7 @@ namespace XrdCl
   const char * const DefaultWriteRecovery      = "true";
   const char * const DefaultOpenRecovery       = "true";
   const char * const DefaultGlfnRedirector     = "";
+  const char * const DefaultTlsDbgLvl          = "OFF";
 }
 
 #endif // __XRD_CL_CONSTANTS_HH__
diff --git a/src/XrdCl/XrdClDefaultEnv.cc b/src/XrdCl/XrdClDefaultEnv.cc
@@ -307,6 +307,7 @@ namespace XrdCl
     REGISTER_VAR_STR( varsStr, "WriteRecovery",           DefaultWriteRecovery           );
     REGISTER_VAR_STR( varsStr, "OpenRecovery",            DefaultOpenRecovery            );
     REGISTER_VAR_STR( varsStr, "GlfnRedirector",          DefaultGlfnRedirector          );
+    REGISTER_VAR_STR( varsStr, "TlsDbgLvl",               DefaultTlsDbgLvl               );
 
     //--------------------------------------------------------------------------
     // Process the configuration files

diff --git a/src/XrdCl/XrdClTls.cc b/src/XrdCl/XrdClTls.cc
@@ -63,7 +63,26 @@ namespace
       inline SetTlsMsgCB()
       {
         XrdTls::SetMsgCB( MsgCallBack );
-        XrdTls::SetDebug( XrdTls::dbgALL, MsgCallBack );
+        XrdTls::SetDebug( TlsDbgLvl(), MsgCallBack );
+      }
+
+      //--------------------------------------------------------------------
+      // Get TLS debug level
+      //--------------------------------------------------------------------
+      static int TlsDbgLvl()
+      {
+        XrdCl::Env *env = XrdCl::DefaultEnv::GetEnv();
+        std::string tlsDbgLvl;
+        env->GetString( "TlsDbgLvl", tlsDbgLvl );
+
+        if( tlsDbgLvl == "OFF" ) return XrdTls::dbgOFF;
+        if( tlsDbgLvl == "CTX" ) return XrdTls::dbgCTX;
+        if( tlsDbgLvl == "SOK" ) return XrdTls::dbgSOK;
+        if( tlsDbgLvl == "SIO" ) return XrdTls::dbgSIO;
+        if( tlsDbgLvl == "ALL" ) return XrdTls::dbgALL;
+        if( tlsDbgLvl == "OUT" ) return XrdTls::dbgOUT;
+
+        return XrdTls::dbgOFF;
       }
   };