Return to tmpnam.c CVS log

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

Annotation of coherent/d/lib/libc/gen/tmpnam.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Standard I/O Library.
        !             3:  * Create a unique name for a temporary file ala SYS V.
        !             4:  */
        !             5: 
        !             6: #include <stdio.h>
        !             7: 
        !             8: #ifdef GEMDOS
        !             9: #define        FSPATHSEP       "\\"
        !            10: #ifndef        P_tmpdir
        !            11: #define        P_tmpdir        "\\tmp"
        !            12: #endif
        !            13: #endif
        !            14: #ifdef DOS
        !            15: #define        FSPATHSEP       "\\"
        !            16: #ifndef        P_tmpdir
        !            17: #define        P_tmpdir        "\\tmp"
        !            18: #endif
        !            19: #endif
        !            20: #ifndef        FSPATHSEP
        !            21: #define        FSPATHSEP       "/"
        !            22: #ifndef        P_tmpdir
        !            23: #define        P_tmpdir        "/tmp"
        !            24: #endif
        !            25: #endif
        !            26: #ifndef        L_tmpnam
        !            27: #define        L_tmpnam        64
        !            28: #endif
        !            29: #define        TEMPLATE        "tXXXXXX"
        !            30: 
        !            31: char   *
        !            32: tmpnam(s)
        !            33: register char  *s;
        !            34: {
        !            35:        char *name;
        !            36:        static  char namebuf[L_tmpnam];
        !            37:        extern  char *mktemp(), *strcpy(), *strcat();
        !            38: 
        !            39:        for (;;) {
        !            40:                if (s == NULL)
        !            41:                        s = namebuf;
        !            42:                strcpy(s, P_tmpdir);
        !            43:                strcat(s, FSPATHSEP);
        !            44:                strcat(s, TEMPLATE);
        !            45:                name = mktemp(s);
        !            46:                if (access(name, 0) == -1)
        !            47:                        break;
        !            48:        }
        !            49:        return (s);
        !            50: }

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