mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 00:14:25 +00:00
33 lines
992 B
C
33 lines
992 B
C
/*
|
||
* Seek.c -- Whitesmith's equivalent of V6 seek
|
||
*/
|
||
long lseek();
|
||
|
||
seek(fildes,offset,ptrname)
|
||
int fildes; /* UNIX / WS file descriptor */
|
||
int offset; /* File offset, bytes */
|
||
int ptrname; /* Sense variable */
|
||
{
|
||
offset &= 0xffff; /* Clear sign extension problems*/
|
||
if(ptrname > 2) /* Not byte sense seek */
|
||
{ /* */
|
||
offset = offset << 9; /* Multiply by 512 */
|
||
ptrname -= 3; /* reset to range 0 .. 2 */
|
||
} /********************************/
|
||
return(lseek(fildes,(long)offset,ptrname));
|
||
}
|
||
-= 3; /* reset to range 0 .. 2 */
|
||
} /********************************/
|
||
return(lseek(fildes,(ong)offset,ptrname));
|
||
}
|
||
-= 3; /* reset to range 0 .. 2 */
|
||
} /********************************/
|
||
return(lseek(fildes,(ong)offset,ptrname));
|
||
}
|
||
-= 3; /* reset to range 0 .. 2 */
|
||
} /********************************/
|
||
return(lseek(fildes,(ong)offset,ptrname));
|
||
}
|
||
-= 3; /* reset to range 0 .. 2 */
|
||
} /********************************/
|
||
return(lseek(fildes,( |