1: /* Copyright (C) 1993, 1995-2001, 2002, 2003, 2004, 2007
    2:    Free Software Foundation, Inc.
    3:    This file is part of the GNU C Library.
    4: 
    5:    The GNU C Library is free software; you can redistribute it and/or
    6:    modify it under the terms of the GNU Lesser General Public
    7:    License as published by the Free Software Foundation; either
    8:    version 2.1 of the License, or (at your option) any later version.
    9: 
   10:    The GNU C 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 GNU
   13:    Lesser General Public License for more details.
   14: 
   15:    You should have received a copy of the GNU Lesser General Public
   16:    License along with the GNU C Library; if not, write to the Free
   17:    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
   18:    02111-1307 USA.
   19: 
   20:    As a special exception, if you link the code in this file with
   21:    files compiled with a GNU compiler to produce an executable,
   22:    that does not cause the resulting executable to be covered by
   23:    the GNU Lesser General Public License.  This exception does not
   24:    however invalidate any other reasons why the executable file
   25:    might be covered by the GNU Lesser General Public License.
   26:    This exception applies to code released by its copyright holders
   27:    in files containing the exception.  */
   28: 
   29: #include <stdio.h>
   30: #include <stdlib.h>
   31: #include <libioP.h>
   32: #include <errno.h>
   33: 
   34: 
   35: off_t
   36: ftello (fp)
   37:      _IO_FILE *fp;
   38: {
   39:   _IO_off64_t pos;
   40:   CHECK_FILE (fp, -1L);
   41:   _IO_acquire_lock (fp);
   42:   pos = _IO_seekoff_unlocked (fp, 0, _IO_seek_cur, 0);
   43:   if (_IO_in_backup (fp) && pos != _IO_pos_BAD)
   44:     {
   45:       if (fp->_mode <= 0)
   46:         pos -= fp->_IO_save_end - fp->_IO_save_base;
   47:     }
   48:   _IO_release_lock (fp);
   49:   if (pos == _IO_pos_BAD)
   50:     {
   51: #ifdef EIO
   52:       if (errno == 0)
   53:         __set_errno (EIO);
   54: #endif
   55:       return -1L;
   56:     }
   57:   if ((_IO_off64_t) (off_t) pos != pos)
   58:     {
   59: #ifdef EOVERFLOW
   60:       __set_errno (EOVERFLOW);
   61: #endif
   62:       return -1L;
   63:     }
   64:   return pos;
   65: }
   66: libc_hidden_def (ftello)