add SAP HANA 2 SPS04 driver bug workaround

Author: MaceWindu

Source/DriverHelper.cs

@@ -11,6 +11,7 @@
 
 using LINQPad.Extensibility.DataContext;
 using System.Reflection;
+using System.IO;
 
 namespace LinqToDB.LINQPad
 {
@@ -190,5 +191,26 @@ public static void ConfigureRedirects()
 				return typeof(DataContext).Assembly;
 			};
 		}
+
+		public static void SapHanaSPS04Fixes()
+		{
+			// recent SAP HANA provider (SPS04) uses Assembly.GetEntryAssembly() calls during native dlls discovery, which
+			// leads to NRE as it returns null under NETFX, so we need to fake this method result to unblock HANA testing
+			// https://github.com/microsoft/vstest/issues/1834
+			// https://dejanstojanovic.net/aspnet/2015/january/set-entry-assembly-in-unit-testing-methods/
+			try
+			{
+				var assembly = Assembly.GetCallingAssembly();
+
+				var manager = new AppDomainManager();
+				var entryAssemblyfield = manager.GetType().GetField("m_entryAssembly", BindingFlags.Instance | BindingFlags.NonPublic);
+				entryAssemblyfield.SetValue(manager, assembly);
+
+				var domain = AppDomain.CurrentDomain;
+				var domainManagerField = domain.GetType().GetField("_domainManager", BindingFlags.Instance | BindingFlags.NonPublic);
+				domainManagerField.SetValue(domain, manager);
+			}
+			catch { /* ne shmagla */ }
+		}
 	}
 }

Source/LinqToDBDriver.cs

@@ -31,6 +31,7 @@ public class LinqToDBDriver : DynamicDataContextDriver
 		static LinqToDBDriver()
 		{
 			DriverHelper.ConfigureRedirects();
+			DriverHelper.SapHanaSPS04Fixes();
 		}
 
 		public override string GetConnectionDescription(IConnectionInfo cxInfo)