efl/legacy/ecore/src/lib/ecore_file/ecore_file_path.c

/*
 * vim:ts=8:sw=3:sts=8:noexpandtab:cino=>5n-3f0^-2{2
 */
#include "ecore_file_private.h"
#include <ctype.h>

static int init = 0;
static Ecore_List *__ecore_file_path_bin;

static Ecore_List *_ecore_file_path_from_env(const char *env);

int
ecore_file_path_init(void)
{
   if (++init != 1) return init;
   __ecore_file_path_bin = _ecore_file_path_from_env("PATH");
   return init;
}

int
ecore_file_path_shutdown(void)
{
   if (--init != 0) return init;
   ecore_list_destroy(__ecore_file_path_bin);
   return init;
}

Ecore_List *
_ecore_file_path_from_env(const char *env)
{
   Ecore_List *path;
   char *env_path, *p, *last;

   path = ecore_list_new();

   env_path = getenv(env);
   if (!env_path)
     return path;

   env_path = strdup(env_path);
   last = env_path;
   for (p = env_path; *p; p++)
     {
        if (*p == ':')
          *p = '\0';

        if (!*p)
          {
             ecore_list_append(path, strdup(last));
             last = p+1;
          }

     }
   if (p > last)
     ecore_list_append(path, last);

   free(env_path);
   return path;
}

int
ecore_file_app_installed(const char *app)
{
   char *dir;
   char  buf[PATH_MAX];
   char *file, *p;

   if (!app) return 0;
   if (ecore_file_exists(app) && ecore_file_can_exec(app)) return 1;

   ecore_list_goto_first(__ecore_file_path_bin);
   while ((dir = ecore_list_next(__ecore_file_path_bin)) != NULL)
     {
	snprintf(buf, sizeof(buf), "%s/%s", dir, app);
	if (ecore_file_exists(buf) && ecore_file_can_exec(buf))
	  return 1;
     }

   /* Maybe the app has arguments */
   file = strdup(app);
   if (!file) return 0;
   while ((*file) && isspace(*file))
     file++;

   p = file;
   while ((*p) && !isspace(*p))
     p++;
   if ((*file) && (*p))
     {
	*p = '\0';
	if (ecore_file_exists(file) && ecore_file_can_exec(file)) return 1;
	ecore_list_goto_first(__ecore_file_path_bin);
	while ((dir = ecore_list_next(__ecore_file_path_bin)) != NULL)
	  {
	     snprintf(buf, sizeof(buf), "%s/%s", dir, file);
	     if (ecore_file_exists(buf) && ecore_file_can_exec(buf))
	       {
		  free(file);
		  return 1;
	       }
	  }
     }
   free(file);

   return 0;
}