1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21
22 /* Copyright (c) 2013 OmniTI Computer Consulting, Inc. All rights reserved. */
23
24 /*
25 * Copyright 2008 Sun Microsystems, Inc. All rights reserved.
26 * Use is subject to license terms.
27 */
28
29 /*
30 * Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989 AT&T
31 * All Rights Reserved
32 *
33 * Portions of this source code were derived from Berkeley
34 * 4.3 BSD under license from the regents of the University of
35 * California.
36 */
37
38 #include <sys/feature_tests.h>
39
40 #if !defined(_LP64) && _FILE_OFFSET_BITS == 64
41 #define mkstemp mkstemp64
42 #define mkstemps mkstemps64
43 #define mkostemp mkostemp64
44 #define mkostemps mkostemps64
45 #define libc_mkstemps libc_mkstemps64 /* prefer unique statics */
46 #pragma weak _mkstemp64 = mkstemp64
47 #else
48 #pragma weak _mkstemp = mkstemp
49 #endif
50
51 #include "lint.h"
52 #include <sys/fcntl.h>
53 #include <stdlib.h>
54 #include <string.h>
55 #include <errno.h>
56 #include <alloca.h>
57 #include <sys/types.h>
58 #include <sys/stat.h>
59 #include <fcntl.h>
60
61 extern char *libc_mktemps(char *, int);
62
63 static int
libc_mkstemps(char * as,int slen,int flags)64 libc_mkstemps(char *as, int slen, int flags)
65 {
66 int fd;
67 int len;
68 char *tstr, *str, *mkret;
69
70 if (as == NULL || *as == '\0')
71 return (-1);
72
73 len = (int)strlen(as);
74 tstr = alloca(len + 1);
75 (void) strcpy(tstr, as);
76
77 if (slen < 0 || slen >= len)
78 return (-1);
79
80 str = tstr + (len - 1 - slen);
81
82 /*
83 * The following for() loop is doing work. mktemp() will generate
84 * a different name each time through the loop. So if the first
85 * name is used then keep trying until you find a free filename.
86 */
87
88 for (;;) {
89 if (*str == 'X') { /* If no trailing X's don't call mktemp. */
90 mkret = libc_mktemps(as, slen);
91 if (*mkret == '\0') {
92 return (-1);
93 }
94 }
95 #if _FILE_OFFSET_BITS == 64
96 if ((fd = open64(as, O_CREAT|O_EXCL|O_RDWR|flags,
97 0600)) != -1) {
98 return (fd);
99 }
100 #else
101 if ((fd = open(as, O_CREAT|O_EXCL|O_RDWR|flags,
102 0600)) != -1) {
103 return (fd);
104 }
105 #endif /* _FILE_OFFSET_BITS == 64 */
106
107 /*
108 * If the error condition is other than EEXIST or if the
109 * file exists and there are no X's in the string
110 * return -1.
111 */
112
113 if ((errno != EEXIST) || (*str != 'X')) {
114 return (-1);
115 }
116 (void) strcpy(as, tstr);
117 }
118 }
119
120 int
mkstemp(char * as)121 mkstemp(char *as)
122 {
123 return (libc_mkstemps(as, 0, 0));
124 }
125
126 int
mkstemps(char * as,int slen)127 mkstemps(char *as, int slen)
128 {
129 return (libc_mkstemps(as, slen, 0));
130 }
131
132 int
mkostemp(char * as,int flags)133 mkostemp(char *as, int flags)
134 {
135 return (libc_mkstemps(as, 0, flags));
136 }
137
138 int
mkostemps(char * as,int slen,int flags)139 mkostemps(char *as, int slen, int flags)
140 {
141 return (libc_mkstemps(as, slen, flags));
142 }
143