diff options
| author | Taru Karttunen <taruti@taruti.net> | 2011-03-30 15:46:40 +0300 |
|---|---|---|
| committer | Taru Karttunen <taruti@taruti.net> | 2011-03-30 15:46:40 +0300 |
| commit | e5888a1ffdae813d7575f5fb02275c6bb07e5199 (patch) | |
| tree | d8d51eac403f07814b9e936eed0c9a79195e2450 /sys/src/libstdio/ftell.c | |
Import sources from 2011-03-30 iso image
Diffstat (limited to 'sys/src/libstdio/ftell.c')
| -rwxr-xr-x | sys/src/libstdio/ftell.c | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/sys/src/libstdio/ftell.c b/sys/src/libstdio/ftell.c new file mode 100755 index 000000000..d5acbb373 --- /dev/null +++ b/sys/src/libstdio/ftell.c @@ -0,0 +1,16 @@ +/* + * pANS stdio -- ftell + */ +#include "iolib.h" +long ftell(FILE *f){ + long seekp=seek(f->fd, 0L, 1); + if(seekp<0) return -1; /* enter error state? */ + switch(f->state){ + default: + return seekp; + case RD: + return seekp-(f->wp-f->rp); + case WR: + return (f->flags&LINEBUF?f->lp:f->wp)-f->buf+seekp; + } +} |