src/win32/mkstemp.c

/* Copyright (C) 1991, 1992, 1996, 1998, 2001 Free Software Foundation, Inc.
   This file is derived from mkstemps.c from the GNU Libiberty Library
   which in turn is derived from the GNU C Library.

   The GNU C Library is free software; you can redistribute it and/or
   modify it under the terms of the GNU Library General Public License as
   published by the Free Software Foundation; either version 2 of the
   License, or (at your option) any later version.

   The GNU C Library is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   Library General Public License for more details.

   You should have received a copy of the GNU Library General Public
   License along with the GNU C Library; see the file COPYING.LIB.  If not,
   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
   Boston, MA 02111-1307, USA. 

*/
   
/* SWISH-E Porting  */
#define _SWISH_PORT
#include "config.h"

#ifdef HAVE_STDLIB_H
#include <stdlib.h>
#endif
#ifdef HAVE_STRING_H
#include <string.h>
#endif
#include <errno.h>
#include <stdio.h>
#include <fcntl.h>
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#endif
#ifdef HAVE_SYS_TIME_H
#include <sys/time.h>
#endif
#ifdef HAVE_PROCESS_H
#include <process.h>
#endif

/* We need to provide a type for gcc_uint64_t.  */
#ifdef __GNUC__
typedef unsigned long long gcc_uint64_t;
#else
typedef unsigned long gcc_uint64_t;
#endif

#ifndef TMP_MAX
#define TMP_MAX 16384
#endif

/* Generate a unique temporary file name from TEMPLATE.

   TEMPLATE has the form:

   <path>/ccXXXXXX

   The last six characters of TEMPLATE must be "XXXXXX"; they are
   replaced with a string that makes the filename unique.

   Returns a file descriptor open on the file for reading and writing.  */
int
mkstemp (template)
     char *template;
{
  static const char letters[]
    = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789";
  static gcc_uint64_t value;
#ifdef HAVE_GETTIMEOFDAY
  struct timeval tv;
#endif
  char *XXXXXX;
  size_t len;
  int count;

  len = strlen (template);

  if ((int) len < 6
      || strncmp (&template[len - 6], "XXXXXX", 6))
    {
      return -1;
    }

  XXXXXX = &template[len - 6];

#ifdef HAVE_GETTIMEOFDAY
  /* Get some more or less random data.  */
  gettimeofday (&tv, NULL);
  value += ((gcc_uint64_t) tv.tv_usec << 16) ^ tv.tv_sec ^ getpid ();
#else
  value += getpid ();
#endif

  for (count = 0; count < TMP_MAX; ++count)
    {
      gcc_uint64_t v = value;
      int fd;

      /* Fill in the random bits.  */
      XXXXXX[0] = letters[v % 62];
      v /= 62;
      XXXXXX[1] = letters[v % 62];
      v /= 62;
      XXXXXX[2] = letters[v % 62];
      v /= 62;
      XXXXXX[3] = letters[v % 62];
      v /= 62;
      XXXXXX[4] = letters[v % 62];
      v /= 62;
      XXXXXX[5] = letters[v % 62];

      fd = open (template, O_RDWR|O_CREAT|O_EXCL|O_BINARY, 0600);
      if (fd >= 0)
        /* The file does not exist.  */
        return fd;

      /* This is a random value.  It is only necessary that the next
         TMP_MAX values generated by adding 7777 to VALUE are different
         with (module 2^32).  */
      value += 7777;
    }

  /* We return the null string if we can't find a unique file name.  */
  template[0] = '\0';
  return -1;
}
1	adcroft	1.1	/* Copyright (C) 1991, 1992, 1996, 1998, 2001 Free Software Foundation, Inc.
2			This file is derived from mkstemps.c from the GNU Libiberty Library
3			which in turn is derived from the GNU C Library.
4
5			The GNU C Library is free software; you can redistribute it and/or
6			modify it under the terms of the GNU Library General Public License as
7			published by the Free Software Foundation; either version 2 of the
8			License, or (at your option) any later version.
9
10			The GNU C Library is distributed in the hope that it will be useful,
11			but WITHOUT ANY WARRANTY; without even the implied warranty of
12			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13			Library General Public License for more details.
14
15			You should have received a copy of the GNU Library General Public
16			License along with the GNU C Library; see the file COPYING.LIB. If not,
17			write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18			Boston, MA 02111-1307, USA.
19
20			*/
21
22			/* SWISH-E Porting */
23			#define _SWISH_PORT
24			#include "config.h"
25
26			#ifdef HAVE_STDLIB_H
27			#include <stdlib.h>
28			#endif
29			#ifdef HAVE_STRING_H
30			#include <string.h>
31			#endif
32			#include <errno.h>
33			#include <stdio.h>
34			#include <fcntl.h>
35			#ifdef HAVE_UNISTD_H
36			#include <unistd.h>
37			#endif
38			#ifdef HAVE_SYS_TIME_H
39			#include <sys/time.h>
40			#endif
41			#ifdef HAVE_PROCESS_H
42			#include <process.h>
43			#endif
44
45			/* We need to provide a type for gcc_uint64_t. */
46			#ifdef __GNUC__
47			typedef unsigned long long gcc_uint64_t;
48			#else
49			typedef unsigned long gcc_uint64_t;
50			#endif
51
52			#ifndef TMP_MAX
53			#define TMP_MAX 16384
54			#endif
55
56			/* Generate a unique temporary file name from TEMPLATE.
57
58			TEMPLATE has the form:
59
60			<path>/ccXXXXXX
61
62			The last six characters of TEMPLATE must be "XXXXXX"; they are
63			replaced with a string that makes the filename unique.
64
65			Returns a file descriptor open on the file for reading and writing. */
66			int
67			mkstemp (template)
68			char *template;
69			{
70			static const char letters[]
71			= "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789";
72			static gcc_uint64_t value;
73			#ifdef HAVE_GETTIMEOFDAY
74			struct timeval tv;
75			#endif
76			char *XXXXXX;
77			size_t len;
78			int count;
79
80			len = strlen (template);
81
82			if ((int) len < 6
83			\|\| strncmp (&template[len - 6], "XXXXXX", 6))
84			{
85			return -1;
86			}
87
88			XXXXXX = &template[len - 6];
89
90			#ifdef HAVE_GETTIMEOFDAY
91			/* Get some more or less random data. */
92			gettimeofday (&tv, NULL);
93			value += ((gcc_uint64_t) tv.tv_usec << 16) ^ tv.tv_sec ^ getpid ();
94			#else
95			value += getpid ();
96			#endif
97
98			for (count = 0; count < TMP_MAX; ++count)
99			{
100			gcc_uint64_t v = value;
101			int fd;
102
103			/* Fill in the random bits. */
104			XXXXXX[0] = letters[v % 62];
105			v /= 62;
106			XXXXXX[1] = letters[v % 62];
107			v /= 62;
108			XXXXXX[2] = letters[v % 62];
109			v /= 62;
110			XXXXXX[3] = letters[v % 62];
111			v /= 62;
112			XXXXXX[4] = letters[v % 62];
113			v /= 62;
114			XXXXXX[5] = letters[v % 62];
115
116			fd = open (template, O_RDWR\|O_CREAT\|O_EXCL\|O_BINARY, 0600);
117			if (fd >= 0)
118			/* The file does not exist. */
119			return fd;
120
121			/* This is a random value. It is only necessary that the next
122			TMP_MAX values generated by adding 7777 to VALUE are different
123			with (module 2^32). */
124			value += 7777;
125			}
126
127			/* We return the null string if we can't find a unique file name. */
128			template[0] = '\0';
129			return -1;
130			}