tfsrdbc/rdbcTfsAlloc.c

#include "sqlrtypes.h"
                                                    

                                                    
RDM_RETCODE exampleTfs_rdbcTfsAlloc (const char *databaseName)
{
RDM_RETCODE rc = sOKAY;
RDM_TFS tfs;
SQLRETURN ret;
SQLHENV hEnv;
SQLHDBC hDbc;
char connectStrIn[255];
char connectStrOut[255];
SQLSMALLINT outLen;

                                                    
/* This creates an embedded TFS handle */
                                                    
rc = rdm_rdmAllocTFS (&tfs);
if (rc == sOKAY)
{
rc = rdm_tfsSetOptions (tfs, "tfstype=embed");
if (rc == sOKAY)
{
rc = rdm_tfsInitialize (tfs);
}
if (rc == sOKAY)
{
ret = SQL_SUCCESS;
}
else
                                                    
{
rdm_tfsFree (tfs);
ret = SQL_ERROR;
}
}

                                                    
if (SQL_SUCCEEDED (ret))
{
ret = SQLAllocHandle (SQL_HANDLE_ENV, NULL, &hEnv);
if (SQL_SUCCEEDED (ret))
{
ret = SQLAllocHandle (SQL_HANDLE_DBC, hEnv, &hDbc);
if (SQL_SUCCEEDED (ret))
{
/* Pass the TFS handle to the ODBC driver */
                                                    
ret = SQLSetConnectAttr (
hDbc, SQL_ATTR_RDM_TFS_HANDLE, (SQLPOINTER) tfs,
SQL_IS_POINTER);
if (SQL_SUCCEEDED (ret))
{
/* Connect to the TFS and open the database */
                                                    
sprintf (connectStrIn, "databases=%s", databaseName);
ret = SQLDriverConnect (
hDbc, NULL, (SQLTCHAR *) connectStrIn, SQL_NTS,
(SQLTCHAR *) connectStrOut, sizeof (connectStrOut),
&outLen, SQL_DRIVER_NOPROMPT);
if (SQL_SUCCEEDED (ret))
{
(void) SQLDisconnect (hDbc);
}
else
                                                    
{
SQLINTEGER native;
(void) SQLGetDiagRec (
SQL_HANDLE_DBC, hDbc, 1, NULL, &native, NULL, 0,
NULL);
rc = (RDM_RETCODE) native;
}
}

                                                    
(void) SQLFreeHandle (SQL_HANDLE_DBC, hDbc);
}

                                                    
(void) SQLFreeHandle (SQL_HANDLE_ENV, hEnv);
}
(void) rdm_tfsFree (tfs);
}
return rc;
}