kc3-lang/gnulib/lib/fopen.c

• Show log

  Commit

• Hash : 44b65c48
  Author :
  Date : 2018-05-03T23:09:42
  

  Simplify code. Drop support for Borland C++ on Windows.
  
  Reported by Gisle Vanem <gisle.vanem@gmail.com>.
  
  * lib/accept4.c: Simplify 'defined _WIN32 || defined __WIN32__' to just
  'defined _WIN32'.
  * lib/canonicalize-lgpl.c: Likewise.
  * lib/classpath.c: Likewise.
  * lib/clean-temp.c: Likewise.
  * lib/csharpexec.c: Likewise.
  * lib/ctime.c: Likewise.
  * lib/dosname.h: Likewise.
  * lib/dup2.c: Likewise.
  * lib/errno.in.h: Likewise.
  * lib/error.c: Likewise.
  * lib/euidaccess.c: Likewise.
  * lib/execute.c: Likewise.
  * lib/fcntl.in.h: Likewise.
  * lib/fcntl.c: Likewise.
  * lib/filename.h: Likewise.
  * lib/findprog.c: Likewise.
  * lib/flock.c: Likewise.
  * lib/fopen.c: Likewise.
  * lib/freopen.c: Likewise.
  * lib/fstat.c: Likewise.
  * lib/fsync.c: Likewise.
  * lib/gc-gnulib.c: Likewise.
  * lib/get-rusage-data.c: Likewise.
  * lib/getaddrinfo.c: Likewise.
  * lib/getdelim.c: Likewise.
  * lib/getdtablesize.c: Likewise.
  * lib/gethostname.c: Likewise.
  * lib/getlogin.c: Likewise.
  * lib/getlogin_r.c: Likewise.
  * lib/getopt.c: Likewise.
  * lib/getpagesize.c: Likewise.
  * lib/getpass.c: Likewise.
  * lib/getrusage.c: Likewise.
  * lib/gettimeofday.c: Likewise.
  * lib/glob.c: Likewise.
  * lib/inttypes.in.h: Likewise.
  * lib/isapipe.c: Likewise.
  * lib/javaexec.c: Likewise.
  * lib/link.c: Likewise.
  * lib/localcharset.c: Likewise.
  * lib/localename.h: Likewise.
  * lib/localename.c: Likewise.
  * lib/localtime.c: Likewise.
  * lib/lseek.c: Likewise.
  * lib/mbsinit.c: Likewise.
  * lib/mkdir.c: Likewise.
  * lib/msvc-nothrow.h: Likewise.
  * lib/nanosleep.c: Likewise.
  * lib/nl_langinfo.c: Likewise.
  * lib/nonblocking.c: Likewise.
  * lib/nproc.c: Likewise.
  * lib/open.c: Likewise.
  * lib/openpty.c: Likewise.
  * lib/pathmax.h: Likewise.
  * lib/pipe-filter-aux.c: Likewise.
  * lib/pipe-filter-gi.c: Likewise.
  * lib/pipe-filter-ii.c: Likewise.
  * lib/pipe.c: Likewise.
  * lib/pipe2.c: Likewise.
  * lib/poll.c: Likewise.
  * lib/popen.c: Likewise.
  * lib/posix_openpt.c: Likewise.
  * lib/printf-parse.c: Likewise.
  * lib/progreloc.c: Likewise.
  * lib/putenv.c: Likewise.
  * lib/read.c: Likewise.
  * lib/relocatable.c: Likewise.
  * lib/rename.c: Likewise.
  * lib/same-inode.h: Likewise.
  * lib/secure_getenv.c: Likewise.
  * lib/select.c: Likewise.
  * lib/sethostname.c: Likewise.
  * lib/setlocale.c: Likewise.
  * lib/sigaction.c: Likewise.
  * lib/sigprocmask.c: Likewise.
  * lib/sleep.c: Likewise.
  * lib/spawn-pipe.h: Likewise.
  * lib/spawn-pipe.c: Likewise.
  * lib/spawni.c: Likewise.
  * lib/stat-time.h: Likewise.
  * lib/stat-w32.c: Likewise.
  * lib/stat.c: Likewise.
  * lib/stdio.in.h: Likewise.
  * lib/stdio-impl.h: Likewise.
  * lib/stdio-read.c: Likewise.
  * lib/stdio-write.c: Likewise.
  * lib/stdlib.in.h: Likewise.
  * lib/strerror_r.c: Likewise.
  * lib/strftime-fixes.c: Likewise.
  * lib/sys_stat.in.h: Likewise.
  * lib/sys_types.in.h: Likewise.
  * lib/sys_wait.in.h : Likewise.
  * lib/system-quote.h: Likewise.
  * lib/system-quote.c: Likewise.
  * lib/tmpdir.c: Likewise.
  * lib/tzset.c: Likewise.
  * lib/uname.c: Likewise.
  * lib/unistd.in.h: Likewise.
  * lib/utime.in.h: Likewise.
  * lib/utime.c: Likewise.
  * lib/utimecmp.c: Likewise.
  * lib/utimens.c: Likewise.
  * lib/vasnprintf.c: Likewise.
  * lib/vma-iter.h: Likewise.
  * lib/vma-iter.c: Likewise.
  * lib/wait-process.c: Likewise.
  * lib/wcsftime.c: Likewise.
  * lib/wctype.in.h: Likewise.
  * lib/write.c: Likewise.
  * tests/nap.h: Likewise.
  * tests/test-cloexec.c: Likewise.
  * tests/test-dup-safer.c: Likewise.
  * tests/test-dup2.c: Likewise.
  * tests/test-dup3.c: Likewise.
  * tests/test-fcntl.c: Likewise.
  * tests/test-get-rusage-data.c: Likewise.
  * tests/test-getaddrinfo.c: Likewise.
  * tests/test-getlogin.h: Likewise.
  * tests/test-isatty.c: Likewise.
  * tests/test-localename.c: Likewise.
  * tests/test-mbrtowc-w32.c: Likewise.
  * tests/test-nonblocking.c: Likewise.
  * tests/test-nonblocking-pipe-main.c: Likewise.
  * tests/test-nonblocking-socket-main.c: Likewise.
  * tests/test-nonblocking-socket.h: Likewise.
  * tests/test-pipe.c: Likewise.
  * tests/test-pipe2.c: Likewise.
  * tests/test-poll.c: Likewise.
  * tests/test-pthread_sigmask1.c: Likewise.
  * tests/test-select.h: Likewise.
  * tests/test-sethostname2.c: Likewise.
  * tests/test-sigprocmask.c: Likewise.
  * tests/test-spawn-pipe-child.c: Likewise.
  * tests/test-stat-time.c: Likewise.
  * tests/test-system-quote-main.c: Likewise.
  * tests/test-utimens-common.h: Likewise.
  * tests/test-wcrtomb-w32.c: Likewise.
  * m4/csharpexec.m4 (gt_CSHARPEXEC): Likewise.
  * m4/getcwd.m4 (gl_FUNC_GETCWD_NULL): Likewise.
  * m4/javacomp.m4 (gt_JAVACOMP): Likewise.
  * m4/javaexec.m4 (gt_JAVAEXEC): Likewise.
  * m4/locale-ar.m4 (gt_LOCALE_AR): Likewise.
  * m4/locale-fr.m4 (gt_LOCALE_FR, gt_LOCALE_FR_UTF8): Likewise.
  * m4/locale-ja.m4 (gt_LOCALE_JA): Likewise.
  * m4/locale-tr.m4 (gt_LOCALE_TR_UTF8): Likewise.
  * m4/locale-zh.m4 (gt_LOCALE_ZH_CN): Likewise.
  * m4/malloc.m4 (gl_CHECK_MALLOC_POSIX): Likewise.
  * m4/nocrash.m4 (GL_NOCRASH): Likewise.
  * m4/pathmax.m4 (gl_PATHMAX_SNIPPET): Likewise.
  * m4/ptsname_r.m4 (gl_PREREQ_PTSNAME_R): Likewise.
  * m4/stdio_h.m4 (gl_STDIO_H): Likewise.
  * m4/tmpfile.m4 (gl_FUNC_TMPFILE): Likewise.
  * m4/unistd_h.m4 (gl_UNISTD_H): Likewise.
  

