home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / unixlib / !UnixLib / src / unix / c / lseek < prev    next >
Encoding:
Text File  |  1994-09-30  |  459 b   |  27 lines
  1. static char sccs_id[] = "@(#) lseek.c 1.2 " __DATE__ " HJR";
  2.  
  3. /* lseek.c (c) Copyright 1990 H.Rogers */
  4.  
  5. #include <errno.h>
  6.  
  7. #include "sys/types.h"
  8. #include "sys/unix.h"
  9. #include "sys/dev.h"
  10. #include "sys/os.h"
  11.  
  12. long
  13. lseek (int fd, long lpos, int whence)
  14. {
  15.   register struct file *f;
  16.  
  17.   if (BADF (fd))
  18.     {
  19.       errno = EBADF;
  20.       return (-1);
  21.     }
  22.  
  23.   f = __u->file + fd;
  24.  
  25.   return ((*(__dev[major (f->dev)].lseek)) (minor (f->dev), lpos, whence, f));
  26. }
  27.