Return to seekdir.c CVS log

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

Annotation of coherent/b/lib/libc/ndir/seekdir.c, revision 1.1.1.1

1.1       root        1: /*
                      2:        seekdir -- reposition a directory stream
                      3: 
                      4:        last edit:      25-Apr-1987     D A Gwyn
                      5: 
                      6:        An unsuccessful seekdir() will in general alter the current
                      7:        directory position; beware.
                      8: 
                      9:        NOTE:   4.nBSD directory compaction makes seekdir() & telldir()
                     10:                practically impossible to do right.  Avoid using them!
                     11: */
                     12: #ifdef COHERENT
                     13: #include       <errno.h>
                     14: #else
                     15: #include       <sys/errno.h>
                     16: #endif
                     17: 
                     18: #include       <sys/types.h>
                     19: #include       "dirent.h"
                     20: 
                     21: extern off_t   lseek();
                     22: 
                     23: extern int     errno;
                     24: 
                     25: #ifndef NULL
                     26: #define        NULL    0
                     27: #endif
                     28: 
                     29: #ifndef SEEK_SET
                     30: #define        SEEK_SET        0
                     31: #endif
                     32: 
                     33: typedef int    bool;                   /* Boolean data type */
                     34: #define        false   0
                     35: #define        true    1
                     36: 
                     37: void
                     38: seekdir( dirp, loc )
                     39:        register DIR            *dirp;  /* stream from opendir() */
                     40:        register off_t          loc;    /* position from telldir() */
                     41:        {
                     42:        register bool           rewind; /* "start over when stymied" flag */
                     43: 
                     44:        if ( dirp == NULL || dirp->dd_buf == NULL )
                     45:                {
                     46:                errno = EFAULT;
                     47:                return;                 /* invalid pointer */
                     48:                }
                     49: 
                     50:        /* A (struct dirent)'s d_off is an invented quantity on 4.nBSD
                     51:           NFS-supporting systems, so it is not safe to lseek() to it. */
                     52: 
                     53:        /* Monotonicity of d_off is heavily exploited in the following. */
                     54: 
                     55:        /* This algorithm is tuned for modest directory sizes.  For
                     56:           huge directories, it might be more efficient to read blocks
                     57:           until the first d_off is too large, then back up one block,
                     58:           or even to use binary search on the directory blocks.  I
                     59:           doubt that the extra code for that would be worthwhile. */
                     60: 
                     61:        if ( dirp->dd_loc >= dirp->dd_size      /* invalid index */
                     62:          || ((struct dirent *)&dirp->dd_buf[dirp->dd_loc])->d_off > loc
                     63:                                        /* too far along in buffer */
                     64:           )
                     65:                dirp->dd_loc = 0;       /* reset to beginning of buffer */
                     66:        /* else save time by starting at current dirp->dd_loc */
                     67: 
                     68:        for ( rewind = true; ; )
                     69:                {
                     70:                register struct dirent  *dp;
                     71: 
                     72:                /* See whether the matching entry is in the current buffer. */
                     73: 
                     74:                if ( (dirp->dd_loc < dirp->dd_size      /* valid index */
                     75:                   || readdir( dirp ) != NULL   /* next buffer read */
                     76:                   && (dirp->dd_loc = 0, true)  /* beginning of buffer set */
                     77:                     )
                     78:                  && (dp = (struct dirent *)&dirp->dd_buf[dirp->dd_loc])->d_off
                     79:                        <= loc          /* match possible in this buffer */
                     80:                   )    {
                     81:                        for ( /* dp initialized above */ ;
                     82:                              (char *)dp < &dirp->dd_buf[dirp->dd_size];
                     83:                              dp = (struct dirent *)((char *)dp + dp->d_reclen)
                     84:                            )
                     85:                                if ( dp->d_off == loc )
                     86:                                        {       /* found it! */
                     87:                                        dirp->dd_loc =
                     88:                                                (char *)dp - dirp->dd_buf;
                     89:                                        return;
                     90:                                        }
                     91: 
                     92:                        rewind = false; /* no point in backing up later */
                     93:                        dirp->dd_loc = dirp->dd_size;   /* set end of buffer */
                     94:                        }
                     95:                else                    /* whole buffer past matching entry */
                     96:                        if ( !rewind )
                     97:                                {       /* no point in searching further */
                     98:                                errno = EINVAL;
                     99:                                return; /* no entry at specified loc */
                    100:                                }
                    101:                        else    {       /* rewind directory and start over */
                    102:                                rewind = false; /* but only once! */
                    103: 
                    104:                                dirp->dd_loc = dirp->dd_size = 0;
                    105: 
                    106:                                if ( lseek( dirp->dd_fd, (off_t)0, SEEK_SET )
                    107:                                        != 0
                    108:                                   )
                    109:                                        return; /* errno already set (EBADF) */
                    110: 
                    111:                                if ( loc == 0 )
                    112:                                        return; /* save time for rewinddir() */
                    113:                                }
                    114:                }
                    115:        }

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