1987-03-31 10:45:53 +00:00
|
|
|
/* $Header$ */
|
1987-01-27 15:57:55 +00:00
|
|
|
#include <sys/types.h>
|
|
|
|
#include <sys/dir.h>
|
|
|
|
|
|
|
|
/*
|
|
|
|
* return a pointer into a directory
|
|
|
|
*/
|
|
|
|
long telldir(dirp)
|
|
|
|
DIR *dirp;
|
|
|
|
{
|
|
|
|
extern long lseek();
|
|
|
|
|
1987-03-27 15:11:06 +00:00
|
|
|
if (dirp->dd_fd >= 0)
|
|
|
|
return (lseek(dirp->dd_fd, 0L, 1) - dirp->dd_size + dirp->dd_loc);
|
|
|
|
return dirp->dd_loc;
|
1987-01-27 15:57:55 +00:00
|
|
|
}
|