1 /* mktemp.c 4.1 83/06/22 */ 2 3 char * 4 mktemp(as) 5 char *as; 6 { 7 register char *s; 8 register unsigned pid; 9 register i; 10 11 pid = getpid(); 12 s = as; 13 while (*s++) 14 ; 15 s--; 16 while (*--s == 'X') { 17 *s = (pid%10) + '0'; 18 pid /= 10; 19 } 20 s++; 21 i = 'a'; 22 while (access(as, 0) != -1) { 23 if (i=='z') 24 return("/"); 25 *s = i++; 26 } 27 return(as); 28 } 29