Return to readdir.c CVS log

Up to [Research Unix] / researchv9 / libc / gen

Annotation of researchv9/libc/gen/readdir.c, revision 1.1.1.1

1.1       root        1: /* Copyright (c) 1982 Regents of the University of California */
                      2: /* and modified by pjw in 1986 */
                      3: #include <sys/types.h>
                      4: #include "ndir.h"
                      5: 
                      6: /*
                      7:  * read any style directory entry and present it as a bsd one
                      8:  */
                      9: /* classical unix */
                     10: #define        ODIRSIZ 14
                     11: struct olddirect {
                     12:        ino_t   d_ino;
                     13:        char    d_name[ODIRSIZ];
                     14: };
                     15: /* current cray */
                     16: #define CDIRSIZ 24
                     17: struct craydirect {
                     18:        long x;
                     19:        long d_ino;
                     20:        char d_name[CDIRSIZ];
                     21: };
                     22: 
                     23: /*
                     24:  * get next entry in a directory.
                     25:  */
                     26: struct direct *
                     27: readdir(dirp)
                     28:        register DIR *dirp;
                     29: {
                     30:        register struct olddirect *dp;
                     31:        register struct craydirect *cp;
                     32:        register struct direct *np;
                     33:        static struct direct dir;
                     34: 
                     35: loop:
                     36:        if (dirp->dd_loc == 0) {
                     37:                dirp->dd_size = read(dirp->dd_fd, dirp->dd_buf, 
                     38:                    DIRBLKSIZ);
                     39:                if (dirp->dd_size <= 0)
                     40:                        return NULL;
                     41:        }
                     42:        if (dirp->dd_loc >= dirp->dd_size) {
                     43:                dirp->dd_loc = 0;
                     44:                goto loop;
                     45:        }
                     46:        switch(dirp->dd_type) {
                     47:        case TCRAY:
                     48:                cp = (struct craydirect *) (dirp->dd_buf + dirp->dd_loc);
                     49:                dirp->dd_loc += sizeof(struct craydirect);
                     50:                if(cp->d_ino == 0)
                     51:                        goto loop;
                     52:                strncpy(dir.d_name, cp->d_name, CDIRSIZ);
                     53:                dir.d_name[CDIRSIZ] = 0;
                     54:                dir.d_ino = (ino_t) dir_rev4(cp->d_ino);
                     55:                break;
                     56:        default:
                     57:        case TUNK:
                     58:                return(0);
                     59:        case TOLD:
                     60:                dp = (struct olddirect *)(dirp->dd_buf + dirp->dd_loc);
                     61:                dirp->dd_loc += sizeof(struct olddirect);
                     62:                if (dp->d_ino == 0)
                     63:                        goto loop;
                     64:                dir.d_ino = (ino_t) dp->d_ino;
                     65:                strncpy(dir.d_name, dp->d_name, ODIRSIZ);
                     66:                dir.d_name[ODIRSIZ] = '\0'; /* insure null termination */
                     67:                break;
                     68:        case TSUN:
                     69:                np = (struct direct *)(dirp->dd_buf + dirp->dd_loc);
                     70:                dirp->dd_loc += dir_rev2(np->d_reclen);
                     71:                if(np->d_ino == 0)
                     72:                        goto loop;
                     73:                dir.d_ino = (ino_t) dir_rev4(np->d_ino);
                     74:                strcpy(dir.d_name, np->d_name);
                     75:                break;
                     76:        case TBSD:
                     77:                np = (struct direct *)(dirp->dd_buf + dirp->dd_loc);
                     78:                dirp->dd_loc += np->d_reclen;
                     79:                if(np->d_ino == 0)
                     80:                        goto loop;
                     81:                dir.d_ino = (ino_t) np->d_ino;
                     82:                strcpy(dir.d_name, np->d_name);
                     83:                break;
                     84:        }
                     85:        dir.d_namlen = strlen(dir.d_name);
                     86:        dir.d_reclen = DIRSIZ(&dir);
                     87:        return (&dir);
                     88: }
                     89: 
                     90: dir_rev2(n)
                     91: {      union {
                     92:                short x;
                     93:                unsigned char b[2];
                     94:        } u;
                     95:        u.b[1] = n & 0xff;
                     96:        u.b[0] = (n >> 8) & 0xff;
                     97:        return(u.x);
                     98: }
                     99: 
                    100: dir_rev4(n)
                    101: {      union {
                    102:                long x;
                    103:                unsigned char b[4];
                    104:        } u;
                    105:        u.b[3] = n & 0xff;
                    106:        u.b[2] = (n >> 8) & 0xff;
                    107:        u.b[1] = (n >> 16) & 0xff;
                    108:        u.b[0] = (n >> 24) & 0xff;
                    109:        return(u.x);
                    110: }

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