lib/symlinkat.c

   1 /* Create a symlink relative to an open directory.
   2    Copyright (C) 2009 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 <http://www.gnu.org/licenses/>.  */
  16
  17 /* written by Eric Blake */
  18
  19 #include <config.h>
  20
  21 #include <unistd.h>
  22
  23 #if !HAVE_SYMLINK
  24 /* Mingw lacks symlink, so this wrapper is trivial.  */
  25
  26 # include <errno.h>
  27
  28 int
  29 symlinkat (char const *path1 _UNUSED_PARAMETER_, int fd _UNUSED_PARAMETER_,
  30            char const *path2 _UNUSED_PARAMETER_)
  31 {
  32   errno = ENOSYS;
  33   return -1;
  34 }
  35
  36 #else /* HAVE_SYMLINK */
  37
  38 /* Our openat helper functions expect the directory parameter first,
  39    not second.  These shims make life easier.  */
  40
  41 /* Like symlink, but with arguments reversed.  */
  42 static int
  43 symlink_reversed (char const *file, char const *contents)
  44 {
  45   return symlink (contents, file);
  46 }
  47
  48 /* Like symlinkat, but with arguments reversed.  */
  49
  50 static int
  51 symlinkat_reversed (int fd, char const *file, char const *contents);
  52
  53 # define AT_FUNC_NAME symlinkat_reversed
  54 # define AT_FUNC_F1 symlink_reversed
  55 # define AT_FUNC_POST_FILE_PARAM_DECLS , char const *contents
  56 # define AT_FUNC_POST_FILE_ARGS        , contents
  57 # include "at-func.c"
  58 # undef AT_FUNC_NAME
  59 # undef AT_FUNC_F1
  60 # undef AT_FUNC_POST_FILE_PARAM_DECLS
  61 # undef AT_FUNC_POST_FILE_ARGS
  62
  63 /* Create a symlink FILE, in the directory open on descriptor FD,
  64    holding CONTENTS.  If possible, do it without changing the
  65    working directory.  Otherwise, resort to using save_cwd/fchdir,
  66    then symlink/restore_cwd.  If either the save_cwd or the restore_cwd
  67    fails, then give a diagnostic and exit nonzero.  */
  68
  69 int
  70 symlinkat (char const *contents, int fd, char const *file)
  71 {
  72   return symlinkat_reversed (fd, file, contents);
  73 }
  74
  75 #endif /* HAVE_SYMLINK */
  76
  77 /* Gnulib provides a readlink stub for mingw; use it for distinction
  78    between EINVAL and ENOENT, rather than always failing with ENOSYS.  */
  79
  80 /* POSIX 2008 says that unlike readlink, readlinkat returns 0 for
  81    success instead of the buffer length.  But this would render
  82    readlinkat worthless since readlink does not guarantee a
  83    NUL-terminated buffer.  Assume this was a bug in POSIX.  */
  84
  85 /* Read the contents of symlink FILE into buffer BUF of size LEN, in the
  86    directory open on descriptor FD.  If possible, do it without changing
  87    the working directory.  Otherwise, resort to using save_cwd/fchdir,
  88    then readlink/restore_cwd.  If either the save_cwd or the restore_cwd
  89    fails, then give a diagnostic and exit nonzero.  */
  90
  91 #define AT_FUNC_NAME readlinkat
  92 #define AT_FUNC_F1 readlink
  93 #define AT_FUNC_POST_FILE_PARAM_DECLS , char *buf, size_t len
  94 #define AT_FUNC_POST_FILE_ARGS        , buf, len
  95 #define AT_FUNC_RESULT ssize_t
  96 #include "at-func.c"
  97 #undef AT_FUNC_NAME
  98 #undef AT_FUNC_F1
  99 #undef AT_FUNC_POST_FILE_PARAM_DECLS
 100 #undef AT_FUNC_POST_FILE_ARGS
 101 #undef AT_FUNC_RESULT