12345678910111213141516171819202122232425262728293031323334353637383940414243 |
- {
- $Id$
- This file is part of the Free Pascal run time library.
- Copyright (c) 1999-2000 by Michael Van Canneyt,
- member of the Free Pascal development team.
- See the file COPYING.FPC, included in this distribution,
- for details about the copyright.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
- **********************************************************************}
- type
- TStatfs = packed record
- spare2, { place holder}
- bsize, { fundamental block size}
- iosize, { optimal block size }
- blocks, { total blocks}
- bfree, { blocks free}
- bavail, { block available for mortal users}
- files, { Total file nodes}
- ffree : longint; { file nodes free}
- fsid : array[0..1] of longint;
- fowner : longint; {mounter uid}
- ftype : longint;
- fflags : longint; {copy of mount flags}
- spare : array [0..1] of longint; { For later use }
- fstypename : array[0..15] of char;
- mountpoint : array[0..89] of char;
- mnfromname : array[0..89] of char;
- end;
- PStatFS=^TStatFS;
- {
- $Log$
- Revision 1.5 2005-02-14 17:13:30 peter
- * truncate log
- }
|