xref: /csrg-svn/lib/libc/gen/telldir.c (revision 36545)
121363Sdist /*
221363Sdist  * Copyright (c) 1983 Regents of the University of California.
334790Sbostic  * All rights reserved.
434790Sbostic  *
534790Sbostic  * Redistribution and use in source and binary forms are permitted
634790Sbostic  * provided that the above copyright notice and this paragraph are
734790Sbostic  * duplicated in all such forms and that any documentation,
834790Sbostic  * advertising materials, and other materials related to such
934790Sbostic  * distribution and use acknowledge that the software was developed
1034790Sbostic  * by the University of California, Berkeley.  The name of the
1134790Sbostic  * University may not be used to endorse or promote products derived
1234790Sbostic  * from this software without specific prior written permission.
1334790Sbostic  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
1434790Sbostic  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
1534790Sbostic  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
1621363Sdist  */
1721363Sdist 
1826604Sdonn #if defined(LIBC_SCCS) && !defined(lint)
19*36545Smckusick static char sccsid[] = "@(#)telldir.c	5.4 (Berkeley) 01/11/89";
2034790Sbostic #endif /* LIBC_SCCS and not lint */
215929Smckusick 
226370Smckusic #include <sys/param.h>
23*36545Smckusick #include <dirent.h>
245929Smckusick 
255929Smckusick /*
265929Smckusick  * return a pointer into a directory
275929Smckusick  */
285929Smckusick long
295929Smckusick telldir(dirp)
305929Smckusick 	DIR *dirp;
315929Smckusick {
3211827Smckusick 	extern long lseek();
3311827Smckusick 
345929Smckusick 	return (lseek(dirp->dd_fd, 0L, 1) - dirp->dd_size + dirp->dd_loc);
355929Smckusick }
36