forked from KolibriOS/kolibrios
52 lines
885 B
C
52 lines
885 B
C
|
|
||
|
#include <errno.h>
|
||
|
#include <stdlib.h>
|
||
|
#include <sys/unistd.h>
|
||
|
#include <sys/kos_io.h>
|
||
|
#include "glue.h"
|
||
|
#include "io.h"
|
||
|
|
||
|
|
||
|
_off_t
|
||
|
_DEFUN (lseek, (fd, pos, whence),
|
||
|
int fd _AND
|
||
|
_off_t pos _AND
|
||
|
int whence)
|
||
|
|
||
|
{
|
||
|
fileinfo_t info;
|
||
|
__io_handle *ioh;
|
||
|
_off_t ret;
|
||
|
|
||
|
if( (fd < 0) || (fd >=64) )
|
||
|
{
|
||
|
errno = EBADF;
|
||
|
return (-1);
|
||
|
};
|
||
|
|
||
|
ioh = &__io_tab[fd];
|
||
|
|
||
|
switch(whence)
|
||
|
{
|
||
|
case SEEK_SET:
|
||
|
ret = pos;
|
||
|
break;
|
||
|
case SEEK_CUR:
|
||
|
ret = ioh->offset + pos;
|
||
|
break;
|
||
|
case SEEK_END:
|
||
|
{
|
||
|
get_fileinfo(ioh->name, &info);
|
||
|
ret = pos + info.size;
|
||
|
break;
|
||
|
}
|
||
|
default:
|
||
|
errno = EINVAL;
|
||
|
return (-1);
|
||
|
};
|
||
|
|
||
|
ioh->offset = ret;
|
||
|
|
||
|
return( ret );
|
||
|
};
|