Devart Oracle home debugging

gistfile1.cs

using System;
using System.Reflection;
using Devart.Data.Oracle;

void PrintDevartOracleHome() 
{
    // SUPER HACKY
    // Get internal property OracleHomeCollection.SingletonInstance
    var homes = (OracleHomeCollection)typeof(OracleHomeCollection)
        .GetProperties(BindingFlags.Static | BindingFlags.NonPublic)
        .Single(p => p.Name == "SingletonInstance")
        .GetValue(null, BindingFlags.GetProperty, null, null, null);

    Console.WriteLine("Using Oracle home name = {0} version = {1} path = {2}", 
                    homes.DefaultHome.Name, homes.DefaultHome.ClientVersion, homes.DefaultHome.Path);
}