33 lines
827 B
C
33 lines
827 B
C
/*
|
|
* This file is part of the UCB release of Plan 9. It is subject to the license
|
|
* terms in the LICENSE file found in the top-level directory of this
|
|
* distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No
|
|
* part of the UCB release of Plan 9, including this file, may be copied,
|
|
* modified, propagated, or distributed except according to the terms contained
|
|
* in the LICENSE file.
|
|
*/
|
|
|
|
/*
|
|
* pANS stdio -- fseeko
|
|
*/
|
|
#include "iolib.h"
|
|
int fseeko(FILE *f, long long offs, int type){
|
|
switch(f->state){
|
|
case ERR:
|
|
case CLOSED:
|
|
return -1;
|
|
case WR:
|
|
fflush(f);
|
|
break;
|
|
case RD:
|
|
if(type==1 && f->buf!=f->unbuf)
|
|
offs-=f->wp-f->rp;
|
|
break;
|
|
}
|
|
if(f->flags&STRING || seek(f->fd, offs, type)==-1) return -1;
|
|
if(f->state==RD) f->rp=f->wp=f->buf;
|
|
if(f->state!=OPEN)
|
|
f->state=RDWR;
|
|
return 0;
|
|
}
|