Imported Upstream version 1.7.6p1
[debian/sudo] / closefrom.c
1 /*
2  * Copyright (c) 2004-2005, 2007, 2010
3  *      Todd C. Miller <Todd.Miller@courtesan.com>
4  *
5  * Permission to use, copy, modify, and distribute this software for any
6  * purpose with or without fee is hereby granted, provided that the above
7  * copyright notice and this permission notice appear in all copies.
8  *
9  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16  */
17
18 #include <config.h>
19
20 #include <sys/types.h>
21 #include <sys/param.h>
22 #include <unistd.h>
23 #include <stdio.h>
24 #ifdef STDC_HEADERS
25 # include <stdlib.h>
26 # include <stddef.h>
27 #else
28 # ifdef HAVE_STDLIB_H
29 #  include <stdlib.h>
30 # endif
31 #endif /* STDC_HEADERS */
32 #include <fcntl.h>
33 #ifdef HAVE_DIRENT_H
34 # include <dirent.h>
35 # define NAMLEN(dirent) strlen((dirent)->d_name)
36 #else
37 # define dirent direct
38 # define NAMLEN(dirent) (dirent)->d_namlen
39 # ifdef HAVE_SYS_NDIR_H
40 #  include <sys/ndir.h>
41 # endif
42 # ifdef HAVE_SYS_DIR_H
43 #  include <sys/dir.h>
44 # endif
45 # ifdef HAVE_NDIR_H
46 #  include <ndir.h>
47 # endif
48 #endif
49
50 #include "missing.h"
51
52 #ifndef HAVE_FCNTL_CLOSEM
53 # ifndef HAVE_DIRFD
54 #   define closefrom_fallback   closefrom
55 # endif
56 #endif
57
58 /*
59  * Close all file descriptors greater than or equal to lowfd.
60  * This is the expensive (ballback) method.
61  */
62 void
63 closefrom_fallback(lowfd)
64     int lowfd;
65 {
66     long fd, maxfd;
67
68     /*
69      * Fall back on sysconf() or getdtablesize().  We avoid checking
70      * resource limits since it is possible to open a file descriptor
71      * and then drop the rlimit such that it is below the open fd.
72      */
73 #ifdef HAVE_SYSCONF
74     maxfd = sysconf(_SC_OPEN_MAX);
75 #else
76     maxfd = getdtablesize();
77 #endif /* HAVE_SYSCONF */
78     if (maxfd < 0)
79         maxfd = OPEN_MAX;
80
81     for (fd = lowfd; fd < maxfd; fd++)
82         (void) close((int) fd);
83 }
84
85 /*
86  * Close all file descriptors greater than or equal to lowfd.
87  * We try the fast way first, falling back on the slow method.
88  */
89 #ifdef HAVE_FCNTL_CLOSEM
90 void
91 closefrom(lowfd)
92     int lowfd;
93 {
94     if (fcntl(lowfd, F_CLOSEM, 0) == -1)
95         closefrom_fallback(lowfd);
96 }
97 #else
98 # ifdef HAVE_DIRFD
99 void
100 closefrom(lowfd)
101     int lowfd;
102 {
103     struct dirent *dent;
104     DIR *dirp;
105     char *endp;
106     long fd;
107
108     /* Use /proc/self/fd directory if it exists. */
109     if ((dirp = opendir("/proc/self/fd")) != NULL) {
110         while ((dent = readdir(dirp)) != NULL) {
111             fd = strtol(dent->d_name, &endp, 10);
112             if (dent->d_name != endp && *endp == '\0' &&
113                 fd >= 0 && fd < INT_MAX && fd >= lowfd && fd != dirfd(dirp))
114                 (void) close((int) fd);
115         }
116         (void) closedir(dirp);
117     } else
118         closefrom_fallback(lowfd);
119 }
120 #endif /* HAVE_DIRFD */
121 #endif /* HAVE_FCNTL_CLOSEM */