Download

• lib/fopen.c

• /* Open a stream to a file.
     Copyright (C) 2007-2018 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 <https://www.gnu.org/licenses/>.  */
  
  /* Written by Bruno Haible <bruno@clisp.org>, 2007.  */
  
  /* If the user's config.h happens to include <stdio.h>, let it include only
     the system's <stdio.h> here, so that orig_fopen doesn't recurse to
     rpl_fopen.  */
  #define __need_FILE
  #include <config.h>
  
  /* Get the original definition of fopen.  It might be defined as a macro.  */
  #include <stdio.h>
  #undef __need_FILE
  
  static FILE *
  orig_fopen (const char *filename, const char *mode)
  {
    return fopen (filename, mode);
  }
  
  /* Specification.  */
  /* Write "stdio.h" here, not <stdio.h>, otherwise OSF/1 5.1 DTK cc eliminates
     this include because of the preliminary #include <stdio.h> above.  */
  #include "stdio.h"
  
  #include <errno.h>
  #include <fcntl.h>
  #include <string.h>
  #include <unistd.h>
  #include <sys/types.h>
  #include <sys/stat.h>
  
  FILE *
  rpl_fopen (const char *filename, const char *mode)
  {
  #if defined _WIN32 && ! defined __CYGWIN__
    if (strcmp (filename, "/dev/null") == 0)
      filename = "NUL";
  #endif
  
  #if FOPEN_TRAILING_SLASH_BUG
    /* If the filename ends in a slash and a mode that requires write access is
       specified, then fail.
       Rationale: POSIX <http://www.opengroup.org/susv3/basedefs/xbd_chap04.html>
       says that
         "A pathname that contains at least one non-slash character and that
          ends with one or more trailing slashes shall be resolved as if a
          single dot character ( '.' ) were appended to the pathname."
       and
         "The special filename dot shall refer to the directory specified by
          its predecessor."
       If the named file already exists as a directory, then if a mode that
       requires write access is specified, fopen() must fail because POSIX
       <http://www.opengroup.org/susv3/functions/fopen.html> says that it
       fails with errno = EISDIR in this case.
       If the named file does not exist or does not name a directory, then
       fopen() must fail since the file does not contain a '.' directory.  */
    {
      size_t len = strlen (filename);
      if (len > 0 && filename[len - 1] == '/')
        {
          int fd;
          struct stat statbuf;
          FILE *fp;
  
          if (mode[0] == 'w' || mode[0] == 'a')
            {
              errno = EISDIR;
              return NULL;
            }
  
          fd = open (filename, O_RDONLY);
          if (fd < 0)
            return NULL;
  
          if (fstat (fd, &statbuf) >= 0 && !S_ISDIR (statbuf.st_mode))
            {
              close (fd);
              errno = ENOTDIR;
              return NULL;
            }
  
          fp = fdopen (fd, mode);
          if (fp == NULL)
            {
              int saved_errno = errno;
              close (fd);
              errno = saved_errno;
            }
          return fp;
        }
    }
  # endif
  
    return orig_fopen (filename, mode);
  }
  

Download