Introduce method for suspending fakes temporarily to avoid errors like issue #4476. Specific fix for Date/Now and Time/Now for the timebeing.

Author: tommy9

Rubberduck.Main/ComClientLibrary/UnitTesting/Fakes/Date.cs

@@ -18,14 +18,16 @@ public Date()
         public void DateCallback(IntPtr retVal)
         {
             OnCallBack(true);
-            if (!TrySetReturnValue())                          // specific invocation
+            if (!TrySetReturnValue())
             {
-                TrySetReturnValue(true);                       // any invocation
+                TrySetReturnValue(true);
             }
             if (PassThrough)
             {
+                FakesProvider.SuspendFake("Now");
                 var nativeCall = Marshal.GetDelegateForFunctionPointer<DateDelegate>(NativeFunctionAddress);
                 nativeCall(retVal);
+                FakesProvider.ResumeFake("Now");
                 return;
             }
             Marshal.GetNativeVariantForObject(ReturnValue ?? 0, retVal);

Rubberduck.Main/ComClientLibrary/UnitTesting/Fakes/Time.cs

@@ -24,8 +24,10 @@ public void TimeCallback(IntPtr retVal)
             }
             if (PassThrough)
             {
+                FakesProvider.SuspendFake("Now");
                 var nativeCall = Marshal.GetDelegateForFunctionPointer<TimeDelegate>(NativeFunctionAddress);
                 nativeCall(retVal);
+                FakesProvider.ResumeFake("Now");
                 return;
             }
             Marshal.GetNativeVariantForObject(ReturnValue ?? 0, retVal);

Rubberduck.Main/ComClientLibrary/UnitTesting/FakesProvider.cs

@@ -37,6 +37,30 @@ public void StartTest()
             CodeIsUnderTest = true;
         }
 
+        public static void SuspendFake(String typename)
+        {
+            foreach (var fake in ActiveFakes.Values)
+            {
+                if (fake.GetType().Name == typename)
+                {
+                    fake.DisableHook();
+                    return;
+                }
+            }
+        }
+
+        public static void ResumeFake(String typename)
+        {
+            foreach (var fake in ActiveFakes.Values)
+            {
+                if (fake.GetType().Name == typename)
+                {
+                    fake.DisableHook();
+                    return;
+                }
+            }
+        }
+
         public void StopTest()
         {           
             foreach (var fake in ActiveFakes.Values)

Rubberduck.Main/ComClientLibrary/UnitTesting/StubBase.cs

@@ -53,6 +53,21 @@ protected void OnCallBack(bool trackNoParams = false)
             }
         }
 
+        public void DisableHook()
+        {
+            foreach (var hook in _hooks)
+            {
+                hook.ThreadACL.SetExclusiveACL(new[] { 0 });
+            }
+        }
+        public void EnableHook()
+        {
+            foreach (var hook in _hooks)
+            {
+                hook.ThreadACL.SetInclusiveACL(new[] { 0 });
+            }
+        }
+
         public virtual void Dispose()
         {
             foreach (var hook in _hooks)