src/util/tmpfile.c File Reference

#include <sys/types.h>
#include "util.h"

Include dependency graph for tmpfile.c:

Go to the source code of this file.

Functions
static char	check_directory (char const *dir)
char *	util_tempnam (char const *dir, char const *pfx)
FILE *	util_tmpfile (void)

---

Function Documentation

static char check_directory

(

char const *

dir

)

[static]

Definition at line 32 of file tmpfile.c.

{
     struct stat statbuf;

     if (! dir)
         return 0;
     else if (stat(dir, &statbuf) < 0)
         return 0;
     else if (S_ISDIR(statbuf.st_mode))
         return 0;
     else if (access(dir, W_OK | X_OK) < 0)
         return 0;
     else
         return 1;
}

char* util_tempnam	(	char const *	dir,
		char const *	pfx
	)

Definition at line 49 of file tmpfile.c.

{
     extern char *getenv(const char *);
     char const *tmpdir = NULL, *env;
     char *filename;
     static char unique_letters[4] = "AAA";
     char addslash = 0;

     /*
      * If a directory is passed in, verify that it exists and is a
      * directory and is writeable by this process.  If no directory
      * is passed in, or if the directory that is passed in does not
      * exist, check the environment variable TMPDIR.  If it isn't
      * set, check the predefined constant P_tmpdir.  If that isn't
      * set, use "/tmp/".
      */

     if ((env = getenv ("TMPDIR")) && check_directory(env))
         tmpdir = env;
     else if (dir && check_directory(dir))
         tmpdir = dir;
#ifdef P_tmpdir
     else if (check_directory(P_tmpdir))
         tmpdir = P_tmpdir;
#endif
     else
         tmpdir = "/tmp/";

     /*
      * OK, now that we've got a directory, figure out whether or not
      * there's a slash at the end of it.
      */
     if (tmpdir[strlen(tmpdir) - 1] != '/')
         addslash = 1;

     /*
      * Now figure out the set of unique letters.
      */
     unique_letters[0]++;
     if (unique_letters[0] > 'Z') {
         unique_letters[0] = 'A';
         unique_letters[1]++;
         if (unique_letters[1] > 'Z') {
             unique_letters[1] = 'A';
             unique_letters[2]++;
             if (unique_letters[2] > 'Z') {
                 unique_letters[2]++;
             }
         }
     }

     /*
      * Allocate a string of sufficient length.
      */
     if (pfx) {
         filename = (char *) malloc(strlen(tmpdir) + addslash + strlen(pfx) + 10
);
     } else {
         filename = (char *) malloc(strlen(tmpdir) + addslash + 10);
     }

     /*
      * And create the string.
      */
     (void) sprintf(filename, "%s%s%s%sa%05d", tmpdir, addslash ? "/" : "",
                    pfx ? pfx : "", unique_letters, (int)getpid());

     return filename;
}

FILE* util_tmpfile

(

void

)

Definition at line 141 of file tmpfile.c.

{
    FILE *fp;

    if ((fp = fopen("utiltmp", "w+")) == NULL) {
        return NULL;
    }
    (void) unlink("utiltmp");
    return fp;
}