lseek.c

来自「unix v7是最后一个广泛发布的研究型UNIX版本」· C语言 代码 · 共 15 行

lseek(fd, off, ptr)
int fd, ptr;
long off;
{
	unsigned a;

	a = off;

	if (a == off)
		return (syscall(19, fd, 0, a, ptr, 0));
	a = off/512;
	syscall(19, fd, 0, a, ptr+3, 0);
	return(syscall(19, fd, 0, (int) (off%512), ptr, 0));
}