Remove "Written by Ben Pfaff <blp@gnu.org>" lines everywhere.

[pspp-builds.git] / src / data / make-file.c

diff --git a/src/data/make-file.c b/src/data/make-file.c
index 312f9fff612eaf597985889e1f6c7b505118c5ff..eadcfa16989f34d3211c57088082cd8765195a78 100644 (file)
--- a/src/data/make-file.c
+++ b/src/data/make-file.c
@@ -1,6 +1,5 @@
 /* PSPP - computes sample statistics.
    Copyright (C) 2004 Free Software Foundation, Inc.
-   Written by Ben Pfaff <blp@gnu.org>.
 
    This program is free software; you can redistribute it and/or
    modify it under the terms of the GNU General Public License as
@@ -23,23 +22,28 @@
 #include <string.h>
 #include <errno.h>
 #include <stdio.h>
-#include "filename.h"
+#include "file-name.h"
 #include "make-file.h"
-#include "message.h"
-#include "alloc.h"
+#include <libpspp/message.h>
+#include <libpspp/alloc.h>
 
 #include "gettext.h"
 #define _(msgid) gettext (msgid)
 
-/* Creates a temporary file and stores its name in *FILENAME and
+/* Non ansi compilers may set this */
+#ifndef P_tmpdir
+#define P_tmpdir "/tmp"
+#endif
+
+/* Creates a temporary file and stores its name in *FILE_NAME and
    a file descriptor for it in *FD.  Returns success.  Caller is
-   responsible for freeing *FILENAME. */
+   responsible for freeing *FILE_NAME. */
 int
-make_temp_file (int *fd, char **filename)
+make_temp_file (int *fd, char **file_name)
 {
   const char *parent_dir;
 
-  assert (filename != NULL);
+  assert (file_name != NULL);
   assert (fd != NULL);
 
   if (getenv ("TMPDIR") != NULL)
@@ -47,26 +51,26 @@ make_temp_file (int *fd, char **filename)
   else
     parent_dir = P_tmpdir;
 
-  *filename = xmalloc (strlen (parent_dir) + 32);
-  sprintf (*filename, "%s%cpsppXXXXXX", parent_dir, DIR_SEPARATOR);
-  *fd = mkstemp (*filename);
+  *file_name = xmalloc (strlen (parent_dir) + 32);
+  sprintf (*file_name, "%s/psppXXXXXX", parent_dir);
+  *fd = mkstemp (*file_name);
   if (*fd < 0)
     {
       msg (ME, _("%s: Creating temporary file: %s."),
-           *filename, strerror (errno));
-      free (*filename);
-      *filename = NULL;
+           *file_name, strerror (errno));
+      free (*file_name);
+      *file_name = NULL;
       return 0;
     }
   return 1;
 }
 
 
-/* Creates a temporary file and stores its name in *FILENAME and
+/* Creates a temporary file and stores its name in *FILE_NAME and
    a file stream for it in *FP.  Returns success.  Caller is
-   responsible for freeing *FILENAME and for closing *FP */
+   responsible for freeing *FILE_NAME and for closing *FP */
 int
-make_unique_file_stream (FILE **fp, char **filename)
+make_unique_file_stream (FILE **fp, char **file_name)
 {
   static int serial = 0;
   const char *parent_dir;
@@ -77,7 +81,7 @@ make_unique_file_stream (FILE **fp, char **filename)
      Need also to pass in the directory instead of using /tmp 
   */
 
-  assert (filename != NULL);
+  assert (file_name != NULL);
   assert (fp != NULL);
 
   if (getenv ("TMPDIR") != NULL)
@@ -85,18 +89,18 @@ make_unique_file_stream (FILE **fp, char **filename)
   else
     parent_dir = P_tmpdir;
 
-  *filename = xmalloc (strlen (parent_dir) + 32);
+  *file_name = xmalloc (strlen (parent_dir) + 32);
 
 
-  sprintf (*filename, "%s%cpspp%d.png", parent_dir, DIR_SEPARATOR, serial++);
+  sprintf (*file_name, "%s/pspp%d.png", parent_dir, serial++);
 
-  *fp = fopen(*filename, "w");
+  *fp = fopen(*file_name, "w");
 
   if (! *fp )
     {
-      msg (ME, _("%s: Creating file: %s."), *filename, strerror (errno));
-      free (*filename);
-      *filename = NULL;
+      msg (ME, _("%s: Creating file: %s."), *file_name, strerror (errno));
+      free (*file_name);
+      *file_name = NULL;
       return 0;
     }