src/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 <config.h>
   6
   7 #include "poptalloca.h"
   8
   9 #include <stdio.h>
  10 #include <stdlib.h>
  11 #include <string.h>
  12 #include <unistd.h>
  13
  14 #ifdef __NeXT
  15 /* access macros are not declared in non posix mode in unistd.h -
  16  don't try to use posix on NeXTstep 3.3 ! */
  17 #include <libc.h>
  18 #endif
  19
  20 #include "findme.h"
  21
  22 const char * findProgramPath(const char * argv0) {
  23     char * path = getenv("PATH");
  24     char * pathbuf;
  25     char * start, * chptr;
  26     char * buf;
  27
  28     /* If there is a / in the argv[0], it has to be an absolute
  29        path */
  30     if (strchr(argv0, '/'))
  31         return strdup(argv0);
  32
  33     if (!path) return NULL;
  34
  35     start = pathbuf = alloca(strlen(path) + 1);
  36     buf = malloc(strlen(path) + strlen(argv0) + 2);
  37     strcpy(pathbuf, path);
  38
  39     chptr = NULL;
  40     do {
  41         if ((chptr = strchr(start, ':')))
  42             *chptr = '\0';
  43         sprintf(buf, "%s/%s", start, argv0);
  44
  45         if (!access(buf, X_OK))
  46             return buf;
  47
  48         if (chptr)
  49             start = chptr + 1;
  50         else
  51             start = NULL;
  52     } while (start && *start);
  53
  54     free(buf);
  55
  56     return NULL;
  57 }