X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=lib%2Ffsusage.c;h=e90abf94d836b6546311be637983d3aa9a8ccfcb;hb=98cf1a06469c02df32ea978fe6c6514f1c87f2bc;hp=8f3f3cd1f668cb4c5cb03682e9d4878b9ed4be7f;hpb=90bc7be68adb4421e7136e544d7a2ecc575bc17a;p=gnulib.git diff --git a/lib/fsusage.c b/lib/fsusage.c index 8f3f3cd1f..e90abf94d 100644 --- a/lib/fsusage.c +++ b/lib/fsusage.c @@ -1,5 +1,5 @@ /* fsusage.c -- return space usage of mounted filesystems - Copyright (C) 1991, 1992 Free Software Foundation, Inc. + Copyright (C) 1991, 1992, 1996 Free Software Foundation, Inc. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -12,158 +12,202 @@ GNU General Public License for more details. You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ - -#ifdef HAVE_CONFIG_H -#if defined (CONFIG_BROKETS) -/* We use instead of "config.h" so that a compilation - using -I. -I$srcdir will use ./config.h rather than $srcdir/config.h - (which it would do because it found this file in $srcdir). */ -#include -#else -#include "config.h" -#endif + along with this program; if not, write to the Free Software Foundation, + Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + +#if HAVE_CONFIG_H +# include #endif #include +#include #include "fsusage.h" int statfs (); -#if defined (STAT_STATFS3_OSF1) /* DEC Alpha running OSF/1 */ -# include +#if HAVE_SYS_PARAM_H +# include #endif -#if defined(STAT_STATFS2_BSIZE) && !defined(_IBMR2) /* 4.3BSD, SunOS 4, HP-UX, AIX PS/2. */ -#include +#if HAVE_SYS_MOUNT_H +# include #endif -#ifdef STAT_STATFS2_FSIZE /* 4.4BSD. */ -#include +#if HAVE_SYS_VFS_H +# include #endif -#ifdef STAT_STATFS2_FS_DATA /* Ultrix. */ -#include -#include +#if HAVE_SYS_FS_S5PARAM_H /* Fujitsu UXP/V */ +# include #endif -#ifdef STAT_READ /* SVR2. */ -#include -#include -#include +#if defined (HAVE_SYS_FILSYS_H) && !defined (_CRAY) +# include /* SVR2 */ #endif -#if defined(STAT_STATFS4) || (defined(_AIX) && defined(_IBMR2)) /* SVR3, Dynix, Irix, AIX RS6000. */ -#include +#if HAVE_FCNTL_H +# include #endif -#if defined(_AIX) && defined(_I386) /* AIX PS/2. */ -#include -#include +#if HAVE_SYS_STATFS_H +# include +#endif + +#if HAVE_DUSTAT_H /* AIX PS/2 */ +# include #endif -#ifdef STAT_STATVFS /* SVR4. */ -#include +#if HAVE_SYS_STATVFS_H /* SVR4 */ +# include int statvfs (); #endif -/* Set B_NEW to the number of TOSIZE-byte blocks used by B FROMSIZE-byte - blocks, rounding away from zero. TOSIZE must be positive. Return -1 - from invoking function if FROMSIZE is not positive. */ - -#define ADJUST_BLOCKS(b_new, b, fromsize, tosize) \ - do \ - { \ - if ((tosize) <= 0) \ - abort (); \ - if ((fromsize) <= 0) \ - return -1; \ - \ - if ((fromsize) == (tosize)) /* E.g., from 512 to 512. */ \ - (b_new) = (b); \ - else if ((fromsize) > (tosize)) /* E.g., from 2048 to 512. */ \ - (b_new) = (b) * ((fromsize) / (tosize)); \ - else /* E.g., from 256 to 512. */ \ - (b_new) = ((b) + ((b) < 0 ? -1 : 1)) / ((tosize) / (fromsize)); \ - } \ - while (0) +int safe_read (); + +/* Return the number of TOSIZE-byte blocks used by + BLOCKS FROMSIZE-byte blocks, rounding away from zero. + TOSIZE must be positive. Return -1 if FROMSIZE is not positive. */ + +static long +adjust_blocks (blocks, fromsize, tosize) + long blocks; + int fromsize, tosize; +{ + if (tosize <= 0) + abort (); + if (fromsize <= 0) + return -1; + + if (fromsize == tosize) /* e.g., from 512 to 512 */ + return blocks; + else if (fromsize > tosize) /* e.g., from 2048 to 512 */ + return blocks * (fromsize / tosize); + else /* e.g., from 256 to 512 */ + return (blocks + (blocks < 0 ? -1 : 1)) / (tosize / fromsize); +} /* Fill in the fields of FSP with information about space usage for the filesystem on which PATH resides. DISK is the device on which PATH is mounted, for space-getting methods that need to know it. - Return 0 if successful, -1 if not. */ - + Return 0 if successful, -1 if not. When returning -1, ensure that + ERRNO is either a system error value, or zero if DISK is NULL + on a system that requires a non-NULL value. */ int get_fs_usage (path, disk, fsp) - char *path, *disk; + const char *path; + const char *disk; struct fs_usage *fsp; { -#if defined (STAT_STATFS3_OSF1) +#ifdef STAT_STATFS3_OSF1 +# define CONVERT_BLOCKS(B) adjust_blocks ((B), fsd.f_fsize, 512) + struct statfs fsd; if (statfs (path, &fsd, sizeof (struct statfs)) != 0) - return (-1); -#define CONVERT_BLOCKS(bnew, b) ADJUST_BLOCKS ((bnew), (b), fsd.f_fsize, 512) + return -1; + #endif /* STAT_STATFS3_OSF1 */ -#ifdef STAT_STATFS2_FS_DATA /* Ultrix. */ +#ifdef STAT_STATFS2_FS_DATA /* Ultrix */ +# define CONVERT_BLOCKS(B) adjust_blocks ((B), 1024, 512) + struct fs_data fsd; if (statfs (path, &fsd) != 1) return -1; -#define CONVERT_BLOCKS(bnew, b) ADJUST_BLOCKS ((bnew), (b), 1024, 512) - CONVERT_BLOCKS (fsp->fsu_blocks, fsd.fd_req.btot); - CONVERT_BLOCKS (fsp->fsu_bfree, fsd.fd_req.bfree); - CONVERT_BLOCKS (fsp->fsu_bavail, fsd.fd_req.bfreen); + fsp->fsu_blocks = CONVERT_BLOCKS (fsd.fd_req.btot); + fsp->fsu_bfree = CONVERT_BLOCKS (fsd.fd_req.bfree); + fsp->fsu_bavail = CONVERT_BLOCKS (fsd.fd_req.bfreen); fsp->fsu_files = fsd.fd_req.gtot; fsp->fsu_ffree = fsd.fd_req.gfree; -#endif -#ifdef STAT_READ /* SVR2. */ -#ifndef SUPERBOFF -#define SUPERBOFF (SUPERB * 512) -#endif +#endif /* STAT_STATFS2_FS_DATA */ + +#ifdef STAT_READ_FILSYS /* SVR2 */ +# ifndef SUPERBOFF +# define SUPERBOFF (SUPERB * 512) +# endif +# define CONVERT_BLOCKS(B) \ + adjust_blocks ((B), (fsd.s_type == Fs2b ? 1024 : 512), 512) + struct filsys fsd; int fd; + if (! disk) + { + errno = 0; + return -1; + } + fd = open (disk, O_RDONLY); if (fd < 0) return -1; lseek (fd, (long) SUPERBOFF, 0); - if (read (fd, (char *) &fsd, sizeof fsd) != sizeof fsd) + if (safe_read (fd, (char *) &fsd, sizeof fsd) != sizeof fsd) { close (fd); return -1; } close (fd); -#define CONVERT_BLOCKS(bnew, b) \ - ADJUST_BLOCKS ((bnew), (b), (fsd.s_type == Fs2b ? 1024 : 512), 512) - CONVERT_BLOCKS (fsp->fsu_blocks, fsd.s_fsize); - CONVERT_BLOCKS (fsp->fsu_bfree, fsd.s_tfree); - CONVERT_BLOCKS (fsp->fsu_bavail, fsd.s_tfree); + fsp->fsu_blocks = CONVERT_BLOCKS (fsd.s_fsize); + fsp->fsu_bfree = CONVERT_BLOCKS (fsd.s_tfree); + fsp->fsu_bavail = CONVERT_BLOCKS (fsd.s_tfree); fsp->fsu_files = (fsd.s_isize - 2) * INOPB * (fsd.s_type == Fs2b ? 2 : 1); fsp->fsu_ffree = fsd.s_tinode; -#endif -#ifdef STAT_STATFS2_BSIZE /* 4.3BSD, SunOS 4, HP-UX, AIX. */ +#endif /* STAT_READ_FILSYS */ + +#ifdef STAT_STATFS2_BSIZE /* 4.3BSD, SunOS 4, HP-UX, AIX */ +# define CONVERT_BLOCKS(B) adjust_blocks ((B), fsd.f_bsize, 512) + struct statfs fsd; if (statfs (path, &fsd) < 0) return -1; -#define CONVERT_BLOCKS(bnew, b) ADJUST_BLOCKS ((bnew), (b), fsd.f_bsize, 512) -#endif -#ifdef STAT_STATFS2_FSIZE /* 4.4BSD. */ +# ifdef STATFS_TRUNCATES_BLOCK_COUNTS + + /* In SunOS 4.1.2, 4.1.3, and 4.1.3_U1, the block counts in the + struct statfs are truncated to 2GB. These conditions detect that + truncation, presumably without botching the 4.1.1 case, in which + the values are not truncated. The correct counts are stored in + undocumented spare fields. */ + if (fsd.f_blocks == 0x1fffff && fsd.f_spare[0] > 0) + { + fsd.f_blocks = fsd.f_spare[0]; + fsd.f_bfree = fsd.f_spare[1]; + fsd.f_bavail = fsd.f_spare[2]; + } +# endif /* STATFS_TRUNCATES_BLOCK_COUNTS */ + +#endif /* STAT_STATFS2_BSIZE */ + +#ifdef STAT_STATFS2_FSIZE /* 4.4BSD */ +# define CONVERT_BLOCKS(B) adjust_blocks ((B), fsd.f_fsize, 512) + struct statfs fsd; if (statfs (path, &fsd) < 0) return -1; -#define CONVERT_BLOCKS(bnew, b) ADJUST_BLOCKS ((bnew), (b), fsd.f_fsize, 512) -#endif -#ifdef STAT_STATFS4 /* SVR3, Dynix, Irix. */ +#endif /* STAT_STATFS2_FSIZE */ + +#ifdef STAT_STATFS4 /* SVR3, Dynix, Irix, AIX */ +# if _AIX || defined(_CRAY) +# define CONVERT_BLOCKS(B) adjust_blocks ((B), fsd.f_bsize, 512) +# ifdef _CRAY +# define f_bavail f_bfree +# endif +# else +# define CONVERT_BLOCKS(B) (B) +# ifndef _SEQUENT_ /* _SEQUENT_ is DYNIX/ptx */ +# ifndef DOLPHIN /* DOLPHIN 3.8.alfa/7.18 has f_bavail */ +# define f_bavail f_bfree +# endif +# endif +# endif + struct statfs fsd; if (statfs (path, &fsd, sizeof fsd, 0) < 0) @@ -171,37 +215,31 @@ get_fs_usage (path, disk, fsp) /* Empirically, the block counts on most SVR3 and SVR3-derived systems seem to always be in terms of 512-byte blocks, no matter what value f_bsize has. */ -#define CONVERT_BLOCKS(bnew, b) \ - do \ - { \ - (bnew) = (b); \ - } \ - while (0) - -#ifndef _SEQUENT_ /* _SEQUENT_ is DYNIX/ptx. */ -#ifndef DOLPHIN /* DOLPHIN 3.8.alfa/7.18 has f_bavail */ -#define f_bavail f_bfree -#endif -#endif -#endif -#ifdef STAT_STATVFS /* SVR4. */ +#endif /* STAT_STATFS4 */ + +#ifdef STAT_STATVFS /* SVR4 */ +# define CONVERT_BLOCKS(B) \ + adjust_blocks ((B), fsd.f_frsize ? fsd.f_frsize : fsd.f_bsize, 512) + struct statvfs fsd; if (statvfs (path, &fsd) < 0) return -1; /* f_frsize isn't guaranteed to be supported. */ -#define CONVERT_BLOCKS(bnew, b) \ - ADJUST_BLOCKS ((bnew), (b), fsd.f_frsize ? fsd.f_frsize : fsd.f_bsize, 512) -#endif -#if !defined(STAT_STATFS2_FS_DATA) && !defined(STAT_READ) /* !Ultrix && !SVR2. */ - CONVERT_BLOCKS (fsp->fsu_blocks, fsd.f_blocks); - CONVERT_BLOCKS (fsp->fsu_bfree, fsd.f_bfree); - CONVERT_BLOCKS (fsp->fsu_bavail, fsd.f_bavail); +#endif /* STAT_STATVFS */ + +#if !defined(STAT_STATFS2_FS_DATA) && !defined(STAT_READ_FILSYS) + /* !Ultrix && !SVR2 */ + + fsp->fsu_blocks = CONVERT_BLOCKS (fsd.f_blocks); + fsp->fsu_bfree = CONVERT_BLOCKS (fsd.f_bfree); + fsp->fsu_bavail = CONVERT_BLOCKS (fsd.f_bavail); fsp->fsu_files = fsd.f_files; fsp->fsu_ffree = fsd.f_ffree; -#endif + +#endif /* not STAT_STATFS2_FS_DATA && not STAT_READ_FILSYS */ return 0; } @@ -232,4 +270,5 @@ statfs (path, fsb) fsb->f_fsid.val[1] = fsd.du_pckno; return 0; } + #endif /* _AIX && _I386 */