kc3-lang/gnulib/lib/freopen.c

• Show log

  Commit

• Hash : 26fd3545
  Author :
  Date : 2025-09-16T23:08:01
  

  stringeq: prefer streq to strcmp in other modules
  
  * lib/acl-internal.c, lib/argmatch.c, lib/argp-help.c:
  * lib/argp-parse.c, lib/bcp47.c, lib/c32_get_mapping.c:
  * lib/c32_get_type_test.c, lib/concat-filename.c:
  * lib/cpu-supports.h, lib/dfa.c, lib/duplocale.c, lib/exclude.c:
  * lib/findprog-in.c, lib/findprog.c, lib/fopen.c, lib/freopen.c:
  * lib/fts.c, lib/gen-uni-tables.c, lib/getfilecon.c:
  * lib/getlogin.c, lib/getugroups.c, lib/hard-locale.c:
  * lib/hashcode-named-file.c, lib/hashkey-string.c:
  * lib/iconv_open.c, lib/idcache.c, lib/lc-charset-unicode.c:
  * lib/localcharset.c, lib/localename-environ.c:
  * lib/localename-unsafe.c, lib/mbs_endswith.c, lib/mountlist.c:
  * lib/newlocale.c, lib/nl_langinfo.c, lib/nproc.c, lib/open.c:
  * lib/os2-spawn.c, lib/parse-datetime.y, lib/popen.c:
  * lib/progreloc.c, lib/propername.c, lib/pt_chown.c, lib/putenv.c:
  * lib/qcopy-acl.c, lib/readutmp.c, lib/rpmatch.c:
  * lib/setlocale-fixes.c, lib/setlocale.c, lib/sig2str.c:
  * lib/spawni.c, lib/stat.c, lib/str_endswith.c, lib/streq.h:
  * lib/striconveha.c, lib/struniq.h, lib/supersede.c:
  * lib/time_rz.c, lib/unicodeio.c, lib/vasnprintf.c:
  * lib/vc-mtime.c, lib/wctrans-impl.h, lib/wctype-impl.h:
  Prefer streq to strcmp when either will do.
  Do not make this change to files shared with glibc.
  Do not make the change to test files, at least not for now.
  * lib/gen-uni-tables.c (streq): New static function, in same style.
  * modules/acl-permissions, modules/argp, modules/c32_get_mapping:
  * modules/c32_get_type_test, modules/concat-filename:
  * modules/cpu-supports, modules/dfa, modules/duplocale:
  * modules/exclude, modules/findprog, modules/findprog-in:
  * modules/fopen, modules/fopen-gnu, modules/freopen, modules/fts:
  * modules/getlocalename_l-simple, modules/getlocalename_l-unsafe:
  * modules/getlogin, modules/getugroups, modules/hard-locale:
  * modules/hashcode-named-file, modules/hashkey-string:
  * modules/iconv_open, modules/idcache, modules/localcharset:
  * modules/localename, modules/localename-unsafe:
  * modules/mbs_endswith, modules/mountlist, modules/newlocale:
  * modules/nl_langinfo, modules/nproc, modules/open:
  * modules/parse-datetime, modules/popen:
  * modules/posix_spawn-internal, modules/propername:
  * modules/pt_chown, modules/putenv-gnu, modules/qcopy-acl:
  * modules/rpmatch, modules/selinux-h, modules/setenv:
  * modules/setlocale, modules/setlocale-fixes, modules/sig2str:
  * modules/spawn-pipe, modules/stat, modules/str_endswith:
  * modules/streq, modules/striconveha, modules/supersede:
  * modules/time_rz, modules/uchar-h, modules/unicodeio:
  * modules/uniconv/base, modules/wctrans, modules/wctype:
  (Depends-on): Add stringeq.
  

Download

• lib/freopen.c

• /* Open a stream to a file.
     Copyright (C) 2007-2025 Free Software Foundation, Inc.
  
     This file is free software: you can redistribute it and/or modify
     it under the terms of the GNU Lesser General Public License as
     published by the Free Software Foundation, either version 3 of the
     License, or (at your option) any later version.
  
     This file 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 Lesser General Public License for more details.
  
     You should have received a copy of the GNU Lesser 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_freopen doesn't recurse to
     rpl_freopen.  */
  #define _GL_SKIP_GNULIB_STDIO_H
  #include <config.h>
  
  /* Get the original definition of freopen.  It might be defined as a macro.  */
  #include <stdio.h>
  #undef _GL_SKIP_GNULIB_STDIO_H
  
  #include <errno.h>
  
  static FILE *
  orig_freopen (const char *filename, const char *mode, FILE *stream)
  {
    return freopen (filename, mode, stream);
  }
  
  /* Specification.  */
  #include <stdio.h>
  
  #include <fcntl.h>
  #include <string.h>
  #include <unistd.h>
  
  FILE *
  rpl_freopen (const char *filename, const char *mode, FILE *stream)
  {
    FILE *result;
  #if defined _WIN32 && ! defined __CYGWIN__
    char const *null_device = "NUL";
    if (filename && streq (filename, "/dev/null"))
      filename = null_device;
  #else
    char const *null_device = "/dev/null";
  #endif
  
  #ifdef __KLIBC__
    errno = 0;
  #endif
  
    result = orig_freopen (filename, mode, stream);
  
    if (!result)
      {
  #ifdef __KLIBC__
        /* On OS/2 kLIBC, freopen returns NULL even if it is successful
           if filename is NULL. */
        if (!filename && !errno)
          result = stream;
  #endif
      }
    else if (filename)
      {
        int fd = fileno (result);
        if (dup2 (fd, fd) < 0 && errno == EBADF)
          {
            int nullfd = open (null_device, O_RDONLY | O_CLOEXEC);
            int err = 0;
            if (nullfd != fd)
              {
                if (dup2 (nullfd, fd) < 0)
                  err = 1;
                close (nullfd);
              }
            if (!err)
              result = orig_freopen (filename, mode, result);
          }
      }
  
    return result;
  }
  

Download