2 * Copyright (c) 2001, 2003, 2004, 2008-2011
3 * Todd C. Miller <Todd.Miller@courtesan.com>
5 * Permission to use, copy, modify, and distribute this software for any
6 * purpose with or without fee is hereby granted, provided that the above
7 * copyright notice and this permission notice appear in all copies.
9 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
20 #include <sys/types.h>
30 #endif /* HAVE_STDLIB_H */
34 #endif /* HAVE_UNISTD_H */
35 #if TIME_WITH_SYS_TIME
44 #define TEMPCHARS "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
45 #define NUM_CHARS (sizeof(TEMPCHARS) - 1)
48 #define INT_MAX 0x7fffffff
53 # define SRAND srandom
54 # define SEED_T unsigned int
58 # define SRAND srand48
63 # define SEED_T unsigned int
74 * Seed from time of day and process id multiplied by small primes.
76 (void) gettimeofday(&tv, NULL);
77 seed = (tv.tv_sec % 10000) * 523 + tv.tv_usec * 13 +
78 (getpid() % 1000) * 983;
85 static int initialized;
92 return RAND() & 0xffffffff;
96 mktemp_internal(char *path, int slen, int mode)
98 char *start, *cp, *ep;
99 const char *tempchars = TEMPCHARS;
100 unsigned int r, tries;
103 for (ep = path; *ep; ep++)
105 if (path + slen >= ep) {
112 for (start = ep; start > path && start[-1] == 'X'; start--) {
113 if (tries < INT_MAX / NUM_CHARS)
119 for (cp = start; *cp; cp++) {
120 r = get_random() % NUM_CHARS;
126 fd = open(path, O_CREAT|O_EXCL|O_RDWR, S_IRUSR|S_IWUSR);
127 if (fd != -1 || errno != EEXIST)
131 if (mkdir(path, S_IRWXU) == 0)
143 #ifndef HAVE_MKSTEMPS
145 mkstemps(char *path, int slen)
147 return mktemp_internal(path, slen, MKTEMP_FILE);
149 #endif /* HAVE_MKSTEMPS */
155 if (mktemp_internal(path, 0, MKTEMP_DIR) == -1)
159 #endif /* HAVE_MKDTEMP */