|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
#include <stdio.h>
|
|
Packit Service |
fa4841 |
#include <winpr/crt.h>
|
|
Packit Service |
fa4841 |
#include <winpr/path.h>
|
|
Packit Service |
fa4841 |
#include <winpr/tchar.h>
|
|
Packit Service |
fa4841 |
#include <winpr/windows.h>
|
|
Packit Service |
fa4841 |
#include <winpr/library.h>
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
typedef int (*TEST_AB_FN)(int a, int b);
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
int TestLibraryGetProcAddress(int argc, char* argv[])
|
|
Packit Service |
fa4841 |
{
|
|
Packit Service |
fa4841 |
int a, b, c;
|
|
Packit Service |
fa4841 |
HINSTANCE library;
|
|
Packit Service |
fa4841 |
TEST_AB_FN pFunctionA;
|
|
Packit Service |
fa4841 |
TEST_AB_FN pFunctionB;
|
|
Packit Service |
fa4841 |
LPCSTR SharedLibraryExtension;
|
|
Packit Service |
fa4841 |
CHAR LibraryPath[PATHCCH_MAX_CCH];
|
|
Packit Service |
fa4841 |
PCHAR p;
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
if (!GetModuleFileNameA(NULL, LibraryPath, PATHCCH_MAX_CCH))
|
|
Packit Service |
fa4841 |
{
|
|
Packit Service |
fa4841 |
printf("%s: GetModuleFilenameA failed: 0x%08" PRIX32 "\n", __FUNCTION__, GetLastError());
|
|
Packit Service |
fa4841 |
return -1;
|
|
Packit Service |
fa4841 |
}
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
/* PathCchRemoveFileSpec is not implemented in WinPR */
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
if (!(p = strrchr(LibraryPath, PathGetSeparatorA(PATH_STYLE_NATIVE))))
|
|
Packit Service |
fa4841 |
{
|
|
Packit Service |
fa4841 |
printf("%s: Error identifying module directory path\n", __FUNCTION__);
|
|
Packit Service |
fa4841 |
return -1;
|
|
Packit Service |
fa4841 |
}
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
*p = 0;
|
|
Packit Service |
fa4841 |
NativePathCchAppendA(LibraryPath, PATHCCH_MAX_CCH, "TestLibraryA");
|
|
Packit Service |
fa4841 |
SharedLibraryExtension = PathGetSharedLibraryExtensionA(PATH_SHARED_LIB_EXT_WITH_DOT);
|
|
Packit Service |
fa4841 |
NativePathCchAddExtensionA(LibraryPath, PATHCCH_MAX_CCH, SharedLibraryExtension);
|
|
Packit Service |
fa4841 |
printf("%s: Loading Library: '%s'\n", __FUNCTION__, LibraryPath);
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
if (!(library = LoadLibraryA(LibraryPath)))
|
|
Packit Service |
fa4841 |
{
|
|
Packit Service |
fa4841 |
printf("%s: LoadLibraryA failure: 0x%08" PRIX32 "\n", __FUNCTION__, GetLastError());
|
|
Packit Service |
fa4841 |
return -1;
|
|
Packit Service |
fa4841 |
}
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
if (!(pFunctionA = (TEST_AB_FN)GetProcAddress(library, "FunctionA")))
|
|
Packit Service |
fa4841 |
{
|
|
Packit Service |
fa4841 |
printf("%s: GetProcAddress failure (FunctionA)\n", __FUNCTION__);
|
|
Packit Service |
fa4841 |
return -1;
|
|
Packit Service |
fa4841 |
}
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
if (!(pFunctionB = (TEST_AB_FN)GetProcAddress(library, "FunctionB")))
|
|
Packit Service |
fa4841 |
{
|
|
Packit Service |
fa4841 |
printf("%s: GetProcAddress failure (FunctionB)\n", __FUNCTION__);
|
|
Packit Service |
fa4841 |
return -1;
|
|
Packit Service |
fa4841 |
}
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
a = 2;
|
|
Packit Service |
fa4841 |
b = 3;
|
|
Packit Service |
fa4841 |
c = pFunctionA(a, b); /* LibraryA / FunctionA multiplies a and b */
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
if (c != (a * b))
|
|
Packit Service |
fa4841 |
{
|
|
Packit Service |
fa4841 |
printf("%s: pFunctionA call failed\n", __FUNCTION__);
|
|
Packit Service |
fa4841 |
return -1;
|
|
Packit Service |
fa4841 |
}
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
a = 10;
|
|
Packit Service |
fa4841 |
b = 5;
|
|
Packit Service |
fa4841 |
c = pFunctionB(a, b); /* LibraryA / FunctionB divides a by b */
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
if (c != (a / b))
|
|
Packit Service |
fa4841 |
{
|
|
Packit Service |
fa4841 |
printf("%s: pFunctionB call failed\n", __FUNCTION__);
|
|
Packit Service |
fa4841 |
return -1;
|
|
Packit Service |
fa4841 |
}
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
if (!FreeLibrary(library))
|
|
Packit Service |
fa4841 |
{
|
|
Packit Service |
fa4841 |
printf("%s: FreeLibrary failure: 0x%08" PRIX32 "\n", __FUNCTION__, GetLastError());
|
|
Packit Service |
fa4841 |
return -1;
|
|
Packit Service |
fa4841 |
}
|
|
Packit Service |
fa4841 |
|
|
Packit Service |
fa4841 |
return 0;
|
|
Packit Service |
fa4841 |
}
|