kc3-lang/gnulib/lib/fclose.c

• Show log

  Commit

• Hash : bcbcf0c5
  Author :
  Date : 2011-05-02T15:00:50
  

  fflush: also replace fclose when fixing fflush
  
  This fixes the fclose failures detected in the previous patch,
  but only when the GPL fflush module is also in use.  That is
  because the need for behavior of resetting seekable input streams
  is much less common, and the fix more complex.  The LGPLv2+ test
  for fclose() in isolation is relaxed to pass if fflush is not
  being replaced to cater to input streams.
  
  * modules/fflush (Depends-on): Add fclose.
  * m4/fflush.m4 (gl_FUNC_FFLUSH): Also replace fclose.
  * lib/fclose.c (rpl_fclose): Don't cause spurious failures on
  memstreams with no backing fd.
  * doc/posix-functions/fclose.texi (fclose): Document the use of
  fflush module to fix the bug.
  * tests/test-fclose.c (main): Relax test when fclose is used in
  isolation.
  
  Signed-off-by: Eric Blake <eblake@redhat.com>
  

Download

• lib/fclose.c

• /* fclose replacement.
     Copyright (C) 2008-2011 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 3 of the License, 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>
  
  #include <errno.h>
  #include <unistd.h>
  
  #include "freading.h"
  
  /* Override fclose() to call the overridden fflush() or close().  */
  
  int
  rpl_fclose (FILE *fp)
  #undef fclose
  {
    int saved_errno = 0;
    int fd;
  
    /* Don't change behavior on memstreams.  */
    fd = fileno (fp);
    if (fd < 0)
      return fclose (fp);
  
    /* We only need to flush the file if it is not reading or if it is
       seekable.  This only guarantees the file position of input files
       if the fflush module is also in use.  */
    if ((!freading (fp) || lseek (fileno (fp), 0, SEEK_CUR) != -1)
        && fflush (fp))
      saved_errno = errno;
  
    if (close (fd) < 0 && saved_errno == 0)
      saved_errno = errno;
  
    fclose (fp); /* will fail with errno = EBADF */
  
    if (saved_errno != 0)
      {
        errno = saved_errno;
        return EOF;
      }
    return 0;
  }
  

Download