Subversion Repositories scarts

/*
 
@deftypefn Supplemental char* tmpnam (char *@var{s})
 
This function attempts to create a name for a temporary file, which
will be a valid file name yet not exist when @code{tmpnam} checks for
it.  @var{s} must point to a buffer of at least @code{L_tmpnam} bytes,
or be @code{NULL}.  Use of this function creates a security risk, and it must
not be used in new projects.  Use @code{mkstemp} instead.
 
@end deftypefn
 
*/
 
#include <stdio.h>
 
#ifndef L_tmpnam
#define L_tmpnam 100
#endif
#ifndef P_tmpdir
#define P_tmpdir "/usr/tmp"
#endif
 
static char tmpnam_buffer[L_tmpnam];
static int tmpnam_counter;
 
extern int getpid (void);
 
char *
tmpnam (char *s)
{
  int pid = getpid ();
 
  if (s == NULL)
    s = tmpnam_buffer;
 
  /*  Generate the filename and make sure that there isn't one called
      it already.  */
 
  while (1)
    {
      FILE *f;
      sprintf (s, "%s/%s%x.%x", P_tmpdir, "t", pid, tmpnam_counter);
      f = fopen (s, "r");
      if (f == NULL)
	break;
      tmpnam_counter++;
      fclose (f);
    }
 
  return s;
}