Return to tempnam.c CVS log

Up to [MW Coherent from dump] / coherent / b / lib / libc / gen

Annotation of coherent/b/lib/libc/gen/tempnam.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Standard I/O Library.
                      3:  * Create a unique name for a temporary file ala SYS V.
                      4:  * Note: this differs from the real SYS V in that we don't limit the
                      5:  * length of the prefix to be five characters for portability reasons.
                      6:  */
                      7: 
                      8: #include <stdio.h>
                      9: 
                     10: #ifdef GEMDOS
                     11: #define        FSPATHSEP       '\\'
                     12: #ifndef        P_tmpdir
                     13: #define        P_tmpdir        "\\tmp"
                     14: #endif
                     15: #endif
                     16: #ifdef DOS
                     17: #define        FSPATHSEP       '\\'
                     18: #ifndef        P_tmpdir
                     19: #define        P_tmpdir        "\\tmp"
                     20: #endif
                     21: #endif
                     22: #ifndef        FSPATHSEP
                     23: #define        FSPATHSEP       '/'
                     24: #endif
                     25: #ifndef        P_tmpdir
                     26: #define        P_tmpdir        "/tmp"
                     27: #endif
                     28: #ifndef        L_tmpnam
                     29: #define        L_tmpnam        64
                     30: #endif
                     31: #define        TEMPLATE        "XXXXXX"
                     32: #define        PREFIX          "t"
                     33: 
                     34: char   *
                     35: tempnam(dir, pfx)
                     36: char   *dir, *pfx;
                     37: {
                     38:        register char *tbp, *stbp;
                     39:        extern  char *mktemp(), *strcpy();
                     40:        extern  char *malloc(), *getenv();
                     41: 
                     42:        if ((stbp = malloc(L_tmpnam)) != NULL) {
                     43:                if (dir == NULL && (dir = getenv("TMPDIR")) == NULL)
                     44:                        dir = P_tmpdir;
                     45:                if (pfx == NULL)
                     46:                        pfx = PREFIX;
                     47:                for (;;) {
                     48:                        tbp = stbp;
                     49:                        strcpy(tbp, dir);
                     50:                        while (*tbp != 0)
                     51:                                ++tbp;
                     52:                        if (tbp > stbp && tbp[-1] != FSPATHSEP)
                     53:                                *tbp++ = FSPATHSEP;
                     54:                        strcpy(tbp, pfx);
                     55:                        while (*tbp != 0)
                     56:                                ++tbp;
                     57:                        strcpy(tbp, TEMPLATE);
                     58:                        mktemp(stbp);
                     59:                        if (access(stbp, 0) == -1)
                     60:                                break;
                     61:                }
                     62:        }
                     63:        return (stbp);
                     64: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.