Return to expfile.c CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.bin / uucp

Annotation of 42BSD/usr.bin/uucp/expfile.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char sccsid[] = "@(#)expfile.c  5.1 (Berkeley) 7/2/83";
                      3: #endif
                      4: 
                      5: #include "uucp.h"
                      6: #include <sys/types.h>
                      7: #include <sys/stat.h>
                      8: 
                      9: /*******
                     10:  *     expfile(file)   expand file name
                     11:  *     char *file;
                     12:  *
                     13:  *     return codes: 0 - Ordinary spool area file
                     14:  *                   1 - Other normal file
                     15:  *                   FAIL - no Wrkdir name available
                     16:  */
                     17: 
                     18: expfile(file)
                     19: char *file;
                     20: {
                     21:        register char *fpart, *p;
                     22:        char user[20], *up;
                     23:        char full[100];
                     24:        int uid;
                     25: 
                     26:        switch(file[0]) {
                     27:        case '/':
                     28:                return(1);
                     29:        case '~':
                     30:                for (fpart = file + 1, up = user; *fpart != '\0'
                     31:                        && *fpart != '/'; fpart++)
                     32:                                *up++ = *fpart;
                     33:                *up = '\0';
                     34:                /* ll1b.105, mn, Mark Nettleingham, defend against
                     35:                 * null login name in /etc/passwd
                     36:                 */
                     37:                if (!*user || gninfo(user, &uid, full) != 0) {
                     38:                        strcpy(full, PUBDIR);
                     39:                }
                     40:        
                     41:                strcat(full, fpart);
                     42:                strcpy(file, full);
                     43:                return(1);
                     44:        default:
                     45:                p = index(file, '/');
                     46:                strcpy(full, Wrkdir);
                     47:                strcat(full, "/");
                     48:                strcat(full, file);
                     49:                strcpy(file, full);
                     50:                if (Wrkdir[0] == '\0')
                     51:                        return(FAIL);
                     52:                else if (p != NULL)
                     53:                        return(1);
                     54:                return(0);
                     55:        }
                     56: }
                     57: 
                     58: 
                     59: /***
                     60:  *     isdir(name)     check if directory name
                     61:  *     char *name;
                     62:  *
                     63:  *     return codes:  0 - not directory  |  1 - is directory
                     64:  */
                     65: 
                     66: isdir(name)
                     67: char *name;
                     68: {
                     69:        register int ret;
                     70:        struct stat s;
                     71: 
                     72:        ret = stat(subfile(name), &s);
                     73:        if (ret < 0)
                     74:                return(0);
                     75:        if ((s.st_mode & S_IFMT) == S_IFDIR)
                     76:                return(1);
                     77:        return(0);
                     78: }
                     79: 
                     80: 
                     81: /***
                     82:  *     mkdirs(name)    make all necessary directories
                     83:  *     char *name;
                     84:  *
                     85:  *     return 0  |  FAIL
                     86:  */
                     87: 
                     88: mkdirs(name)
                     89: char *name;
                     90: {
                     91:        int ret, mask;
                     92:        char cmd[100], dir[100];
                     93:        register char *p;
                     94: 
                     95:        for (p = dir + 1;; p++) {
                     96:                strcpy(dir, name);
                     97:                if ((p = index(p, '/')) == NULL)
                     98:                        return(0);
                     99:                *p = '\0';
                    100:                if (isdir(dir))
                    101:                        continue;
                    102: 
                    103:                /* rti!trt: add chmod ala 4.1c uucp */
                    104:                sprintf(cmd, "mkdir %s;chmod 0777 %s", dir, dir);
                    105:                DEBUG(4, "mkdir - %s\n", dir);
                    106:                mask = umask(0);
                    107:                ret = shio(cmd, CNULL, CNULL, User);
                    108:                umask(mask);
                    109:                if (ret != 0)
                    110:                        return(FAIL);
                    111:        }
                    112: }
                    113: 
                    114: /***
                    115:  *     ckexpf - expfile and check return
                    116:  *             print error if it failed.
                    117:  *
                    118:  *     return code - 0 - ok; FAIL if expfile failed
                    119:  */
                    120: 
                    121: ckexpf(file)
                    122: register char *file;
                    123: {
                    124: 
                    125:        if (expfile(file) != FAIL)
                    126:                return(0);
                    127: 
                    128:        /*  could not expand file name */
                    129:        /* the gwd routine failed */
                    130: 
                    131:        fprintf(stderr, "Can't expand filename (%s). Pwd failed.\n", file+1);
                    132:        return(FAIL);
                    133: }

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