BSD 4_3_Tahoe release

[unix-history] / usr / src / new / dsh / src / getpath.c

/*(@(#)getpath.c        1.2             /ra/csr/presotto/hacks/src/worm/sccs/s.getpath.c)*/
#define MAXPATHS 20
#define MAXPATHSIZE 100

int             npaths;                 /* number of paths to search */
char            *paths[MAXPATHS];       /* pointers to the paths */
char            thepath[256];           /* where to copy path */

/*
*      input the execution search path
*/
getpath ()
{
   char        *path;

   path = (char *)getenv ("PATH");
   strcpy (thepath, path);
   path = thepath;
   for (npaths = 0; npaths < MAXPATHS; npaths++) {
       paths[npaths] = path;
       while (*path != ':' && *path != 0) path++;
       if (*path == 0) {
           npaths++;
           break;
       } else {
           *path++ = 0;
       }
   }
}

/*
*      see if we can execute a command
*/
findcmd (path)
char    *path;                  /* path to the command */
{
   char        abspath[MAXPATHSIZE];
   int         rv;                     /* return value */
   int         indp;                   /* path index */

   if (*path == 0)
       return (0);

   if (*path == '/') {
       
       /* absolute path,  don't fool around */
       rv = access(path, 1);
   } else {

       /* relative path,  do some work */
       for (indp = 0; indp < npaths; indp++) {
           strcpy (abspath, paths[indp]);
           strcat (abspath, "/");
           strcat (abspath, path);
           rv = access(abspath, 1);
           if (rv == 0)
               break;
       }
   }

   return (rv);
}