aboutsummaryrefslogtreecommitdiffstats
path: root/l4sysdep.c
blob: 0806f154f3b5902bea4a33131940b207a0c88603 (plain) (blame)
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
74
75
76
/* vim: set sw=4 ts=4 sts=4 et: */

#include "l4sysdep.h"
#include "l4posix.h"
#include "l4str.h"

#include <errno.h>
#include <stdlib.h>
#include <string.h>
#ifdef __FreeBSD__
# include <sys/sysctl.h>
#endif

char* lbs_sysdep_get_executable (void) {
    char* myexec;

#ifdef __FreeBSD__
    int fb_mib[4] = { CTL_KERN, KERN_PROC, KERN_PROC_PATHNAME, -1 };
    int fb_rval;
    size_t fb_size = 256;
    myexec = malloc (fb_size);
    while ((fb_rval = sysctl (fb_mib, 4, myexec, &fb_size, NULL, 0)) < 0 &&
         errno == ENOMEM) {

        fb_size *= 2;
        myexec = realloc (myexec, fb_size);
    }
    if (fb_rval >= 0) {
        return myexec;
    } else {
        free (myexec);
    }
#endif

    if ((myexec = lbs_posix_readlink ("/proc/self/exe")) != NULL) {
        return myexec;
    }
    if ((myexec = lbs_posix_readlink ("/proc/curproc/exe")) != NULL) {
        return myexec;
    }
    if ((myexec = lbs_posix_readlink ("/proc/curproc/file")) != NULL) {
        return myexec;
    }

    return NULL;
}

char* lbs_sysdep_get_resource (const char* filename) {
    char *myexec, *myres;
    bool myexec_static = false;

    myexec = lbs_sysdep_get_executable ();
    if (myexec == NULL) {
        myexec = lbs_posix_getcwd ();
        if (myexec == NULL) {
            myexec = "./";
            myexec_static = true;
        }
    } else {
        char* dirsep = strrchr (myexec, '/');
        if (dirsep != NULL && dirsep != myexec) {
            *dirsep = '\0';
        }
    }

    if (lbs_str_has_suffix (myexec, "/")) {
        myres = lbs_posix_strcat (myexec, filename, (char*)NULL);
    } else {
        myres = lbs_posix_strcat (myexec, "/", filename, (char*)NULL);
    }
    if (!myexec_static) {
        free (myexec);
    }

    return myres;
}