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
63
64
65
66
67
68
69
70
71
72
73
|
#include "spm.h"
#include "framework.h"
static char *LIBRARY_SEARCH_PATH[] = {
#if OS_DARWIN
"/usr/lib",
"/usr/local/lib",
#elif OS_LINUX
"/lib",
"/usr/lib",
"/usr/local/lib",
"/lib64",
"/usr/lib64",
"/usr/local/lib64",
#endif
NULL,
};
/**
* Find a library based on known library search paths. This cannot handle macos-style `@string` paths, and
* will not follow RPATHs.
* @param name
* @return path to library (or NULL)
*/
static char *find_library(const char *name) {
char *path = NULL;
if (strstr(name, DIRSEPS) != NULL) {
return strdup(name);
}
for (size_t i = 0; LIBRARY_SEARCH_PATH[i] != NULL; i++) {
path = join_ex(DIRSEPS, LIBRARY_SEARCH_PATH[i], name, NULL);
if (path != NULL && exists(path) == 0) {
break;
}
free(path);
path = NULL;
}
return path;
}
struct TestCase testCase[] = {
{.caseValue.sptr = "/bin/sh", .truthValue.signed_int = 0},
{.caseValue.sptr = "/usr/bin/tar", .truthValue.signed_int = 0},
{.caseValue.sptr = "/dev/null", .truthValue.signed_int = -1}, // not an object
{.caseValue.sptr = NULL, .truthValue.signed_int = -1}, // invalid call
};
size_t numCases = sizeof(testCase) / sizeof(struct TestCase);
int main(int argc, char *argv[]) {
for (size_t i = 0; i < numCases; i++) {
StrList *result = shlib_deps(testCase[i].caseValue.sptr);
if (result == NULL && testCase[i].truthValue.signed_int < 0) {
// expected failure
fprintf(stderr, "case %zu: trapped expected failure (ignore any stderr text)\n", i);
continue;
}
myassert(spmerrno == 0, "case %zu: raised unhandled exception %d: %s\n", i, spmerrno, spm_strerror(spmerrno));
myassert(result != NULL, "case %zu: unexpected NULL", i);
for (size_t j = 0; j < strlist_count(result); j++) {
char *item = strlist_item(result, j);
char *libpath = find_library(item);
myassert(libpath != NULL,
"library record found, but does not exist: '%s' (your OS is broken)\n", item);
free(libpath);
}
strlist_free(result);
}
return 0;
}
|
