Log Dataverse Organization Request and Response for Debug (#10)

* MSALIdentityLogger and ServiceClientLogger

* Log serialized request and response for debug

---------

Co-authored-by: Arjan Meskers <arjanmeskers@outlook.com>

Author: AMSoftwareNL

src/AMSoftware.Dataverse.PowerShell/CmdletBase.cs

@@ -44,14 +44,7 @@ protected override void BeginProcessing()
                 WriteVerboseWithTimestamp(string.Format("{0} begin processing with ParameterSet '{1}'.", GetType().Name, ParameterSetName));
             }
 
-            MSALIdentityLogger.Instance.AddContext((entry) =>
-            {
-                LogMessages.Enqueue(entry);
-            });
-            ServiceClientLogger.Instance.AddContext((entry) =>
-            {
-                LogMessages.Enqueue(entry);
-            });
+            SetupLogIntercept();
 
             base.BeginProcessing();
         }
@@ -83,16 +76,32 @@ protected override void ProcessRecord()
 
         protected override void EndProcessing()
         {
-            MSALIdentityLogger.Instance.RemoveContext();
-            ServiceClientLogger.Instance.RemoveContext();
-
+            TeardownLogIntercept();
             FlushLogMessages();
 
             WriteVerboseWithTimestamp(string.Format("{0} end processing.", GetType().Name));
 
             base.EndProcessing();
         }
 
+        private void SetupLogIntercept()
+        {
+            MSALIdentityLogger.Instance.AddContext((entry) =>
+            {
+                LogMessages.Enqueue(entry);
+            });
+            ServiceClientLogger.Instance.AddContext((entry) =>
+            {
+                LogMessages.Enqueue(entry);
+            });
+        }
+
+        private static void TeardownLogIntercept()
+        {
+            MSALIdentityLogger.Instance.RemoveContext();
+            ServiceClientLogger.Instance.RemoveContext();
+        }
+
         private void FlushLogMessages()
         {
             while (LogMessages.TryDequeue(out PSLogEntry entry))

src/AMSoftware.Dataverse.PowerShell/RequestCmdletBase.cs

@@ -17,6 +17,9 @@ You should have received a copy of the GNU General Public License
 */
 using Microsoft.Xrm.Sdk;
 using System.Management.Automation;
+using System.Runtime.Serialization;
+using System.Text;
+using System.Xml;
 
 namespace AMSoftware.Dataverse.PowerShell
 {
@@ -49,18 +52,37 @@ public abstract class RequestCmdletBase : CmdletBase
         protected virtual TResponse ExecuteOrganizationRequest<TResponse>(OrganizationRequest request) where TResponse : OrganizationResponse
         {
             UseOptionalParameters(request);
+            LogForDebug(request);
 
             var response = (TResponse)Session.Current.Client.ExecuteOrganizationRequest(
                     request, MyInvocation.MyCommand.Name);
 
-            if (response == null)
+            if (response == null && Session.Current.Client.LastException != null)
             {
                 throw Session.Current.Client.LastException;
             }
 
+            LogForDebug(response);
+
             return response;
         }
 
+        private void LogForDebug<T>(T graph)
+        {
+            var serializer = new DataContractSerializer(typeof(T));
+            var debugStringBuilder = new StringBuilder();
+
+            using (var xmlWriter = XmlWriter.Create(debugStringBuilder, new XmlWriterSettings()
+            {
+                Indent = true
+            })) {
+                serializer.WriteObject(xmlWriter, graph);
+            }
+
+            WriteDebugWithTimestamp(graph.GetType().Name);
+            WriteDebug(debugStringBuilder.ToString());
+        }
+
         private void UseOptionalParameters(OrganizationRequest request)
         {
             if (request == null) return;