Mercurial > hg > octave-kai > gnulib-hg
annotate lib/fileblocks.c @ 650:b4ef1c1a0171
update FSF address in copyright
| author | Jim Meyering <jim@meyering.net> |
|---|---|
| date | Mon, 15 Jul 1996 03:36:16 +0000 |
| parents | eee505e8b62c |
| children | 6c3fbfcdb059 |
| rev | line source |
|---|---|
| 5 | 1 /* Convert file size to number of blocks on System V-like machines. |
| 2 Copyright (C) 1990 Free Software Foundation, Inc. | |
| 3 | |
| 4 This program is free software; you can redistribute it and/or modify | |
| 5 it under the terms of the GNU General Public License as published by | |
| 6 the Free Software Foundation; either version 2, or (at your option) | |
| 7 any later version. | |
| 8 | |
| 9 This program is distributed in the hope that it will be useful, | |
| 10 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 12 GNU General Public License for more details. | |
| 13 | |
| 14 You should have received a copy of the GNU General Public License | |
|
650
b4ef1c1a0171
update FSF address in copyright
Jim Meyering <jim@meyering.net>
parents:
599
diff
changeset
|
15 along with this program; if not, write to the Free Software Foundation, |
|
b4ef1c1a0171
update FSF address in copyright
Jim Meyering <jim@meyering.net>
parents:
599
diff
changeset
|
16 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ |
| 5 | 17 |
| 18 /* Written by Brian L. Matthews, blm@6sceng.UUCP. */ | |
| 19 | |
|
163
4aeea06507af
[!NINDIR]: Define BSIZE only if it's not already defined.
Jim Meyering <jim@meyering.net>
parents:
5
diff
changeset
|
20 #ifdef HAVE_CONFIG_H |
| 599 | 21 # include <config.h> |
|
163
4aeea06507af
[!NINDIR]: Define BSIZE only if it's not already defined.
Jim Meyering <jim@meyering.net>
parents:
5
diff
changeset
|
22 #endif |
|
4aeea06507af
[!NINDIR]: Define BSIZE only if it's not already defined.
Jim Meyering <jim@meyering.net>
parents:
5
diff
changeset
|
23 |
|
498
89a4657bb64a
Use _POSIX_VERSION, not _POSIX_SOURCE.
Jim Meyering <jim@meyering.net>
parents:
316
diff
changeset
|
24 #if !defined (HAVE_ST_BLOCKS) && !defined(_POSIX_VERSION) |
| 599 | 25 # include <sys/types.h> |
| 26 # include <sys/param.h> | |
| 5 | 27 |
| 599 | 28 # ifndef NINDIR |
| 5 | 29 /* Some SysV's, like Irix, seem to lack these. Hope they're correct. */ |
| 30 /* Size of a indirect block, in bytes. */ | |
| 599 | 31 # ifndef BSIZE |
| 32 # define BSIZE 1024 | |
| 33 # endif | |
| 5 | 34 |
| 35 /* Number of inode pointers per indirect block. */ | |
| 599 | 36 # define NINDIR (BSIZE/sizeof(daddr_t)) |
| 37 # endif /* !NINDIR */ | |
| 5 | 38 |
| 39 /* Number of direct block addresses in an inode. */ | |
| 599 | 40 # define NDIR 10 |
| 5 | 41 |
| 42 /* Return the number of 512-byte blocks in a file of SIZE bytes. */ | |
| 43 | |
| 44 long | |
| 45 st_blocks (size) | |
| 46 long size; | |
| 47 { | |
| 48 long datablks = (size + 512 - 1) / 512; | |
| 49 long indrblks = 0; | |
| 50 | |
| 51 if (datablks > NDIR) | |
| 52 { | |
| 53 indrblks = (datablks - NDIR - 1) / NINDIR + 1; | |
| 54 | |
| 55 if (datablks > NDIR + NINDIR) | |
| 56 { | |
| 57 indrblks += (datablks - NDIR - NINDIR - 1) / (NINDIR * NINDIR) + 1; | |
| 58 | |
| 59 if (datablks > NDIR + NINDIR + NINDIR * NINDIR) | |
| 60 indrblks++; | |
| 61 } | |
| 62 } | |
| 63 | |
| 64 return datablks + indrblks; | |
| 65 } | |
|
598
e504ab9c8abf
[HAVE_ST_BLOCKS || _POSIX_VERSION]: Add extern dcl
Jim Meyering <jim@meyering.net>
parents:
498
diff
changeset
|
66 #else |
|
e504ab9c8abf
[HAVE_ST_BLOCKS || _POSIX_VERSION]: Add extern dcl
Jim Meyering <jim@meyering.net>
parents:
498
diff
changeset
|
67 /* This declaration is solely to ensure that after preprocessing |
|
e504ab9c8abf
[HAVE_ST_BLOCKS || _POSIX_VERSION]: Add extern dcl
Jim Meyering <jim@meyering.net>
parents:
498
diff
changeset
|
68 this file is never empty. */ |
|
e504ab9c8abf
[HAVE_ST_BLOCKS || _POSIX_VERSION]: Add extern dcl
Jim Meyering <jim@meyering.net>
parents:
498
diff
changeset
|
69 extern int textutils_fileblocks_unused; |
| 5 | 70 #endif |