Function getLibraryFunction

SRC/api/packages.cpp:55–353

#endif

int
getLibraryFunction(const char* libName, const char* funcName, void** libHandle, void** funcHandle) {

    int result = 0;

    *libHandle = NULL;
    *funcHandle = NULL;

    //struct stat stFileInfo;
    //bool blnReturn;
    //int intStat;

#ifdef _WIN32

    //
    // first try and open dll
    //

    int libNameLength = (int)strlen(libName);
    char* localLibName = new char[libNameLength + 5];
    strcpy(localLibName, libName);
    strcpy(&localLibName[libNameLength], ".dll");

    HINSTANCE hLib = LoadLibrary(localLibName);

    delete[] localLibName;

    if (hLib != NULL) {

        char mod[124];
        GetModuleFileName((HMODULE)hLib, (LPTSTR)mod, 124);

        //
        // Now look for function with funcName
        //

        (*funcHandle) = (void*)GetProcAddress((HMODULE)hLib, funcName);

        if (*funcHandle == NULL) {
            char* underscoreFunctionName = new char[strlen(funcName) + 2];
            strcpy(underscoreFunctionName, funcName);
            strcpy(&underscoreFunctionName[strlen(funcName)], "_");
            (*funcHandle) = (void*)GetProcAddress((HMODULE)hLib, underscoreFunctionName);
            delete[] underscoreFunctionName;
        }


        if (*funcHandle == NULL) {
            FreeLibrary((HMODULE)hLib);
            return -2;
        }

        //
        // we need to set the OpenSees pointer global variables if function there
        //

        typedef int(_cdecl* LocalInitPtrType)();
        typedef int(_cdecl* OPS_ErrorPtrType)(char*, int);