Return to logdir.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / news / src

Annotation of 43BSD/contrib/news/src/logdir.c, revision 1.1

1.1     ! root        1: /*
        !             2:  *     UNIX shell - logdir routine
        !             3:  *
        !             4:  *     Joe Steffen
        !             5:  *     Bell Telephone Laboratories
        !             6:  *
        !             7:  *     This routine does not use the getpwent(3) library routine
        !             8:  *     because the latter uses the stdio package.  The allocation of
        !             9:  *     storage in this package destroys the integrity of the shell's
        !            10:  *     storage allocation.
        !            11:  *
        !            12:  *     Modified 2/82 by DJ Molny
        !            13:  *
        !            14:  *     This routine now implements name cacheing, so multiple requests
        !            15:  *     for the same logdir do not result in multiple open/reads of
        !            16:  *     /etc/passwd.  If the previous request was successful and the name
        !            17:  *     is the same as the last request, the same login directory is returned.
        !            18:  */
        !            19: #ifdef SCCSID
        !            20: static char    *SccsId = "@(#)logdir.c 1.4     4/16/85";
        !            21: #endif /* SCCSID */
        !            22: 
        !            23: #define        BUFSIZ  160
        !            24: 
        !            25: static char line[BUFSIZ+1];
        !            26: 
        !            27: char *
        !            28: logdir(name)
        !            29: char *name;
        !            30: {
        !            31:        int     pwf;
        !            32:        static char lastname[BUFSIZ+1];
        !            33:        static char lastdir[BUFSIZ+1];
        !            34:        register char *p;
        !            35:        register int i, j;
        !            36:        char *getenv(), *field(), *strcpy();
        !            37:        
        !            38:        if (*lastdir && !strcmp(lastname,name))         /* djm */
        !            39:                return(lastdir);
        !            40: 
        !            41:        strcpy(lastname, name);                 /* djm */
        !            42:        strcpy(lastdir, "");                    /* djm */
        !            43:        
        !            44: #ifdef IHCC
        !            45:        /* if the logname is exptools, see if $TOOLS is set */
        !            46:        if (strcmp(name, "exptools") &&
        !            47:            (p = getenv("TOOLS")) != 0 && *p != '\0') {
        !            48:                strcpy(lastdir, p);
        !            49:                return(lastdir);
        !            50:        }
        !            51: #endif
        !            52: 
        !            53:        /* attempt to open the password file */
        !            54:        if ((pwf = open("/etc/passwd", 0)) == -1)
        !            55:                return(0);
        !            56:                
        !            57:        /* find the matching password entry */
        !            58:        do {
        !            59:                /* get the next line in the password file */
        !            60:                i = read(pwf, line, BUFSIZ);
        !            61:                for (j = 0; j < i; j++)
        !            62:                        if (line[j] == '\n')
        !            63:                                break;
        !            64:                /* return a null pointer if the whole file has been read */
        !            65:                if (j >= i)
        !            66:                        return(0);
        !            67:                line[++j] = 0;                  /* terminate the line */
        !            68:                lseek(pwf, (long) (j - i), 1);  /* point at the next line */
        !            69:                p = field(line);                /* get the logname */
        !            70:        } while (strcmp(name, line) != 0);
        !            71:        close(pwf);
        !            72:        
        !            73:        /* skip the intervening fields */
        !            74:        p = field(p);
        !            75:        p = field(p);
        !            76:        p = field(p);
        !            77:        p = field(p);
        !            78:        
        !            79:        /* return the login directory */
        !            80:        field(p);
        !            81:        strcpy(lastdir,p);                      /* djm */
        !            82:        return(p);
        !            83: }
        !            84: 
        !            85: static char *
        !            86: field(p)
        !            87: register char *p;
        !            88: {
        !            89:        while (*p && *p != ':')
        !            90:                ++p;
        !            91:        if (*p) *p++ = 0;
        !            92:        return(p);
        !            93: }

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