Return to pathn.c CVS log

Up to [MW Coherent from dump] / coherent / g / usr / lib / misc

coherent

/*
 * find a file on a path in the environment, or a default path
 * with an access priveledge.
 *
 * example: pathn("helpfile", "LIBPATH", ",,\lib", "r");
 *
 * Returns full path name.
 */
#include <stdio.h>
#include <path.h>
#include <unistd.h>

#define PATHSIZE 64

char	*getenv(), *path(), *strchr();

char *
pathn(name, envpath, deflpath, acs)
char *name, *envpath, *deflpath, *acs;
{
	register char *pathptr;

	if ((NULL == envpath) || (NULL == (pathptr = getenv(envpath))))
		pathptr = deflpath;

	if (NULL == strchr(acs, 'w')) {
		if ((pathptr = path(pathptr, name, R_OK)) == NULL)
			return (name);
		else
			return (pathptr);
	}
	else {
		register char *p, c;
		static char fullname[PATHSIZE];

		if ((p = path(pathptr, name, W_OK)) == NULL) {
			for (p = fullname; (c = *pathptr++) && c != LISTSEP;)
				*p++ = c;
			*p++ = PATHSEP;
			strcpy(p, name);
			return (fullname);
		} else
			return (p);
	}
}
#ifdef TEST
#include <misc.h>

main()
{
	char name[80], envpath[80], deflpath[80], acs[80];

	for (;;) {
		ask(name, "file name");
		if ('q' == name[0])
			return(0);
		ask(envpath, "env");
		ask(deflpath, "path");
		ask(acs,  "acs");
		printf("found %s\n", pathn(name, envpath, deflpath, acs));
	}
}
#endif

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.