aboutsummaryrefslogtreecommitdiffstats
path: root/atari/tmpnam.c
diff options
context:
space:
mode:
Diffstat (limited to 'atari/tmpnam.c')
-rw-r--r--atari/tmpnam.c47
1 files changed, 0 insertions, 47 deletions
diff --git a/atari/tmpnam.c b/atari/tmpnam.c
deleted file mode 100644
index 92bf751b..00000000
--- a/atari/tmpnam.c
+++ /dev/null
@@ -1,47 +0,0 @@
-#ifdef PIPES_SIMULATED
-/* tmpnam.c : return a temporary file name */
-/* written by Eric R. Smith and placed in the public domain */
-/**
- * - modified for gawk needs - pattern /$$XXXXXX from the original
- * code creates names which are hard to remove when somethig
- * goes wrong
- * - returned name can be passed outside via system(); other programs
- * may not dig '/' as a path separator
- * - somehow more frugal in a memory use
- * (mj - October 1990)
- **/
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-extern char * getenv(const char *);
-extern char * mktemp(char *);
-char * tempnam(const char *path, const char *base);
-static char pattern[] = "\\gwkXXXXX";
-
-char *tmpnam(buf)
- char *buf;
-{
- char *tmpdir;
-
- if (!(tmpdir = getenv("TEMP")) && !(tmpdir = getenv("TMPDIR")))
- tmpdir = ".";
-
- if (!buf) {
- size_t blen;
-
- blen = strlen (tmpdir) + sizeof(pattern);
- if (NULL == (buf = malloc(blen)))
- return NULL;
- }
- (void) strcat(strcpy(buf, tmpdir), pattern);
- return(mktemp(buf));
-}
-
-/* used by gawk_popen() */
-char *tempnam(path, base)
-const char *path, *base; /* ignored */
-{
- return tmpnam(NULL);
-}
-#endif /* PIPES_SIMULATED */