Introduction
I needed some way to let the user select a datasource to use in one application. We have multiple databases which are defined in the tnsnames.ora file. This article shows a class that helps you list the datasources defined in that file. I just translated the code from VB and found here with some fixes.
The Class
using System;
using System.Collections.Generic;
using System.Text;
using Microsoft.Win32;
using System.Text.RegularExpressions;
namespace TNSNamesReader
{
public class TNSNamesReader
{
public List<string> GetOracleHomes()
{
List<string> oracleHomes = new List<string>();
RegistryKey rgkLM = Registry.LocalMachine;
RegistryKey rgkAllHome = rgkLM.OpenSubKey(@"SOFTWARE\ORACLE");
if (rgkAllHome != null)
{
foreach (string subkey in rgkAllHome.GetSubKeyNames())
{
if (subkey.StartsWith("KEY_"))
oracleHomes.Add(subkey);
}
}
return oracleHomes;
}
private string GetOracleHomePath(String OracleHomeRegistryKey)
{
RegistryKey rgkLM = Registry.LocalMachine;
RegistryKey rgkOracleHome = rgkLM.OpenSubKey(@"SOFTWARE\ORACLE\" +
OracleHomeRegistryKey);
if (!rgkOracleHome.Equals(""))
return rgkOracleHome.GetValue("ORACLE_HOME").ToString();
return "";
}
private string GetTNSNAMESORAFilePath(String OracleHomeRegistryKey)
{
string oracleHomePath = this.GetOracleHomePath(OracleHomeRegistryKey);
string tnsNamesOraFilePath = "";
if (!oracleHomePath.Equals(""))
{
tnsNamesOraFilePath = oracleHomePath + @"\NETWORK\ADMIN\TNSNAMES.ORA";
if (!(System.IO.File.Exists(tnsNamesOraFilePath)))
{
tnsNamesOraFilePath = oracleHomePath + @"\NET80\ADMIN\TNSNAMES.ORA";
}
}
return tnsNamesOraFilePath;
}
public List<string> LoadTNSNames(string OracleHomeRegistryKey)
{
List<string> DBNamesCollection = new List<string>();
string RegExPattern = @"[\n][\s]*[^\(][a-zA-Z0-9_.]+[\s]*=[\s]*\(";
string strTNSNAMESORAFilePath = GetTNSNAMESORAFilePath(OracleHomeRegistryKey);
if (!strTNSNAMESORAFilePath.Equals(""))
{
System.IO.FileInfo fiTNS = new System.IO.FileInfo(strTNSNAMESORAFilePath);
if (fiTNS.Exists)
{
if (fiTNS.Length > 0)
{
int iCount;
for (iCount = 0; iCount < Regex.Matches(
System.IO.File.ReadAllText(fiTNS.FullName),
RegExPattern).Count; iCount++)
{
DBNamesCollection.Add(Regex.Matches(
System.IO.File.ReadAllText(fiTNS.FullName),
RegExPattern)[iCount].Value.Trim().Substring(0,
Regex.Matches(System.IO.File.ReadAllText(fiTNS.FullName),
RegExPattern)[iCount].Value.Trim().IndexOf(" ")));
}
}
}
}
return DBNamesCollection;
}
}
}
Using the Code
- Create an instance of the class in your form.
private TNSNamesReader tnsNamesReader = new TNSNamesReader();
- Populate a list control (combo, listbox, etc.) to let your user select the Oracle Home where the tnsnames.ora file will be read.
cmbOracleHome.DataSource = tnsNamesReader.GetOracleHomes();
- Populate another list control with the datasources found.
this.cmbDataSource.DataSource = tnsNamesReader.LoadTNSNames(
(string)this.cmbOracleHome.SelectedValue);
Points of Interest
In the article I pointed out, it's supposed to be a registry key "SOFTWARE\ORACLE\ALL_HOMES" and a subkey called "LAST_HOME." None of them existed on my registry and caused an exception. I went to the windows registry and saw that every oracle home registry key begins with the word "KEY_" so I took every key beggining with this and listed them as Oracle Homes. Once an oracle home is selected we can look for the tnsnames.ora file path and load its data sources. This class doesn't find the Current or Active Oracle Home, however, you must select one.