os_tmpdir.c

Go to the documentation of this file.

/*-
 * See the file LICENSE for redistribution information.
 *
 * Copyright (c) 1998, 1999, 2000
 *      Sleepycat Software.  All rights reserved.
 */

#include "config.h"

#ifndef lint
static const char revid[] = "$Id: os__tmpdir_8c-source.html,v 1.1 2008/06/08 10:21:33 sebdiaz Exp $";
#endif /* not lint */

#ifndef NO_SYSTEM_INCLUDES
#include <sys/types.h>

#include <errno.h>
#include <stdlib.h>
#endif

#include "db_int.h"

#ifdef macintosh
#include <TFileSpec.h>
#endif

/*
 * CDB___os_tmpdir --
 *      Set the temporary directory path.
 *
 * The order of items in the list structure and the order of checks in
 * the environment are documented.
 *
 * PUBLIC: int CDB___os_tmpdir __P((DB_ENV *, u_int32_t));
 */
int
CDB___os_tmpdir(dbenv, flags)
        DB_ENV *dbenv;
        u_int32_t flags;
{
        /*
         * !!!
         * Don't change this to:
         *
         *      static const char * const list[]
         *
         * because it creates a text relocation in position independent code.
         */
        static const char * list[] = {
                "/var/tmp",
                "/usr/tmp",
                "/temp",                /* Windows. */
                "/tmp",
                "C:/temp",              /* Windows. */
                "C:/tmp",               /* Windows. */
                NULL
        };
        const char * const *lp, *p;

        /* Use the environment if it's permitted and initialized. */
        if (LF_ISSET(DB_USE_ENVIRON) ||
            (LF_ISSET(DB_USE_ENVIRON_ROOT) && CDB___os_isroot() == 0)) {
                if ((p = getenv("TMPDIR")) != NULL && p[0] == '\0') {
                        CDB___db_err(dbenv, "illegal TMPDIR environment variable");
                        return (EINVAL);
                }
                /* Windows */
                if (p == NULL && (p = getenv("TEMP")) != NULL && p[0] == '\0') {
                        CDB___db_err(dbenv, "illegal TEMP environment variable");
                        return (EINVAL);
                }
                /* Windows */
                if (p == NULL && (p = getenv("TMP")) != NULL && p[0] == '\0') {
                        CDB___db_err(dbenv, "illegal TMP environment variable");
                        return (EINVAL);
                }
                /* Macintosh */
                if (p == NULL &&
                    (p = getenv("TempFolder")) != NULL && p[0] == '\0') {
                        CDB___db_err(dbenv,
                            "illegal TempFolder environment variable");
                        return (EINVAL);
                }
                if (p != NULL)
                        return (CDB___os_strdup(dbenv, p, &dbenv->db_tmp_dir));
        }

#ifdef macintosh
        /* Get the path to the temporary folder. */
        {FSSpec spec;

                if (!Special2FSSpec(kTemporaryFolderType,
                    kOnSystemDisk, 0, &spec))
                        return (CDB___os_strdup(dbenv,
                            FSp2FullPath(&spec), &dbenv->db_tmp_dir));
        }
#endif
#ifdef _WIN32
        /* Get the path to the temporary directory. */
        {int len;
         char temp[_MAX_PATH + 1];
         char *eos;
         int isdir;

                if ((len = GetTempPath(sizeof(temp) - 1, temp)) > 2) {
                        eos = &temp[len];
                        *eos-- = '\0';
                        if (*eos == '\\' || *eos == '/')
                                *eos = '\0';
                        if (CDB___os_exists(temp, &isdir) == 0 && isdir != 0)
                                return (CDB___os_strdup(dbenv, temp, &dbenv->db_tmp_dir));
                }
        }
#endif

        /* Step through the static list looking for a possibility. */
        for (lp = list; *lp != NULL; ++lp)
                if (CDB___os_exists(*lp, NULL) == 0)
                        return (CDB___os_strdup(dbenv, *lp, &dbenv->db_tmp_dir));
        return (0);
}

---