Mercurial > hg > octave-kai > gnulib-hg

annotate lib/fileblocks.c @ 2427:28f8722c956c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Jim Meyering <jim@meyering.net>
date Sat, 15 Apr 2000 21:58:37 +0000
parents d562a3cf9041
children 5994c6f939c5
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
5
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
1 /* Convert file size to number of blocks on System V-like machines.
1997
d562a3cf9041 Use HAVE_STRUCT_STAT_ST_BLOCKS, not deprecated HAVE_ST_BLOCKS.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
2 Copyright (C) 1990, 1997, 1998, 1999 Free Software Foundation, Inc.
5
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
3
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
4 This program is free software; you can redistribute it and/or modify
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
5 it under the terms of the GNU General Public License as published by
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
6 the Free Software Foundation; either version 2, or (at your option)
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
7 any later version.
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
8
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
9 This program is distributed in the hope that it will be useful,
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
12 GNU General Public License for more details.
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
13
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
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
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
17
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
18 /* Written by Brian L. Matthews, blm@6sceng.UUCP. */
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
19
1278
9ad625a30b7d Use #if, not #ifdef with HAVE_ macros
Jim Meyering <jim@meyering.net>
parents: 1240
diff changeset
20 #if HAVE_CONFIG_H
599
eee505e8b62c Indent CPP conditionals.
Jim Meyering <jim@meyering.net>
parents: 598
diff changeset
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
1214
a6150f7af1bd Include sys/param.h only #if HAVE_SYS_PARAM_H.
Jim Meyering <jim@meyering.net>
parents: 1134
diff changeset
24 #include <sys/types.h>
a6150f7af1bd Include sys/param.h only #if HAVE_SYS_PARAM_H.
Jim Meyering <jim@meyering.net>
parents: 1134
diff changeset
25
a6150f7af1bd Include sys/param.h only #if HAVE_SYS_PARAM_H.
Jim Meyering <jim@meyering.net>
parents: 1134
diff changeset
26 #if HAVE_SYS_PARAM_H
a6150f7af1bd Include sys/param.h only #if HAVE_SYS_PARAM_H.
Jim Meyering <jim@meyering.net>
parents: 1134
diff changeset
27 # include <sys/param.h>
a6150f7af1bd Include sys/param.h only #if HAVE_SYS_PARAM_H.
Jim Meyering <jim@meyering.net>
parents: 1134
diff changeset
28 #endif
a6150f7af1bd Include sys/param.h only #if HAVE_SYS_PARAM_H.
Jim Meyering <jim@meyering.net>
parents: 1134
diff changeset
29
1997
d562a3cf9041 Use HAVE_STRUCT_STAT_ST_BLOCKS, not deprecated HAVE_ST_BLOCKS.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
30 #if !HAVE_STRUCT_STAT_ST_BLOCKS && !defined _POSIX_SOURCE && defined BSIZE
5
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
31
933
6c3fbfcdb059 [HAVE_UNISTD_H]: Include unistd.h.
Jim Meyering <jim@meyering.net>
parents: 650
diff changeset
32 # if HAVE_UNISTD_H
6c3fbfcdb059 [HAVE_UNISTD_H]: Include unistd.h.
Jim Meyering <jim@meyering.net>
parents: 650
diff changeset
33 # include <unistd.h>
6c3fbfcdb059 [HAVE_UNISTD_H]: Include unistd.h.
Jim Meyering <jim@meyering.net>
parents: 650
diff changeset
34 # endif
6c3fbfcdb059 [HAVE_UNISTD_H]: Include unistd.h.
Jim Meyering <jim@meyering.net>
parents: 650
diff changeset
35
599
eee505e8b62c Indent CPP conditionals.
Jim Meyering <jim@meyering.net>
parents: 598
diff changeset
36 # ifndef NINDIR
1240
92fcf946db19 [__DJGPP__]: Add missing typedef for daddr_t.
Jim Meyering <jim@meyering.net>
parents: 1214
diff changeset
37
92fcf946db19 [__DJGPP__]: Add missing typedef for daddr_t.
Jim Meyering <jim@meyering.net>
parents: 1214
diff changeset
38 # if defined (__DJGPP__)
92fcf946db19 [__DJGPP__]: Add missing typedef for daddr_t.
Jim Meyering <jim@meyering.net>
parents: 1214
diff changeset
39 typedef long daddr_t; /* for disk address */
92fcf946db19 [__DJGPP__]: Add missing typedef for daddr_t.
Jim Meyering <jim@meyering.net>
parents: 1214
diff changeset
40 # endif
92fcf946db19 [__DJGPP__]: Add missing typedef for daddr_t.
Jim Meyering <jim@meyering.net>
parents: 1214
diff changeset
41
1134
b2ed35578119 (st_blocks): long -> off_t.
Jim Meyering <jim@meyering.net>
parents: 933
diff changeset
42 /* Some SysV's, like Irix, seem to lack this. Hope it's correct. */
5
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
43 /* Number of inode pointers per indirect block. */
1214
a6150f7af1bd Include sys/param.h only #if HAVE_SYS_PARAM_H.
Jim Meyering <jim@meyering.net>
parents: 1134
diff changeset
44 # define NINDIR (BSIZE / sizeof (daddr_t))
599
eee505e8b62c Indent CPP conditionals.
Jim Meyering <jim@meyering.net>
parents: 598
diff changeset
45 # endif /* !NINDIR */
5
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
46
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
47 /* Number of direct block addresses in an inode. */
599
eee505e8b62c Indent CPP conditionals.
Jim Meyering <jim@meyering.net>
parents: 598
diff changeset
48 # define NDIR 10
5
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
49
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
50 /* Return the number of 512-byte blocks in a file of SIZE bytes. */
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
51
1134
b2ed35578119 (st_blocks): long -> off_t.
Jim Meyering <jim@meyering.net>
parents: 933
diff changeset
52 off_t
1557
38fd8f5d359d ansideclify
Jim Meyering <jim@meyering.net>
parents: 1278
diff changeset
53 st_blocks (off_t size)
5
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
54 {
1134
b2ed35578119 (st_blocks): long -> off_t.
Jim Meyering <jim@meyering.net>
parents: 933
diff changeset
55 off_t datablks = size / 512 + (size % 512 != 0);
b2ed35578119 (st_blocks): long -> off_t.
Jim Meyering <jim@meyering.net>
parents: 933
diff changeset
56 off_t indrblks = 0;
5
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
57
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
58 if (datablks > NDIR)
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
59 {
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
60 indrblks = (datablks - NDIR - 1) / NINDIR + 1;
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
61
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
62 if (datablks > NDIR + NINDIR)
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
63 {
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
64 indrblks += (datablks - NDIR - NINDIR - 1) / (NINDIR * NINDIR) + 1;
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
65
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
66 if (datablks > NDIR + NINDIR + NINDIR * NINDIR)
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
67 indrblks++;
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
68 }
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
69 }
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
70
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
71 return datablks + indrblks;
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
72 }
598
e504ab9c8abf [HAVE_ST_BLOCKS || _POSIX_VERSION]: Add extern dcl
Jim Meyering <jim@meyering.net>
parents: 498
diff changeset
73 #else
e504ab9c8abf [HAVE_ST_BLOCKS || _POSIX_VERSION]: Add extern dcl
Jim Meyering <jim@meyering.net>
parents: 498
diff changeset
74 /* 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
75 this file is never empty. */
e504ab9c8abf [HAVE_ST_BLOCKS || _POSIX_VERSION]: Add extern dcl
Jim Meyering <jim@meyering.net>
parents: 498
diff changeset
76 extern int textutils_fileblocks_unused;
5
41c9d08b09d7 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
77 #endif