forked from enlightenment/efl
parent
42e460e3b6
commit
528b69105f
|
@ -2,3 +2,6 @@
|
||||||
|
|
||||||
1.0.0 release
|
1.0.0 release
|
||||||
|
|
||||||
|
2011-05-12 Carsten Haitzler (The Rasterman)
|
||||||
|
|
||||||
|
* Make embryo_cc use eina and eina_prefix to determine include location
|
||||||
|
|
|
@ -106,6 +106,7 @@ case "$host_os" in
|
||||||
esac
|
esac
|
||||||
AC_SUBST(EFL_EMBRYO_BUILD)
|
AC_SUBST(EFL_EMBRYO_BUILD)
|
||||||
|
|
||||||
|
PKG_CHECK_MODULES([EINA], [eina >= 1.0.999])
|
||||||
|
|
||||||
### Checks for header files
|
### Checks for header files
|
||||||
|
|
||||||
|
|
|
@ -9,6 +9,7 @@ AM_CPPFLAGS = \
|
||||||
-DPACKAGE_BIN_DIR=\"$(bindir)\" \
|
-DPACKAGE_BIN_DIR=\"$(bindir)\" \
|
||||||
-DPACKAGE_LIB_DIR=\"$(libdir)\" \
|
-DPACKAGE_LIB_DIR=\"$(libdir)\" \
|
||||||
-DPACKAGE_DATA_DIR=\"$(datadir)/$(PACKAGE)\" \
|
-DPACKAGE_DATA_DIR=\"$(datadir)/$(PACKAGE)\" \
|
||||||
|
@EINA_CFLAGS@ \
|
||||||
@EVIL_CFLAGS@
|
@EVIL_CFLAGS@
|
||||||
|
|
||||||
bin_PROGRAMS = @EMBRYO_CC_PRG@
|
bin_PROGRAMS = @EMBRYO_CC_PRG@
|
||||||
|
@ -31,7 +32,7 @@ embryo_cc_prefix.c \
|
||||||
embryo_cc_prefix.h
|
embryo_cc_prefix.h
|
||||||
|
|
||||||
embryo_cc_CFLAGS = @EMBRYO_CFLAGS@
|
embryo_cc_CFLAGS = @EMBRYO_CFLAGS@
|
||||||
embryo_cc_LDADD = $(top_builddir)/src/lib/libembryo.la @EVIL_LIBS@ -lm
|
embryo_cc_LDADD = $(top_builddir)/src/lib/libembryo.la @EVIL_LIBS@ @EINA_LIBS@ -lm
|
||||||
embryo_cc_LDFLAGS = @lt_enable_auto_import@
|
embryo_cc_LDFLAGS = @lt_enable_auto_import@
|
||||||
|
|
||||||
EXTRA_DIST = \
|
EXTRA_DIST = \
|
||||||
|
|
|
@ -29,447 +29,58 @@
|
||||||
# include <glob.h>
|
# include <glob.h>
|
||||||
#endif /* ! HAVE_EVIL */
|
#endif /* ! HAVE_EVIL */
|
||||||
|
|
||||||
#ifdef __MacOSX__
|
#include <Eina.h>
|
||||||
# include <mach-o/dyld.h>
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#include "embryo_cc_prefix.h"
|
#include "embryo_cc_prefix.h"
|
||||||
|
|
||||||
/* local subsystem functions */
|
/* local subsystem functions */
|
||||||
static int _e_prefix_share_hunt(void);
|
|
||||||
static int _e_prefix_fallbacks(void);
|
|
||||||
static int _e_prefix_try_proc(void);
|
|
||||||
static int _e_prefix_try_argv(char *argv0);
|
|
||||||
#ifdef __MacOSX__
|
|
||||||
static int _e_prefix_try_dyld(void);
|
|
||||||
#endif
|
|
||||||
|
|
||||||
/* local subsystem globals */
|
/* local subsystem globals */
|
||||||
static char *_exe_path = NULL;
|
|
||||||
static char *_prefix_path = NULL;
|
|
||||||
static char *_prefix_path_bin = NULL;
|
|
||||||
static char *_prefix_path_data = NULL;
|
|
||||||
static char *_prefix_path_lib = NULL;
|
|
||||||
|
|
||||||
#define E_FREE(p) { if (p) {free(p); p = NULL;} }
|
static Eina_Prefix *pfx = NULL;
|
||||||
|
|
||||||
/*#define PREFIX_CACHE_FILE 1*/
|
|
||||||
#define SHARE_D "share/embryo"
|
|
||||||
#define MAGIC_FILE "include/default.inc"
|
|
||||||
#define MAGIC_DAT SHARE_D"/"MAGIC_FILE
|
|
||||||
|
|
||||||
/* externally accessible functions */
|
/* externally accessible functions */
|
||||||
int
|
int
|
||||||
e_prefix_determine(char *argv0)
|
e_prefix_determine(char *argv0)
|
||||||
{
|
{
|
||||||
char *p, buf[4096];
|
if (pfx) return 1;
|
||||||
struct stat st;
|
pfx = eina_prefix_new(argv0, e_prefix_determine,
|
||||||
|
"EMBRYO", "embryo", "include/default.inc",
|
||||||
e_prefix_shutdown();
|
PACKAGE_BIN_DIR,
|
||||||
|
PACKAGE_LIB_DIR,
|
||||||
/* if user provides E_PREFIX - then use that or also more specific sub
|
PACKAGE_DATA_DIR,
|
||||||
* dirs for bin, lib, data and locale */
|
PACKAGE_DATA_DIR);
|
||||||
if (getenv("EMBRYO_PREFIX"))
|
if (!pfx) return 0;
|
||||||
{
|
|
||||||
_prefix_path = strdup(getenv("EMBRYO_PREFIX"));
|
|
||||||
if (getenv("EMBRYO_BIN_DIR"))
|
|
||||||
snprintf(buf, sizeof(buf), "%s/bin", getenv("EMBRYO_BIN_DIR"));
|
|
||||||
else
|
|
||||||
snprintf(buf, sizeof(buf), "%s/bin", _prefix_path);
|
|
||||||
_prefix_path_bin = strdup(buf);
|
|
||||||
|
|
||||||
if (getenv("EMBRYO_LIB_DIR"))
|
|
||||||
snprintf(buf, sizeof(buf), "%s/lib", getenv("EMBRYO_LIB_DIR"));
|
|
||||||
else
|
|
||||||
snprintf(buf, sizeof(buf), "%s/lib", _prefix_path);
|
|
||||||
_prefix_path_lib = strdup(buf);
|
|
||||||
|
|
||||||
if (getenv("EMBRYO_DATA_DIR"))
|
|
||||||
snprintf(buf, sizeof(buf), "%s/"SHARE_D, getenv("EMBRYO_DATA_DIR"));
|
|
||||||
else
|
|
||||||
snprintf(buf, sizeof(buf), "%s/"SHARE_D, _prefix_path);
|
|
||||||
_prefix_path_data = strdup(buf);
|
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
/* no env var - examine process and possible argv0 */
|
|
||||||
if (!_e_prefix_try_proc())
|
|
||||||
{
|
|
||||||
if (!_e_prefix_try_argv(argv0))
|
|
||||||
{
|
|
||||||
#ifdef __MacOSX__
|
|
||||||
if (!_e_prefix_try_dyld())
|
|
||||||
{
|
|
||||||
#endif
|
|
||||||
_e_prefix_fallbacks();
|
|
||||||
return 0;
|
|
||||||
#ifdef __MacOSX__
|
|
||||||
}
|
|
||||||
#endif
|
|
||||||
|
|
||||||
}
|
|
||||||
}
|
|
||||||
/* _exe_path is now a full absolute path TO this exe - figure out rest */
|
|
||||||
/* if
|
|
||||||
* exe = /blah/whatever/bin/exe
|
|
||||||
* then
|
|
||||||
* prefix = /blah/whatever
|
|
||||||
* bin_dir = /blah/whatever/bin
|
|
||||||
* data_dir = /blah/whatever/share/enlightenment
|
|
||||||
* lib_dir = /blah/whatever/lib
|
|
||||||
*/
|
|
||||||
p = strrchr(_exe_path, '/');
|
|
||||||
if (p)
|
|
||||||
{
|
|
||||||
p--;
|
|
||||||
while (p >= _exe_path)
|
|
||||||
{
|
|
||||||
if (*p == '/')
|
|
||||||
{
|
|
||||||
_prefix_path = malloc(p - _exe_path + 1);
|
|
||||||
if (_prefix_path)
|
|
||||||
{
|
|
||||||
strncpy(_prefix_path, _exe_path, p - _exe_path);
|
|
||||||
_prefix_path[p - _exe_path] = 0;
|
|
||||||
|
|
||||||
/* bin and lib always together */
|
|
||||||
snprintf(buf, sizeof(buf), "%s/bin", _prefix_path);
|
|
||||||
_prefix_path_bin = strdup(buf);
|
|
||||||
snprintf(buf, sizeof(buf), "%s/lib", _prefix_path);
|
|
||||||
_prefix_path_lib = strdup(buf);
|
|
||||||
|
|
||||||
/* check if AUTHORS file is there - then our guess is right */
|
|
||||||
snprintf(buf, sizeof(buf), "%s/"MAGIC_DAT, _prefix_path);
|
|
||||||
if (stat(buf, &st) == 0)
|
|
||||||
{
|
|
||||||
snprintf(buf, sizeof(buf), "%s/"SHARE_D, _prefix_path);
|
|
||||||
_prefix_path_data = strdup(buf);
|
|
||||||
}
|
|
||||||
/* AUTHORS file not there. time to start hunting! */
|
|
||||||
else
|
|
||||||
{
|
|
||||||
if (_e_prefix_share_hunt())
|
|
||||||
{
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
e_prefix_fallback();
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
e_prefix_fallback();
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
p--;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
e_prefix_fallback();
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
void
|
||||||
e_prefix_shutdown(void)
|
e_prefix_shutdown(void)
|
||||||
{
|
{
|
||||||
E_FREE(_exe_path);
|
eina_prefix_free(pfx);
|
||||||
E_FREE(_prefix_path);
|
pfx = NULL;
|
||||||
E_FREE(_prefix_path_bin);
|
|
||||||
E_FREE(_prefix_path_data);
|
|
||||||
E_FREE(_prefix_path_lib);
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
|
||||||
e_prefix_fallback(void)
|
|
||||||
{
|
|
||||||
e_prefix_shutdown();
|
|
||||||
_e_prefix_fallbacks();
|
|
||||||
}
|
}
|
||||||
|
|
||||||
const char *
|
const char *
|
||||||
e_prefix_get(void)
|
e_prefix_get(void)
|
||||||
{
|
{
|
||||||
return _prefix_path;
|
return eina_prefix_get(pfx);
|
||||||
}
|
}
|
||||||
|
|
||||||
const char *
|
const char *
|
||||||
e_prefix_bin_get(void)
|
e_prefix_bin_get(void)
|
||||||
{
|
{
|
||||||
return _prefix_path_bin;
|
return eina_prefix_bin_get(pfx);
|
||||||
}
|
}
|
||||||
|
|
||||||
const char *
|
const char *
|
||||||
e_prefix_data_get(void)
|
e_prefix_data_get(void)
|
||||||
{
|
{
|
||||||
return _prefix_path_data;
|
return eina_prefix_data_get(pfx);
|
||||||
}
|
}
|
||||||
|
|
||||||
const char *
|
const char *
|
||||||
e_prefix_lib_get(void)
|
e_prefix_lib_get(void)
|
||||||
{
|
{
|
||||||
return _prefix_path_lib;
|
return eina_prefix_lib_get(pfx);
|
||||||
}
|
|
||||||
|
|
||||||
/* local subsystem functions */
|
|
||||||
static int
|
|
||||||
_e_prefix_share_hunt(void)
|
|
||||||
{
|
|
||||||
char buf[4096], buf2[4096], *p;
|
|
||||||
struct stat st;
|
|
||||||
|
|
||||||
/* sometimes this isn't the case - so we need to do a more exhaustive search
|
|
||||||
* through more parent and subdirs. hre is an example i have seen:
|
|
||||||
*
|
|
||||||
* /blah/whatever/exec/bin/exe
|
|
||||||
* ->
|
|
||||||
* /blah/whatever/exec/bin
|
|
||||||
* /blah/whatever/common/share/enlightenment
|
|
||||||
* /blah/whatever/exec/lib
|
|
||||||
*/
|
|
||||||
|
|
||||||
/* this is pure black magic to try and find data shares */
|
|
||||||
/* 2. cache file doesn't exist or is invalid - we need to search - this is
|
|
||||||
* where the real black magic begins */
|
|
||||||
|
|
||||||
/* BLACK MAGIC 1:
|
|
||||||
* /blah/whatever/dir1/bin
|
|
||||||
* /blah/whatever/dir2/share/enlightenment
|
|
||||||
*/
|
|
||||||
if (!_prefix_path_data)
|
|
||||||
{
|
|
||||||
DIR *dirp;
|
|
||||||
struct dirent *dp;
|
|
||||||
|
|
||||||
snprintf(buf, sizeof(buf), "%s", _prefix_path);
|
|
||||||
p = strrchr(buf, '/');
|
|
||||||
if (p) *p = 0;
|
|
||||||
dirp = opendir(buf);
|
|
||||||
if (dirp)
|
|
||||||
{
|
|
||||||
char *file;
|
|
||||||
|
|
||||||
while ((dp = readdir(dirp)))
|
|
||||||
{
|
|
||||||
if ((strcmp(dp->d_name, ".")) && (strcmp(dp->d_name, "..")))
|
|
||||||
{
|
|
||||||
file = dp->d_name;
|
|
||||||
snprintf(buf2, sizeof(buf2), "%s/%s/"MAGIC_DAT, buf, file);
|
|
||||||
if (stat(buf2, &st) == 0)
|
|
||||||
{
|
|
||||||
snprintf(buf2, sizeof(buf2), "%s/%s/"SHARE_D, buf, file);
|
|
||||||
_prefix_path_data = strdup(buf2);
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
closedir(dirp);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* BLACK MAGIC 2:
|
|
||||||
* /blah/whatever/dir1/bin
|
|
||||||
* /blah/whatever/share/enlightenment
|
|
||||||
*/
|
|
||||||
if (!_prefix_path_data)
|
|
||||||
{
|
|
||||||
snprintf(buf, sizeof(buf), "%s", _prefix_path);
|
|
||||||
p = strrchr(buf, '/');
|
|
||||||
if (p) *p = 0;
|
|
||||||
snprintf(buf2, sizeof(buf2), "%s/"MAGIC_DAT, buf);
|
|
||||||
if (stat(buf, &st) == 0)
|
|
||||||
{
|
|
||||||
snprintf(buf2, sizeof(buf2), "%s/"SHARE_D, buf);
|
|
||||||
_prefix_path_data = strdup(buf2);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* add more black magic as required as we discover weridnesss - remember
|
|
||||||
* this is to save users having to set environment variables to tell
|
|
||||||
* e where it lives, so e auto-adapts. so these code snippets are just
|
|
||||||
* logic to figure that out for the user
|
|
||||||
*/
|
|
||||||
|
|
||||||
/* done. we found it - write cache file */
|
|
||||||
if (_prefix_path_data)
|
|
||||||
{
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
/* fail. everything failed */
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int
|
|
||||||
_e_prefix_fallbacks(void)
|
|
||||||
{
|
|
||||||
char *p;
|
|
||||||
|
|
||||||
_prefix_path = strdup(PACKAGE_BIN_DIR);
|
|
||||||
p = strrchr(_prefix_path, '/');
|
|
||||||
if (p) *p = 0;
|
|
||||||
_prefix_path_bin = strdup(PACKAGE_BIN_DIR);
|
|
||||||
_prefix_path_data = strdup(PACKAGE_DATA_DIR);
|
|
||||||
_prefix_path_lib = strdup(PACKAGE_LIB_DIR);
|
|
||||||
printf("WARNING: Embryo could not determine its installed prefix\n"
|
|
||||||
" and is falling back on the compiled in default:\n"
|
|
||||||
" %s\n"
|
|
||||||
" You might like to try setting the following environment variables:\n"
|
|
||||||
" EMBRYO_PREFIX - points to the base prefix of install\n"
|
|
||||||
" EMBRYO_BIN_DIR - optional in addition to E_PREFIX to provide\n"
|
|
||||||
" a more specific binary directory\n"
|
|
||||||
" EMBRYO_LIB_DIR - optional in addition to E_PREFIX to provide\n"
|
|
||||||
" a more specific library dir\n"
|
|
||||||
" EMBRYO_DATA_DIR - optional in addition to E_PREFIX to provide\n"
|
|
||||||
" a more specific location for shared data\n"
|
|
||||||
,
|
|
||||||
_prefix_path);
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
#ifdef __MacOSX__
|
|
||||||
static int
|
|
||||||
_e_prefix_try_dyld(void)
|
|
||||||
{
|
|
||||||
char path[PATH_MAX];
|
|
||||||
uint32_t size = sizeof (path);
|
|
||||||
|
|
||||||
if (_NSGetExecutablePath(path, &size) != 0)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
_exe_path = strdup(path);
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
#endif
|
|
||||||
|
|
||||||
static int
|
|
||||||
_e_prefix_try_proc(void)
|
|
||||||
{
|
|
||||||
FILE *f;
|
|
||||||
char buf[4096];
|
|
||||||
void *func = NULL;
|
|
||||||
|
|
||||||
func = (void *)_e_prefix_try_proc;
|
|
||||||
f = fopen("/proc/self/maps", "r");
|
|
||||||
if (!f) return 0;
|
|
||||||
while (fgets(buf, sizeof(buf), f))
|
|
||||||
{
|
|
||||||
int len;
|
|
||||||
char *p, mode[5] = "";
|
|
||||||
unsigned long ptr1 = 0, ptr2 = 0;
|
|
||||||
|
|
||||||
len = strlen(buf);
|
|
||||||
if (buf[len - 1] == '\n')
|
|
||||||
{
|
|
||||||
buf[len - 1] = 0;
|
|
||||||
len--;
|
|
||||||
}
|
|
||||||
if (sscanf(buf, "%lx-%lx %4s", &ptr1, &ptr2, mode) == 3)
|
|
||||||
{
|
|
||||||
if (!strcmp(mode, "r-xp"))
|
|
||||||
{
|
|
||||||
if (((void *)ptr1 <= func) && (func < (void *)ptr2))
|
|
||||||
{
|
|
||||||
p = strchr(buf, '/');
|
|
||||||
if (p)
|
|
||||||
{
|
|
||||||
if (len > 10)
|
|
||||||
{
|
|
||||||
if (!strcmp(buf + len - 10, " (deleted)"))
|
|
||||||
buf[len - 10] = 0;
|
|
||||||
}
|
|
||||||
_exe_path = strdup(p);
|
|
||||||
fclose(f);
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
fclose(f);
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int
|
|
||||||
_e_prefix_try_argv(char *argv0)
|
|
||||||
{
|
|
||||||
char *path, *p, *cp, *s;
|
|
||||||
int len, lenexe;
|
|
||||||
char buf[4096], buf2[4096], buf3[4096];
|
|
||||||
|
|
||||||
/* 1. is argv0 abs path? */
|
|
||||||
if (argv0[0] == '/')
|
|
||||||
{
|
|
||||||
_exe_path = strdup(argv0);
|
|
||||||
if (access(_exe_path, X_OK) == 0) return 1;
|
|
||||||
free(_exe_path);
|
|
||||||
_exe_path = NULL;
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
/* 2. relative path */
|
|
||||||
if (strchr(argv0, '/'))
|
|
||||||
{
|
|
||||||
if (getcwd(buf3, sizeof(buf3)))
|
|
||||||
{
|
|
||||||
snprintf(buf2, sizeof(buf2), "%s/%s", buf3, argv0);
|
|
||||||
if (realpath(buf2, buf))
|
|
||||||
{
|
|
||||||
_exe_path = strdup(buf);
|
|
||||||
if (access(_exe_path, X_OK) == 0) return 1;
|
|
||||||
free(_exe_path);
|
|
||||||
_exe_path = NULL;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
/* 3. argv0 no path - look in PATH */
|
|
||||||
path = getenv("PATH");
|
|
||||||
if (!path) return 0;
|
|
||||||
p = path;
|
|
||||||
cp = p;
|
|
||||||
lenexe = strlen(argv0);
|
|
||||||
while ((p = strchr(cp, ':')))
|
|
||||||
{
|
|
||||||
len = p - cp;
|
|
||||||
s = malloc(len + 1 + lenexe + 1);
|
|
||||||
if (s)
|
|
||||||
{
|
|
||||||
strncpy(s, cp, len);
|
|
||||||
s[len] = '/';
|
|
||||||
strcpy(s + len + 1, argv0);
|
|
||||||
if (realpath(s, buf))
|
|
||||||
{
|
|
||||||
if (access(buf, X_OK) == 0)
|
|
||||||
{
|
|
||||||
_exe_path = strdup(buf);
|
|
||||||
free(s);
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
free(s);
|
|
||||||
}
|
|
||||||
cp = p + 1;
|
|
||||||
}
|
|
||||||
len = strlen(cp);
|
|
||||||
s = malloc(len + 1 + lenexe + 1);
|
|
||||||
if (s)
|
|
||||||
{
|
|
||||||
strncpy(s, cp, len);
|
|
||||||
s[len] = '/';
|
|
||||||
strcpy(s + len + 1, argv0);
|
|
||||||
if (realpath(s, buf))
|
|
||||||
{
|
|
||||||
if (access(buf, X_OK) == 0)
|
|
||||||
{
|
|
||||||
_exe_path = strdup(buf);
|
|
||||||
free(s);
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
free(s);
|
|
||||||
}
|
|
||||||
/* 4. big problems. arg[0] != executable - weird execution */
|
|
||||||
return 0;
|
|
||||||
}
|
}
|
||||||
|
|
|
@ -1,6 +1,5 @@
|
||||||
int e_prefix_determine(char *argv0);
|
int e_prefix_determine(char *argv0);
|
||||||
void e_prefix_shutdown(void);
|
void e_prefix_shutdown(void);
|
||||||
void e_prefix_fallback(void);
|
|
||||||
const char *e_prefix_get(void);
|
const char *e_prefix_get(void);
|
||||||
const char *e_prefix_bin_get(void);
|
const char *e_prefix_bin_get(void);
|
||||||
const char *e_prefix_data_get(void);
|
const char *e_prefix_data_get(void);
|
||||||
|
|
|
@ -119,31 +119,7 @@ static char binfname[PATH_MAX]; /* binary file name */
|
||||||
int
|
int
|
||||||
main(int argc, char *argv[], char *env[] __UNUSED__)
|
main(int argc, char *argv[], char *env[] __UNUSED__)
|
||||||
{
|
{
|
||||||
char argv0[PATH_MAX];
|
e_prefix_determine(argv[0]);
|
||||||
int i;
|
|
||||||
|
|
||||||
snprintf(argv0, sizeof(argv0), "%s", argv[0]);
|
|
||||||
/* Linux stores the name of the program in argv[0], but not the path.
|
|
||||||
* To adjust this, I store a string with the path in argv[0]. To do
|
|
||||||
* so, I try to get the current path with getcwd(), and if that fails
|
|
||||||
* I search for the PWD= setting in the environment.
|
|
||||||
*/
|
|
||||||
if (getcwd(argv0, PATH_MAX))
|
|
||||||
{
|
|
||||||
i = strlen(argv0);
|
|
||||||
snprintf(argv0 + i, sizeof(argv0) - i, "/%s", argv[0]);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
char *pwd = getenv("PWD");
|
|
||||||
|
|
||||||
if (pwd)
|
|
||||||
snprintf(argv0, sizeof(argv0), "%s/%s", pwd, argv[0]);
|
|
||||||
} /* if */
|
|
||||||
argv[0] = argv0; /* set location to new first parameter */
|
|
||||||
|
|
||||||
e_prefix_determine(argv0);
|
|
||||||
|
|
||||||
return sc_compile(argc, argv);
|
return sc_compile(argc, argv);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue