kc3-lang/gnulib/lib/fseeko.c

• Show log

  Commit

• Hash : 3f3d9b41
  Author :
  Date : 2012-04-14T23:27:45
  

  Large File Support for native Windows platforms.
  
  * m4/largefile.m4 (gl_LARGEFILE): New macro.
  * modules/largefile (configure.ac): Require gl_LARGEFILE.
  
  * lib/sys_types.in.h (off_t) [WINDOWS_64_BIT_OFF_T]: Define to a 64-bit
  type.
  * m4/sys_types_h.m4 (gl_SYS_TYPES_H): Set WINDOWS_64_BIT_OFF_T.
  * modules/sys_types (Makefile.am): Substitute WINDOWS_64_BIT_OFF_T.
  * doc/posix-headers/sys_types.texi: Mention the effect of the
  'largefile' module.
  
  * lib/fcntl.in.h: Add comments about off_t.
  * modules/fcntl-h (Depends-on): Add sys_types.
  
  * lib/unistd.in.h [WINDOWS_64_BIT_OFF_T]: Include <sys/types.h>.
  (ftruncate): Replace it if REPLACE_FTRUNCATE is 1.
  * m4/unistd_h.m4 (gl_UNISTD_H): Require gl_SYS_TYPES_H.
  (gl_UNISTD_H_DEFAULTS): Initialize REPLACE_FTRUNCATE.
  * modules/unistd (Depends-on): Add sys_types.
  (Makefile.am): Substitute WINDOWS_64_BIT_OFF_T, REPLACE_FTRUNCATE.
  
  * lib/lseek.c (rpl_lseek) [_GL_WINDOWS_64_BIT_OFF_T]: Use _lseeki64
  instead of lseek.
  * m4/lseek.m4 (gl_FUNC_LSEEK): Require gl_SYS_TYPES_H. Set
  REPLACE_LSEEK if WINDOWS_64_BIT_OFF_T is 1.
  * modules/lseek (Depends-on): Add sys_types.
  
  * lib/ftruncate.c: Put under GPLv3+. Include <windows.h>,
  msvc-nothrow.h.
  (SetFileSize): New function.
  (ftruncate) [_GL_WINDOWS_64_BIT_OFF_T]: New implementation.
  * m4/ftruncate.m4 (gl_FUNC_FTRUNCATE): Set REPLACE_FTRUNCATE on Windows
  if Large File Support is requested.
  * modules/ftruncate (configure.ac): Consider REPLACE_FTRUNCATE.
  (Depends-on): Add sys_types, msvc-nothrow. Update conditions.
  
  * lib/stdio.in.h: Add comments about off_t.
  * modules/stdio (Depends-on): Add sys_types.
  
  * lib/ftello.c [_GL_WINDOWS_64_BIT_OFF_T]: Use _ftelli64 or ftello64
  instead of ftello.
  * m4/ftello.m4 (gl_FUNC_FTELLO): Require gl_SYS_TYPES_H. Set
  REPLACE_FTELLO if WINDOWS_64_BIT_OFF_T is 1.
  (gl_PREREQ_FTELLO): New macro.
  * modules/ftello (Depends-on): Add sys_types.
  (configure.ac): Incoke gl_PREREQ_FTELLO.
  
  * lib/fseeko.c [_GL_WINDOWS_64_BIT_OFF_T]: Use _fseeki64 or fseeko64
  instead of fseeko.
  * m4/fseeko.m4 (gl_FUNC_FSEEKO): Require gl_SYS_TYPES_H. Set
  REPLACE_FSEEKO if WINDOWS_64_BIT_OFF_T is 1.
  (gl_PREREQ_FSEEKO): New macro.
  * modules/fseeko (Depends-on): Add sys_types.
  (configure.ac): Invoke gl_PREREQ_FSEEKO.
  
  * lib/sys_stat.in.h: Add comments about off_t.
  (stat, fstat) [WINDOWS_64_BIT_ST_SIZE]: Define to variants that use a
  64-bit integer for st_size in 'struct stat'.
  * m4/sys_stat_h.m4 (gl_HEADER_SYS_STAT_H): Set WINDOWS_64_BIT_ST_SIZE.
  Define _GL_WINDOWS_64_BIT_ST_SIZE.
  * modules/sys_stat (Depends-on): Add sys_types.
  (Makefile.am): Substitute WINDOWS_64_BIT_ST_SIZE.
  
  * lib/stat.c (stat) [_GL_WINDOWS_64_BIT_ST_SIZE]: Define to _stati64
  instead of stat or _stat.
  
  * lib/fstat.c [_GL_WINDOWS_64_BIT_ST_SIZE]: Use _fstati64 and
  'struct _stati64' instead of fstat and 'struct stat'.
  * m4/fstat.m4 (gl_FUNC_FSTAT): Require gl_HEADER_SYS_STAT_H. Set
  REPLACE_FSTAT if WINDOWS_64_BIT_ST_SIZE is 1.
  
  Reported by Ray Satiro <raysatiro@yahoo.com>.
  

Download

• lib/fseeko.c

• /* An fseeko() function that, together with fflush(), is POSIX compliant.
     Copyright (C) 2007-2012 Free Software Foundation, Inc.
  
     This program is free software; you can redistribute it and/or modify
     it under the terms of the GNU General Public License as published by
     the Free Software Foundation; either version 2, or (at your option)
     any later version.
  
     This program is distributed in the hope that it will be useful,
     but WITHOUT ANY WARRANTY; without even the implied warranty of
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     GNU General Public License for more details.
  
     You should have received a copy of the GNU General Public License along
     with this program; if not, see <http://www.gnu.org/licenses/>.  */
  
  #include <config.h>
  
  /* Specification.  */
  #include <stdio.h>
  
  /* Get off_t and lseek.  */
  #include <unistd.h>
  
  #include "stdio-impl.h"
  
  int
  fseeko (FILE *fp, off_t offset, int whence)
  #undef fseeko
  #if !HAVE_FSEEKO
  # undef fseek
  # define fseeko fseek
  #endif
  #if _GL_WINDOWS_64_BIT_OFF_T
  # undef fseeko
  # if HAVE__FSEEKI64 /* msvc, mingw64 */
  #  define fseeko _fseeki64
  # else /* mingw */
  #  define fseeko fseeko64
  # endif
  #endif
  {
  #if LSEEK_PIPE_BROKEN
    /* mingw gives bogus answers rather than failure on non-seekable files.  */
    if (lseek (fileno (fp), 0, SEEK_CUR) == -1)
      return EOF;
  #endif
  
    /* These tests are based on fpurge.c.  */
  #if defined _IO_ftrylockfile || __GNU_LIBRARY__ == 1 /* GNU libc, BeOS, Haiku, Linux libc5 */
    if (fp->_IO_read_end == fp->_IO_read_ptr
        && fp->_IO_write_ptr == fp->_IO_write_base
        && fp->_IO_save_base == NULL)
  #elif defined __sferror || defined __DragonFly__ /* FreeBSD, NetBSD, OpenBSD, DragonFly, MacOS X, Cygwin */
  # if defined __SL64 && defined __SCLE /* Cygwin */
    if ((fp->_flags & __SL64) == 0)
      {
        /* Cygwin 1.5.0 through 1.5.24 failed to open stdin in 64-bit
           mode; but has an fseeko that requires 64-bit mode.  */
        FILE *tmp = fopen ("/dev/null", "r");
        if (!tmp)
          return -1;
        fp->_flags |= __SL64;
        fp->_seek64 = tmp->_seek64;
        fclose (tmp);
      }
  # endif
    if (fp_->_p == fp_->_bf._base
        && fp_->_r == 0
        && fp_->_w == ((fp_->_flags & (__SLBF | __SNBF | __SRD)) == 0 /* fully buffered and not currently reading? */
                       ? fp_->_bf._size
                       : 0)
        && fp_ub._base == NULL)
  #elif defined __EMX__               /* emx+gcc */
    if (fp->_ptr == fp->_buffer
        && fp->_rcount == 0
        && fp->_wcount == 0
        && fp->_ungetc_count == 0)
  #elif defined __minix               /* Minix */
    if (fp_->_ptr == fp_->_buf
        && (fp_->_ptr == NULL || fp_->_count == 0))
  #elif defined _IOERR                /* AIX, HP-UX, IRIX, OSF/1, Solaris, OpenServer, mingw, NonStop Kernel */
    if (fp_->_ptr == fp_->_base
        && (fp_->_ptr == NULL || fp_->_cnt == 0))
  #elif defined __UCLIBC__            /* uClibc */
    if (((fp->__modeflags & __FLAG_WRITING) == 0
         || fp->__bufpos == fp->__bufstart)
        && ((fp->__modeflags & (__FLAG_READONLY | __FLAG_READING)) == 0
            || fp->__bufpos == fp->__bufread))
  #elif defined __QNX__               /* QNX */
    if ((fp->_Mode & 0x2000 /* _MWRITE */ ? fp->_Next == fp->_Buf : fp->_Next == fp->_Rend)
        && fp->_Rback == fp->_Back + sizeof (fp->_Back)
        && fp->_Rsave == NULL)
  #elif defined __MINT__              /* Atari FreeMiNT */
    if (fp->__bufp == fp->__buffer
        && fp->__get_limit == fp->__bufp
        && fp->__put_limit == fp->__bufp
        && !fp->__pushed_back)
  #elif defined EPLAN9                /* Plan9 */
    if (fp->rp == fp->buf
        && fp->wp == fp->buf)
  #else
    #error "Please port gnulib fseeko.c to your platform! Look at the code in fpurge.c, then report this to bug-gnulib."
  #endif
      {
        /* We get here when an fflush() call immediately preceded this one (or
           if ftell() has created buffers but no I/O has occurred on a
           newly-opened stream).  We know there are no buffers.  */
        off_t pos = lseek (fileno (fp), offset, whence);
        if (pos == -1)
          {
  #if defined __sferror || defined __DragonFly__ /* FreeBSD, NetBSD, OpenBSD, DragonFly, MacOS X, Cygwin */
            fp_->_flags &= ~__SOFF;
  #endif
            return -1;
          }
  
  #if defined _IO_ftrylockfile || __GNU_LIBRARY__ == 1 /* GNU libc, BeOS, Haiku, Linux libc5 */
        fp->_flags &= ~_IO_EOF_SEEN;
        fp->_offset = pos;
  #elif defined __sferror || defined __DragonFly__ /* FreeBSD, NetBSD, OpenBSD, DragonFly, MacOS X, Cygwin */
  # if defined __CYGWIN__
        /* fp_->_offset is typed as an integer.  */
        fp_->_offset = pos;
  # else
        /* fp_->_offset is an fpos_t.  */
        {
          /* Use a union, since on NetBSD, the compilation flags
             determine whether fpos_t is typedef'd to off_t or a struct
             containing a single off_t member.  */
          union
            {
              fpos_t f;
              off_t o;
            } u;
          u.o = pos;
          fp_->_offset = u.f;
        }
  # endif
        fp_->_flags |= __SOFF;
        fp_->_flags &= ~__SEOF;
  #elif defined __EMX__               /* emx+gcc */
        fp->_flags &= ~_IOEOF;
  #elif defined _IOERR                /* AIX, HP-UX, IRIX, OSF/1, Solaris, OpenServer, mingw, NonStop Kernel */
        fp->_flag &= ~_IOEOF;
  #elif defined __MINT__              /* Atari FreeMiNT */
        fp->__offset = pos;
        fp->__eof = 0;
  #endif
        return 0;
      }
    return fseeko (fp, offset, whence);
  }
  

Download