doc: Prefer https urls where possible.
[gnulib.git] / lib / fsusage.c
blob97d0eef7aa8951f04e93c20cea259907a1bc73ef
1 /* fsusage.c -- return space usage of mounted file systems
3 Copyright (C) 1991-1992, 1996, 1998-1999, 2002-2006, 2009-2024 Free Software
4 Foundation, Inc.
6 This file is free software: you can redistribute it and/or modify
7 it under the terms of the GNU Lesser General Public License as
8 published by the Free Software Foundation, either version 3 of the
9 License, or (at your option) any later version.
11 This file is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public License
17 along with this program. If not, see <https://www.gnu.org/licenses/>. */
19 #include <config.h>
21 #include "fsusage.h"
23 #include <limits.h>
24 #include <sys/types.h>
26 #if STAT_STATVFS || STAT_STATVFS64 /* POSIX 1003.1-2001 (and later) with XSI */
27 # include <sys/statvfs.h>
28 #else
29 /* Don't include backward-compatibility files unless they're needed.
30 Eventually we'd like to remove all this cruft. */
31 # include <fcntl.h>
32 # include <unistd.h>
33 # include <sys/stat.h>
34 #if HAVE_SYS_PARAM_H
35 # include <sys/param.h>
36 #endif
37 #if HAVE_SYS_MOUNT_H
38 # include <sys/mount.h>
39 #endif
40 #if HAVE_SYS_VFS_H
41 # include <sys/vfs.h>
42 #endif
43 # if HAVE_SYS_FS_S5PARAM_H /* Fujitsu UXP/V */
44 # include <sys/fs/s5param.h>
45 # endif
46 # if HAVE_SYS_STATFS_H
47 # include <sys/statfs.h>
48 # endif
49 #endif
51 /* Many space usage primitives use all 1 bits to denote a value that is
52 not applicable or unknown. Propagate this information by returning
53 a uintmax_t value that is all 1 bits if X is all 1 bits, even if X
54 is unsigned and narrower than uintmax_t. */
55 #define PROPAGATE_ALL_ONES(x) \
56 ((sizeof (x) < sizeof (uintmax_t) \
57 && (~ (x) == (sizeof (x) < sizeof (int) \
58 ? - (1 << (sizeof (x) * CHAR_BIT)) \
59 : 0))) \
60 ? UINTMAX_MAX : (uintmax_t) (x))
62 /* Extract the top bit of X as an uintmax_t value. */
63 #define EXTRACT_TOP_BIT(x) ((x) \
64 & ((uintmax_t) 1 << (sizeof (x) * CHAR_BIT - 1)))
66 /* If a value is negative, many space usage primitives store it into an
67 integer variable by assignment, even if the variable's type is unsigned.
68 So, if a space usage variable X's top bit is set, convert X to the
69 uintmax_t value V such that (- (uintmax_t) V) is the negative of
70 the original value. If X's top bit is clear, just yield X.
71 Use PROPAGATE_TOP_BIT if the original value might be negative;
72 otherwise, use PROPAGATE_ALL_ONES. */
73 #define PROPAGATE_TOP_BIT(x) ((x) | ~ (EXTRACT_TOP_BIT (x) - 1))
75 #ifdef STAT_STATVFS
76 /* Return true if statvfs works. This is false for statvfs on systems
77 with GNU libc on Linux kernels before 2.6.36, which stats all
78 preceding entries in /proc/mounts; that makes df hang if even one
79 of the corresponding file systems is hard-mounted but not available. */
80 # if ! (__linux__ && (__GLIBC__ || __UCLIBC__))
81 /* The FRSIZE fallback is not required in this case. */
82 # undef STAT_STATFS2_FRSIZE
83 static int statvfs_works (void) { return 1; }
84 # else
85 # include <string.h> /* for strverscmp */
86 # include <sys/utsname.h>
87 # include <sys/statfs.h>
88 # define STAT_STATFS2_BSIZE 1
90 static int
91 statvfs_works (void)
93 static int statvfs_works_cache = -1;
94 struct utsname name;
95 if (statvfs_works_cache < 0)
96 statvfs_works_cache = (uname (&name) == 0
97 && 0 <= strverscmp (name.release, "2.6.36"));
98 return statvfs_works_cache;
100 # endif
101 #endif
104 /* Fill in the fields of FSP with information about space usage for
105 the file system on which FILE resides.
106 DISK is the device on which FILE is mounted, for space-getting
107 methods that need to know it.
108 Return 0 if successful, -1 if not. When returning -1, ensure that
109 ERRNO is either a system error value, or zero if DISK is NULL
110 on a system that requires a non-NULL value. */
112 get_fs_usage (char const *file, char const *disk, struct fs_usage *fsp)
114 #ifdef STAT_STATVFS /* POSIX, except pre-2.6.36 glibc/Linux */
116 if (statvfs_works ())
118 struct statvfs vfsd;
120 if (statvfs (file, &vfsd) < 0)
121 return -1;
123 /* f_frsize isn't guaranteed to be supported. */
124 fsp->fsu_blocksize = (vfsd.f_frsize
125 ? PROPAGATE_ALL_ONES (vfsd.f_frsize)
126 : PROPAGATE_ALL_ONES (vfsd.f_bsize));
128 fsp->fsu_blocks = PROPAGATE_ALL_ONES (vfsd.f_blocks);
129 fsp->fsu_bfree = PROPAGATE_ALL_ONES (vfsd.f_bfree);
130 fsp->fsu_bavail = PROPAGATE_TOP_BIT (vfsd.f_bavail);
131 fsp->fsu_bavail_top_bit_set = EXTRACT_TOP_BIT (vfsd.f_bavail) != 0;
132 fsp->fsu_files = PROPAGATE_ALL_ONES (vfsd.f_files);
133 fsp->fsu_ffree = PROPAGATE_ALL_ONES (vfsd.f_ffree);
134 return 0;
137 #endif
139 #if defined STAT_STATVFS64 /* AIX */
141 struct statvfs64 fsd;
143 if (statvfs64 (file, &fsd) < 0)
144 return -1;
146 /* f_frsize isn't guaranteed to be supported. */
147 fsp->fsu_blocksize = (fsd.f_frsize
148 ? PROPAGATE_ALL_ONES (fsd.f_frsize)
149 : PROPAGATE_ALL_ONES (fsd.f_bsize));
151 #elif defined STAT_STATFS3_OSF1 /* OSF/1 */
153 struct statfs fsd;
155 if (statfs (file, &fsd, sizeof (struct statfs)) != 0)
156 return -1;
158 fsp->fsu_blocksize = PROPAGATE_ALL_ONES (fsd.f_fsize);
160 #elif defined STAT_STATFS2_FRSIZE /* 2.6 < glibc/Linux < 2.6.36 */
162 struct statfs fsd;
164 if (statfs (file, &fsd) < 0)
165 return -1;
167 fsp->fsu_blocksize = PROPAGATE_ALL_ONES (fsd.f_frsize);
169 #elif defined STAT_STATFS2_BSIZE /* glibc/Linux < 2.6, 4.3BSD, SunOS 4, \
170 Mac OS X < 10.4, FreeBSD < 5.0, \
171 NetBSD < 3.0, OpenBSD < 4.4 */
173 struct statfs fsd;
175 if (statfs (file, &fsd) < 0)
176 return -1;
178 fsp->fsu_blocksize = PROPAGATE_ALL_ONES (fsd.f_bsize);
180 # ifdef STATFS_TRUNCATES_BLOCK_COUNTS
182 /* In SunOS 4.1.2, 4.1.3, and 4.1.3_U1, the block counts in the
183 struct statfs are truncated to 2GB. These conditions detect that
184 truncation, presumably without botching the 4.1.1 case, in which
185 the values are not truncated. The correct counts are stored in
186 undocumented spare fields. */
187 if (fsd.f_blocks == 0x7fffffff / fsd.f_bsize && fsd.f_spare[0] > 0)
189 fsd.f_blocks = fsd.f_spare[0];
190 fsd.f_bfree = fsd.f_spare[1];
191 fsd.f_bavail = fsd.f_spare[2];
193 # endif /* STATFS_TRUNCATES_BLOCK_COUNTS */
195 #elif defined STAT_STATFS2_FSIZE /* 4.4BSD and older NetBSD */
197 struct statfs fsd;
199 if (statfs (file, &fsd) < 0)
200 return -1;
202 fsp->fsu_blocksize = PROPAGATE_ALL_ONES (fsd.f_fsize);
204 #elif defined STAT_STATFS4 /* SVR3, old Irix */
206 struct statfs fsd;
208 if (statfs (file, &fsd, sizeof fsd, 0) < 0)
209 return -1;
211 /* Empirically, the block counts on most SVR3 and SVR3-derived
212 systems seem to always be in terms of 512-byte blocks,
213 no matter what value f_bsize has. */
214 fsp->fsu_blocksize = 512;
216 #endif
218 #if (defined STAT_STATVFS64 || defined STAT_STATFS3_OSF1 \
219 || defined STAT_STATFS2_FRSIZE || defined STAT_STATFS2_BSIZE \
220 || defined STAT_STATFS2_FSIZE || defined STAT_STATFS4)
222 fsp->fsu_blocks = PROPAGATE_ALL_ONES (fsd.f_blocks);
223 fsp->fsu_bfree = PROPAGATE_ALL_ONES (fsd.f_bfree);
224 fsp->fsu_bavail = PROPAGATE_TOP_BIT (fsd.f_bavail);
225 fsp->fsu_bavail_top_bit_set = EXTRACT_TOP_BIT (fsd.f_bavail) != 0;
226 fsp->fsu_files = PROPAGATE_ALL_ONES (fsd.f_files);
227 fsp->fsu_ffree = PROPAGATE_ALL_ONES (fsd.f_ffree);
229 #endif
231 (void) disk; /* avoid argument-unused warning */
232 return 0;