IFXModuleMain.cpp

Go to the documentation of this file.

#include <dcl/Config.h>
 
#ifdef _MSC_VER
    #pragma comment(lib, "igl4n304.lib")
    #pragma comment(lib, "iglxn304.lib")
    #pragma comment(lib, "igo4n304.lib")
    #pragma comment(lib, "isqlt09a.lib")
#endif
 
#include <string.h>         // strchr
#include <locale.h>         // setlocale
#include <dcl/_stdlib.h>   // setenv
 
#include <dcl/Object.h>
#if __DCL_HAVE_ALLOC_DEBUG
#undef __DCL_ALLOC_LEVEL
#define __DCL_ALLOC_LEVEL   __DCL_ALLOC_INTERNAL
#endif
 
#include <dcl/SQLCore.h>
#include "IFXConnection.h"
#include "IFXUtils.h"
 
#define __TRACE_THIS    0
#if __TRACE_THIS
#define __DCL_TRACE0_N  __DCL_TRACE0
#define __DCL_TRACE1_N  __DCL_TRACE1
#define __DCL_TRACE2_N  __DCL_TRACE2
#define __DCL_TRACE3_N  __DCL_TRACE3
#define __DCL_TRACE4_N  __DCL_TRACE4
#else
#define __DCL_TRACE0_N(fmt)
#define __DCL_TRACE1_N(fmt, arg)
#define __DCL_TRACE2_N(fmt, arg1, arg2)
#define __DCL_TRACE3_N(fmt, arg1, arg2, arg3)
#define __DCL_TRACE4_N(fmt, arg1, arg2, arg3, arg4)
#endif
 
#if __DCL_HAVE_THIS_FILE__
#undef __THIS_FILE__
static const char_t __THIS_FILE__[] = __T("dcl/sql/IFXModuleMain.cpp");
#endif
 
/*
#ifdef _WINDOWS
BOOL APIENTRY DllMain( HANDLE hModule, 
    DWORD  ul_reason_for_call, 
    LPVOID lpReserved
)
{
    switch (ul_reason_for_call) {
        case DLL_PROCESS_ATTACH:
        case DLL_PROCESS_DETACH:
            return TRUE;
        case DLL_THREAD_ATTACH:
        case DLL_THREAD_DETACH:
            break;
    }
    return FALSE;
}
#endif
*/
 
#ifdef __DCL_DEBUG
#if defined(_WINDOWS) && defined(_DEBUG)
    typedef void (* __ndebug_free__)(void*);
 
    static HMODULE  __hMSVCRT_DLL = NULL;
    static __ndebug_free__  __pfn_free = NULL;
 
    void ndebug_free(void* p)
    {
        __DCL_ASSERT(__pfn_free != NULL);
        __pfn_free(p);
    }
#else
    void ndebug_free(void* _pv)
    {
    #ifdef __DCL_DEBUG_FREE
    #undef free
    #endif
        free(_pv);
    #ifdef __DCL_DEBUG_FREE
    #define free    __DCL_DEBUG_FREE
    #endif
    }
#endif  // _WINDOWS
#endif
 
__DCL_BEGIN_NAMESPACE
 
static const wchar_t* _serverTitle = __T("INFORMIX");
 
SQL::Connection* CreateConnectionInstance()
{
    return new IFXConnection(_serverTitle);
}
 
bool ModuleInitialize()
{
    const char* langUTF8 = "en_US.UTF8";
    char* lang = getenv("LANG");
    if (!lang) {
        // current locale
        lang = setlocale(LC_CTYPE, NULL);
    }
    if (lang) {
        ByteString lang_ = ByteString(lang);
        ByteString lower = lang_.toLowerCase();
        if (lower.contains("ko") || lower.contains("kr")) {
            langUTF8 = "ko_KR.UTF8";
        }
    }
    __DCL_TRACE1_N(L"setenv CLIENT_LOCALE=[%hs]\n", langUTF8);
    if (setenv("CLIENT_LOCALE", langUTF8, 1)) {
        return false;
    }
 
#if defined(__DCL_DEBUG) && defined(_DEBUG) && defined(_WINDOWS)
    __hMSVCRT_DLL = ::LoadLibrary("MSVCRT.DLL");
    if (!__hMSVCRT_DLL) {
        return false;
    }
 
    __pfn_free = (__ndebug_free__)
        ::GetProcAddress(__hMSVCRT_DLL, "free");
    if (!__pfn_free) {
        ::FreeLibrary(__hMSVCRT_DLL);
        __hMSVCRT_DLL = NULL;
        return false;
    }
#endif
 
    return true;
}
 
bool ModuleCleanup()
{
#if defined(__DCL_DEBUG) && defined(_DEBUG) && defined(_WINDOWS)
    if (__hMSVCRT_DLL) {
        ::FreeLibrary(__hMSVCRT_DLL);
        __hMSVCRT_DLL = NULL;
    }
#endif
    return true;
}
 
extern "C"
{
DCL_DSO_EXPORT
SQL::DRIVER_MODULE DCL_DSO_ENTRY_POINT =
{
    // DCL common members
    sizeof(SQL::DRIVER_MODULE),       // structure size
    DCL_VERSION,
    __T(__BUILD_TIMESTAMP__),
    DCL_BUILD_FLAG,
    DCL_SQL_DRIVER_MODULE,         // module type
    __T("DCL SQL Adapter for IBM Informix Database Server"),
 
    // private members
    DCL_SQL_VERSION,
    _serverTitle,
    __T(DCL_SQL_VERSION_STRING),
    ModuleInitialize,
    ModuleCleanup,
    CreateConnectionInstance
};
 
}
 
__DCL_END_NAMESPACE
 
#ifdef __WINNT_NEW_DELETE_OVERRIDE
#undef new
__WINNT_NEW_DELETE_OVERRIDE
#endif