forked from old/legacy-imlib2
181 lines
3.4 KiB
C
181 lines
3.4 KiB
C
#include "common.h"
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#include "file.h"
|
|
#include "strutils.h"
|
|
|
|
static const char *
|
|
__imlib_PathToModules(void)
|
|
{
|
|
#if 0
|
|
static const char *path = NULL;
|
|
|
|
if (path)
|
|
return path;
|
|
|
|
path = getenv("IMLIB2_MODULE_PATH");
|
|
if (path && __imlib_FileIsDir(path))
|
|
return path;
|
|
#endif
|
|
|
|
return PACKAGE_LIB_DIR "/imlib2";
|
|
}
|
|
|
|
static char **
|
|
_module_paths(const char *env, const char *mdir)
|
|
{
|
|
char **ppaths, **pp;
|
|
const char *penv;
|
|
char buf[1024];
|
|
|
|
penv = getenv(env);
|
|
if (penv)
|
|
{
|
|
ppaths = __imlib_StrSplit(penv, ':');
|
|
if (!ppaths)
|
|
goto done;
|
|
for (pp = ppaths; *pp; pp++)
|
|
{
|
|
if (strcmp(*pp, "*") == 0)
|
|
{
|
|
/* Substitute default path */
|
|
free(*pp);
|
|
snprintf(buf, sizeof(buf), "%s/%s",
|
|
__imlib_PathToModules(), mdir);
|
|
*pp = strdup(buf);
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
/* Use default path */
|
|
ppaths = malloc(2 * sizeof(char *));
|
|
if (!ppaths)
|
|
goto done;
|
|
snprintf(buf, sizeof(buf), "%s/%s", __imlib_PathToModules(), mdir);
|
|
ppaths[0] = strdup(buf);
|
|
ppaths[1] = NULL;
|
|
}
|
|
|
|
done:
|
|
return ppaths;
|
|
}
|
|
|
|
char **
|
|
__imlib_PathToFilters(void)
|
|
{
|
|
static char **ppaths = NULL;
|
|
|
|
if (ppaths)
|
|
return ppaths;
|
|
|
|
ppaths = _module_paths("IMLIB2_FILTER_PATH", "filters");
|
|
|
|
return ppaths;
|
|
}
|
|
|
|
char **
|
|
__imlib_PathToLoaders(void)
|
|
{
|
|
static char **ppaths = NULL;
|
|
|
|
if (ppaths)
|
|
return ppaths;
|
|
|
|
ppaths = _module_paths("IMLIB2_LOADER_PATH", "loaders");
|
|
|
|
return ppaths;
|
|
}
|
|
|
|
static bool
|
|
_file_is_module(const char *name)
|
|
{
|
|
const char *ext;
|
|
|
|
ext = strrchr(name, '.');
|
|
if (!ext)
|
|
return false;
|
|
|
|
if (
|
|
#ifdef __CYGWIN__
|
|
strcasecmp(ext, ".dll") != 0 &&
|
|
#endif
|
|
strcasecmp(ext, ".so") != 0)
|
|
return false;
|
|
|
|
return true;
|
|
}
|
|
|
|
char **
|
|
__imlib_ModulesList(char **ppath, int *num_ret)
|
|
{
|
|
char **pp, **list, **l;
|
|
char file[1024], *p;
|
|
int num, i, ntot;
|
|
|
|
*num_ret = 0;
|
|
list = NULL;
|
|
|
|
if (!ppath)
|
|
goto done;
|
|
|
|
ntot = 0;
|
|
|
|
for (pp = ppath; *pp; pp++)
|
|
{
|
|
l = __imlib_FileDir(*pp, &num);
|
|
if (!l)
|
|
continue;
|
|
if (num <= 0)
|
|
continue;
|
|
|
|
list = realloc(list, (ntot + num) * sizeof(char *));
|
|
if (list)
|
|
{
|
|
for (i = 0; i < num; i++)
|
|
{
|
|
if (!_file_is_module(l[i]))
|
|
continue;
|
|
snprintf(file, sizeof(file), "%s/%s", *pp, l[i]);
|
|
p = strdup(file);
|
|
if (p)
|
|
list[ntot++] = p;
|
|
}
|
|
}
|
|
__imlib_FileFreeDirList(l, num);
|
|
if (!list)
|
|
goto done;
|
|
}
|
|
|
|
*num_ret = ntot;
|
|
|
|
done:
|
|
return list;
|
|
}
|
|
|
|
char *
|
|
__imlib_ModuleFind(char **ppath, const char *name)
|
|
{
|
|
int n;
|
|
char **pp;
|
|
char nbuf[4096];
|
|
|
|
if (!ppath)
|
|
return NULL;
|
|
|
|
for (pp = ppath; *pp; pp++)
|
|
{
|
|
n = snprintf(nbuf, sizeof(nbuf), "%s/%s.so", *pp, name);
|
|
|
|
if (n < 0 || n >= (int)sizeof(nbuf) || !__imlib_FileIsFile(nbuf))
|
|
continue;
|
|
|
|
return strdup(nbuf);
|
|
}
|
|
|
|
return NULL;
|
|
}
|