source/popt/findme.c

   1 /* (C) 1998 Red Hat Software, Inc. -- Licensing details are in the COPYING
   2    file accompanying popt source distributions, available from
   3    ftp://ftp.redhat.com/pub/code/popt */
   4
   5 #include "system.h"
   6 #include "findme.h"
   7
   8 const char * findProgramPath(const char * argv0) {
   9     char * path = getenv("PATH");
  10     char * pathbuf;
  11     char * start, * chptr;
  12     char * buf, *local = NULL;
  13
  14     /* If there is a / in the argv[0], it has to be an absolute
  15        path */
  16     if (strchr(argv0, '/'))
  17         return xstrdup(argv0);
  18
  19     if (!path) return NULL;
  20
  21     local = start = pathbuf = malloc(strlen(path) + 1);
  22     buf = malloc(strlen(path) + strlen(argv0) + 2);
  23     strcpy(pathbuf, path);
  24
  25     chptr = NULL;
  26     do {
  27         if ((chptr = strchr(start, ':')))
  28             *chptr = '\0';
  29         sprintf(buf, "%s/%s", start, argv0);
  30
  31         if (!access(buf, X_OK)) {
  32                 if (local) free(local);
  33                 return buf;
  34         }
  35
  36         if (chptr)
  37             start = chptr + 1;
  38         else
  39             start = NULL;
  40     } while (start && *start);
  41
  42     free(buf);
  43     if (local) free(local);
  44
  45     return NULL;
  46 }