1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
/*
* m_scratch.c -- construct a scratch file
*
* $Id: m_scratch.c,v 1.3 1999/09/10 05:22:41 doug Exp $
*/
#include <h/mh.h>
char *
m_scratch (char *file, char *template)
{
char *cp;
static char buffer[BUFSIZ], tmpfil[BUFSIZ];
snprintf (tmpfil, sizeof(tmpfil), "%sXXXXXX", template);
/*
Mkstemp work postponed until later -Doug
#ifdef HAVE_MKSTEMP
mkstemp (tmpfil);
#else
*/
mktemp (tmpfil);
/*
#endif
*/
/* nasty - this really means: if there is no '/' in the path */
if ((cp = r1bindex (file, '/')) == file)
strncpy (buffer, tmpfil, sizeof(buffer));
else
snprintf (buffer, sizeof(buffer), "%.*s%s", cp - file, file, tmpfil);
unlink (buffer);
return buffer;
}
|
