/*
 * vim:ts=8:sw=3:sts=8:noexpandtab:cino=>5n-3f0^-2{2
 */
#include "ecore_file_private.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)
{
   int   found;
   char *dir;
   char  buf[PATH_MAX];

   if (!app)
     return 0;

   found = 0;

   if (ecore_list_is_empty(__ecore_file_path_bin))
     return 0;
   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))
	  {
	     found = 1;
	     break;
	  }
     }

   return found;
}
