(root)/
tar-1.35/
gnu/
mkfifoat.c
       1  /* Create a named fifo relative to an open directory.
       2     Copyright (C) 2009-2023 Free Software Foundation, Inc.
       3  
       4     This program is free software: you can redistribute it and/or modify
       5     it under the terms of the GNU General Public License as published by
       6     the Free Software Foundation, either version 3 of the License, or
       7     (at your option) any later version.
       8  
       9     This program is distributed in the hope that it will be useful,
      10     but WITHOUT ANY WARRANTY; without even the implied warranty of
      11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
      12     GNU General Public License for more details.
      13  
      14     You should have received a copy of the GNU General Public License
      15     along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
      16  
      17  /* written by Eric Blake */
      18  
      19  #include <config.h>
      20  
      21  /* Specification.  */
      22  #include <sys/stat.h>
      23  
      24  #include <stdlib.h>
      25  
      26  #if HAVE_MKFIFOAT
      27  
      28  # include <errno.h>
      29  # include <fcntl.h>
      30  # include <string.h>
      31  
      32  int
      33  rpl_mkfifoat (int fd, char const *file, mode_t mode)
      34  #undef mkfifoat
      35  {
      36    /* Use the original mkfifoat(), but correct the trailing slash handling.  */
      37    size_t len = strlen (file);
      38    if (len && file[len - 1] == '/')
      39      {
      40        struct stat st;
      41  
      42        if (fstatat (fd, file, &st, AT_SYMLINK_NOFOLLOW) < 0)
      43          {
      44            if (errno == EOVERFLOW)
      45              /* It's surely a file, not a directory.  */
      46              errno = ENOTDIR;
      47          }
      48        else
      49          {
      50            /* It's a directory, otherwise fstatat() would have reported an error
      51               ENOTDIR.  */
      52            errno = EEXIST;
      53          }
      54        return -1;
      55      }
      56  
      57    return mkfifoat (fd, file, mode);
      58  }
      59  
      60  #else
      61  
      62  # if !HAVE_MKFIFO
      63  
      64  #  include <errno.h>
      65  
      66  /* Mingw lacks mkfifo, so this wrapper is trivial.  */
      67  
      68  int
      69  mkfifoat (_GL_UNUSED int fd, _GL_UNUSED char const *path,
      70            _GL_UNUSED mode_t mode)
      71  {
      72    errno = ENOSYS;
      73    return -1;
      74  }
      75  
      76  # else /* HAVE_MKFIFO */
      77  
      78  /* Create a named fifo FILE relative to directory FD, with access
      79     permissions in MODE.  If possible, do it without changing the
      80     working directory.  Otherwise, resort to using save_cwd/fchdir,
      81     then mkfifo/restore_cwd.  If either the save_cwd or the restore_cwd
      82     fails, then give a diagnostic and exit nonzero.  */
      83  
      84  #  define AT_FUNC_NAME mkfifoat
      85  #  define AT_FUNC_F1 mkfifo
      86  #  define AT_FUNC_POST_FILE_PARAM_DECLS , mode_t mode
      87  #  define AT_FUNC_POST_FILE_ARGS        , mode
      88  #  include "at-func.c"
      89  #  undef AT_FUNC_NAME
      90  #  undef AT_FUNC_F1
      91  #  undef AT_FUNC_POST_FILE_PARAM_DECLS
      92  #  undef AT_FUNC_POST_FILE_ARGS
      93  
      94  # endif /* HAVE_MKFIFO */
      95  
      96  #endif /* HAVE_MKFIFOAT */