|
|
1.1 ! root 1: /* ! 2: Copyright (C) 1993 Free Software Foundation ! 3: ! 4: This file is part of the GNU IO Library. This library is free ! 5: software; you can redistribute it and/or modify it under the ! 6: terms of the GNU General Public License as published by the ! 7: Free Software Foundation; either version 2, or (at your option) ! 8: any later version. ! 9: ! 10: This library is distributed in the hope that it will be useful, ! 11: but WITHOUT ANY WARRANTY; without even the implied warranty of ! 12: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ! 13: GNU General Public License for more details. ! 14: ! 15: You should have received a copy of the GNU General Public License ! 16: along with GNU CC; see the file COPYING. If not, write to ! 17: the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. ! 18: ! 19: As a special exception, if you link this library with files ! 20: compiled with a GNU compiler to produce an executable, this does not cause ! 21: the resulting executable to be covered by the GNU General Public License. ! 22: This exception does not however invalidate any other reasons why ! 23: the executable file might be covered by the GNU General Public License. */ ! 24: ! 25: #include "libioP.h" ! 26: #include <errno.h> ! 27: /* ANSI explicily requires setting errno to a positive value on failure. */ ! 28: ! 29: int ! 30: _IO_fgetpos(fp, posp) ! 31: _IO_FILE* fp; ! 32: _IO_fpos_t *posp; ! 33: { ! 34: _IO_fpos_t pos; ! 35: COERCE_FILE(fp); ! 36: pos = _IO_seekoff(fp, 0, _IO_seek_cur|_IO_seek_not_in|_IO_seek_not_out); ! 37: if (pos == _IO_pos_BAD) ! 38: { ! 39: #ifdef EIO ! 40: if (errno == 0) ! 41: errno = EIO; ! 42: #endif ! 43: return EOF; ! 44: } ! 45: *posp = pos; ! 46: return 0; ! 47: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.