Import upstream version 1.26
[debian/tar] / gnu / openat-proc.c
1 /* -*- buffer-read-only: t -*- vi: set ro: */
2 /* DO NOT EDIT! GENERATED AUTOMATICALLY! */
3 /* Create /proc/self/fd-related names for subfiles of open directories.
4
5    Copyright (C) 2006, 2009-2011 Free Software Foundation, Inc.
6
7    This program is free software: you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
19
20 /* Written by Paul Eggert.  */
21
22 #include <config.h>
23
24 #include "openat-priv.h"
25
26 #include <sys/types.h>
27 #include <sys/stat.h>
28 #include <fcntl.h>
29
30 #include <stdio.h>
31 #include <stdlib.h>
32 #include <string.h>
33 #include <unistd.h>
34
35 #include "intprops.h"
36 #include "same-inode.h"
37
38 /* The results of open() in this file are not used with fchdir,
39    and we do not leak fds to any single-threaded code that could use stdio,
40    therefore save some unnecessary work in fchdir.c.
41    FIXME - if the kernel ever adds support for multi-thread safety for
42    avoiding standard fds, then we should use open_safer.  */
43 #undef open
44 #undef close
45
46 #define PROC_SELF_FD_FORMAT "/proc/self/fd/%d/%s"
47
48 #define PROC_SELF_FD_NAME_SIZE_BOUND(len) \
49   (sizeof PROC_SELF_FD_FORMAT - sizeof "%d%s" \
50    + INT_STRLEN_BOUND (int) + (len) + 1)
51
52
53 /* Set BUF to the expansion of PROC_SELF_FD_FORMAT, using FD and FILE
54    respectively for %d and %s.  If successful, return BUF if the
55    result fits in BUF, dynamically allocated memory otherwise.  But
56    return NULL if /proc is not reliable, either because the operating
57    system support is lacking or because memory is low.  */
58 char *
59 openat_proc_name (char buf[OPENAT_BUFFER_SIZE], int fd, char const *file)
60 {
61   static int proc_status = 0;
62
63   /* Make sure the caller gets ENOENT when appropriate.  */
64   if (!*file)
65     {
66       buf[0] = '\0';
67       return buf;
68     }
69
70   if (! proc_status)
71     {
72       /* Set PROC_STATUS to a positive value if /proc/self/fd is
73          reliable, and a negative value otherwise.  Solaris 10
74          /proc/self/fd mishandles "..", and any file name might expand
75          to ".." after symbolic link expansion, so avoid /proc/self/fd
76          if it mishandles "..".  Solaris 10 has openat, but this
77          problem is exhibited on code that built on Solaris 8 and
78          running on Solaris 10.  */
79
80       int proc_self_fd = open ("/proc/self/fd", O_SEARCH);
81       if (proc_self_fd < 0)
82         proc_status = -1;
83       else
84         {
85           struct stat proc_self_fd_dotdot_st;
86           struct stat proc_self_st;
87           char dotdot_buf[PROC_SELF_FD_NAME_SIZE_BOUND (sizeof ".." - 1)];
88           sprintf (dotdot_buf, PROC_SELF_FD_FORMAT, proc_self_fd, "..");
89           proc_status =
90             ((stat (dotdot_buf, &proc_self_fd_dotdot_st) == 0
91               && stat ("/proc/self", &proc_self_st) == 0
92               && SAME_INODE (proc_self_fd_dotdot_st, proc_self_st))
93              ? 1 : -1);
94           close (proc_self_fd);
95         }
96     }
97
98   if (proc_status < 0)
99     return NULL;
100   else
101     {
102       size_t bufsize = PROC_SELF_FD_NAME_SIZE_BOUND (strlen (file));
103       char *result = buf;
104       if (OPENAT_BUFFER_SIZE < bufsize)
105         {
106           result = malloc (bufsize);
107           if (! result)
108             return NULL;
109         }
110       sprintf (result, PROC_SELF_FD_FORMAT, fd, file);
111       return result;
112     }
113 }