xref: /onnv-gate/usr/src/lib/libbc/libc/stdio/common/tempnam.c (revision 0:68f95e015346)
1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate  * CDDL HEADER START
3*0Sstevel@tonic-gate  *
4*0Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*0Sstevel@tonic-gate  * with the License.
8*0Sstevel@tonic-gate  *
9*0Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate  * and limitations under the License.
13*0Sstevel@tonic-gate  *
14*0Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate  *
20*0Sstevel@tonic-gate  * CDDL HEADER END
21*0Sstevel@tonic-gate  */
22*0Sstevel@tonic-gate /*
23*0Sstevel@tonic-gate  * Copyright 1993 Sun Microsystems, Inc.  All rights reserved.
24*0Sstevel@tonic-gate  * Use is subject to license terms.
25*0Sstevel@tonic-gate  */
26*0Sstevel@tonic-gate 
27*0Sstevel@tonic-gate /*      Copyright (c) 1984 AT&T */
28*0Sstevel@tonic-gate /*        All Rights Reserved   */
29*0Sstevel@tonic-gate 
30*0Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"  /* from S5R2 1.1 */
31*0Sstevel@tonic-gate 
32*0Sstevel@tonic-gate /*LINTLIBRARY*/
33*0Sstevel@tonic-gate #include <stdio.h>
34*0Sstevel@tonic-gate #include <string.h>
35*0Sstevel@tonic-gate 
36*0Sstevel@tonic-gate #define max(A,B) (((A)<(B))?(B):(A))
37*0Sstevel@tonic-gate 
38*0Sstevel@tonic-gate extern char *malloc(), *getenv(), *mktemp();
39*0Sstevel@tonic-gate extern int access();
40*0Sstevel@tonic-gate 
41*0Sstevel@tonic-gate static char *pcopy();
42*0Sstevel@tonic-gate static char seed[4];
43*0Sstevel@tonic-gate 
44*0Sstevel@tonic-gate char *
tempnam(dir,pfx)45*0Sstevel@tonic-gate tempnam(dir, pfx)
46*0Sstevel@tonic-gate char *dir;		/* use this directory please (if non-NULL) */
47*0Sstevel@tonic-gate char *pfx;		/* use this (if non-NULL) as filename prefix */
48*0Sstevel@tonic-gate {
49*0Sstevel@tonic-gate 	register char *p, *q, *tdir;
50*0Sstevel@tonic-gate 	int x=0, y=0, z;
51*0Sstevel@tonic-gate 
52*0Sstevel@tonic-gate 	if (seed[0] == 0)
53*0Sstevel@tonic-gate 		seed[0] = seed[1] = seed[2] = 'A';
54*0Sstevel@tonic-gate 	z=strlen(P_tmpdir);
55*0Sstevel@tonic-gate 	if((tdir = getenv("TMPDIR")) != NULL) {
56*0Sstevel@tonic-gate 		x = strlen(tdir);
57*0Sstevel@tonic-gate 	}
58*0Sstevel@tonic-gate 	if(dir != NULL) {
59*0Sstevel@tonic-gate 		y=strlen(dir);
60*0Sstevel@tonic-gate 	}
61*0Sstevel@tonic-gate 	if((p=malloc((unsigned)(max(max(x,y),z)+16))) == NULL)
62*0Sstevel@tonic-gate 		return(NULL);
63*0Sstevel@tonic-gate 	if(x > 0 && access(pcopy(p, tdir), 3) == 0)
64*0Sstevel@tonic-gate 		goto OK;
65*0Sstevel@tonic-gate 	if(y > 0 && access(pcopy(p, dir), 3) == 0)
66*0Sstevel@tonic-gate 		goto OK;
67*0Sstevel@tonic-gate 	if(access(pcopy(p, P_tmpdir), 3) == 0)
68*0Sstevel@tonic-gate 		goto OK;
69*0Sstevel@tonic-gate 	if(access(pcopy(p, "/tmp"), 3) != 0)
70*0Sstevel@tonic-gate 		return(NULL);
71*0Sstevel@tonic-gate OK:
72*0Sstevel@tonic-gate 	(void)strcat(p, "/");
73*0Sstevel@tonic-gate 	if(pfx) {
74*0Sstevel@tonic-gate 		*(p+strlen(p)+5) = '\0';
75*0Sstevel@tonic-gate 		(void)strncat(p, pfx, 5);
76*0Sstevel@tonic-gate 	}
77*0Sstevel@tonic-gate 	(void)strcat(p, seed);
78*0Sstevel@tonic-gate 	(void)strcat(p, "XXXXXX");
79*0Sstevel@tonic-gate 	q = seed;
80*0Sstevel@tonic-gate 	while(*q == 'Z')
81*0Sstevel@tonic-gate 		*q++ = 'A';
82*0Sstevel@tonic-gate 	++*q;
83*0Sstevel@tonic-gate 	if(*mktemp(p) == '\0')
84*0Sstevel@tonic-gate 		return(NULL);
85*0Sstevel@tonic-gate 	return(p);
86*0Sstevel@tonic-gate }
87*0Sstevel@tonic-gate 
88*0Sstevel@tonic-gate static char*
pcopy(space,arg)89*0Sstevel@tonic-gate pcopy(space, arg)
90*0Sstevel@tonic-gate char *space, *arg;
91*0Sstevel@tonic-gate {
92*0Sstevel@tonic-gate 	char *p;
93*0Sstevel@tonic-gate 
94*0Sstevel@tonic-gate 	if(arg) {
95*0Sstevel@tonic-gate 		(void)strcpy(space, arg);
96*0Sstevel@tonic-gate 		p = space-1+strlen(space);
97*0Sstevel@tonic-gate 		if(*p == '/')
98*0Sstevel@tonic-gate 			*p = '\0';
99*0Sstevel@tonic-gate 	}
100*0Sstevel@tonic-gate 	return(space);
101*0Sstevel@tonic-gate }
102