/*
 * 5799-WZQ (C) COPYRIGHT = NONE
 * LICENSED MATERIALS - PROPERTY OF IBM
 */
/* $Header:telldir.c 12.0$ */
/* $ACIS:telldir.c 12.0$ */
/* $Source: /ibm/acis/usr/src/lib/libc/gen/RCS/telldir.c,v $ */

#ifndef lint
static char *rcsid = "$Header:telldir.c 12.0$";
#endif

#include <sys/nfs_defines.h>

/*
 * Copyright (c) 1983 Regents of the University of California.
 * All rights reserved.  The Berkeley software License Agreement
 * specifies the terms and conditions for redistribution.
 */

#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid[] = "@(#)telldir.c	5.2 (Berkeley) 3/9/86";
#endif LIBC_SCCS and not lint

#ifdef VFS
/* @(#)telldir.c	1.2 87/07/22 3.2/4.3NFSSRC */
#endif VFS

#include <sys/param.h>
#include <sys/dir.h>

/*
 * return a pointer into a directory
 */
long
telldir(dirp)
	DIR *dirp;
{
#ifndef VFS
	extern long lseek();
#endif !VFS

#ifndef VFS
	return (lseek(dirp->dd_fd, 0L, 1) - dirp->dd_size + dirp->dd_loc);
#else !VFS
	return((dirp->dd_bbase * dirp->dd_bsize) + dirp->dd_entno);
#endif !VFS
}
