Return to mktemp.c CVS log

Up to [Research Unix] / researchv9 / libc / gen

researchv9-SUN3(old)

char *
mktemp(as)
char *as;
{
	register char *s;
	register unsigned pid;
	register i;
	extern int errno;
	register int oerrno = errno;

	pid = getpid();
	s = as;
	while (*s++)
		;
	s--;
	while (*--s == 'X') {
		*s = (pid%10) + '0';
		pid /= 10;
	}
	s++;
	i = 'a';
	while (access(as, 0) != -1) {
		if (i=='z')
			return("/");
		*s = i++;
	}
	errno = oerrno;
	return(as);
}

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