1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
|
/* -*- Mode: C; tab-width: 4; c-basic-offset: 4; indent-tabs-mode: nil -*- */
#include <stdio.h>
#include <windows.h>
#include <dlfcn.h>
#include <stdbool.h>
/*
* Keep track if the user tried to call dlopen(NULL, xx) to be able to give a sane
* error message
*/
static bool self = false;
void* dlopen(const char* path, int mode) {
if (path == NULL) {
// We don't support opening ourself
self = true;
return NULL;
}
void* handle = LoadLibrary(path);
if (handle == NULL) {
char *buf = malloc(strlen(path) + 20);
sprintf(buf, "%s.dll", path);
handle = LoadLibrary(buf);
free(buf);
}
return handle;
}
void* dlsym(void* handle, const char* symbol) {
return GetProcAddress(handle, symbol);
}
int dlclose(void* handle) {
// dlclose returns zero on success.
// FreeLibrary returns nonzero on success.
return FreeLibrary(handle) != 0;
}
static char dlerror_buf[200];
const char *dlerror(void) {
if (self) {
return "not supported";
}
DWORD err = GetLastError();
LPVOID error_msg;
if (FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER |
FORMAT_MESSAGE_FROM_SYSTEM |
FORMAT_MESSAGE_IGNORE_INSERTS,
NULL, err, 0, (LPTSTR)&error_msg, 0, NULL) != 0) {
strncpy(dlerror_buf, error_msg, sizeof(dlerror_buf));
dlerror_buf[sizeof(dlerror_buf) - 1] = '\0';
LocalFree(error_msg);
} else {
return "Failed to get error message";
}
return dlerror_buf;
}
|
