Remove DUX/OSF code
[openafs.git] / src / vfsck / pass5.c
1 /*
2  * Copyright (c) 1980, 1986 The Regents of the University of California.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms are permitted
6  * provided that the above copyright notice and this paragraph are
7  * duplicated in all such forms and that any documentation,
8  * advertising materials, and other materials related to such
9  * distribution and use acknowledge that the software was developed
10  * by the University of California, Berkeley.  The name of the
11  * University may not be used to endorse or promote products derived
12  * from this software without specific prior written permission.
13  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
14  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
15  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
16  */
17
18 #include <afsconfig.h>
19 #include <afs/param.h>
20
21 #include <roken.h>
22
23 #include <ctype.h>
24
25 #define VICE
26 #ifdef AFS_VFSINCL_ENV
27 #include <sys/vnode.h>
28 #ifdef    AFS_SUN5_ENV
29 #include <sys/fs/ufs_inode.h>
30 #include <sys/fs/ufs_fs.h>
31 #define _KERNEL
32 #include <sys/fs/ufs_fsdir.h>
33 #undef _KERNEL
34 #include <sys/fs/ufs_mount.h>
35 #else
36 #include <ufs/inode.h>
37 #include <ufs/fs.h>
38 #endif
39 #else /* AFS_VFSINCL_ENV */
40 #include <sys/inode.h>
41 #ifdef  AFS_HPUX_ENV
42 #define LONGFILENAMES   1
43 #include <sys/sysmacros.h>
44 #include <sys/ino.h>
45 #endif
46 #include <sys/fs.h>
47 #endif /* AFS_VFSINCL_ENV */
48 #include <afs/osi_inode.h>
49
50 #include "fsck.h"
51
52 #if     defined(AFS_SUN_ENV)
53 #define AFS_NEWCG_ENV
54 #else
55 #undef AFS_NEWCG_ENV
56 #endif
57
58 #ifndef AFS_NEWCG_ENV
59 /* define enough so this thing compiles! */
60 #define FS_42POSTBLFMT          1
61 #define FS_DYNAMICPOSTBLFMT     2
62 #endif /* AFS_NEWCG_ENV */
63
64 pass5()
65 {
66     int c, blk, frags, basesize, sumsize, mapsize, savednrpos;
67     struct fs *fs = &sblock;
68     struct cg *cg = &cgrp;
69     daddr_t dbase, dmax;
70     daddr_t d;
71     long i, j;
72     struct csum *cs;
73     time_t now;
74     struct csum cstotal;
75     struct inodesc idesc[3];
76     char buf[MAXBSIZE];
77     int postype;
78
79 #ifdef AFS_NEWCG_ENV
80     struct cg *newcg = (struct cg *)buf;
81     struct ocg *ocg = (struct ocg *)buf;
82 #else /* AFS_NEWCG_ENV */
83     /* don't bother with newcg format yet, most systems don't support it */
84     struct cg *newcg = (struct cg *)buf;
85     struct cg *ocg = (struct cg *)buf;
86 #endif /* AFS_NEWCG_ENV */
87
88     memset(newcg, 0, (int)fs->fs_cgsize);
89     newcg->cg_niblk = fs->fs_ipg;
90 #ifdef AFS_NEWCG_ENV
91     postype = (int)fs->fs_postblformat;
92 #else /* AFS_NEWCG_ENV */
93     postype = FS_42POSTBLFMT;
94 #endif /* AFS_NEWCG_ENV */
95     switch (postype) {
96
97     case FS_42POSTBLFMT:
98         basesize = (char *)(&ocg->cg_btot[0]) - (char *)(&ocg->cg_link);
99         sumsize = &ocg->cg_iused[0] - (char *)(&ocg->cg_btot[0]);
100         mapsize =
101             &ocg->cg_free[howmany(fs->fs_fpg, NBBY)] -
102             (u_char *) & ocg->cg_iused[0];
103         ocg->cg_magic = CG_MAGIC;
104 #ifdef AFS_NEWCG_ENV
105         savednrpos = fs->fs_nrpos;
106         fs->fs_nrpos = 8;
107 #endif /* AFS_NEWCG_ENV */
108         break;
109
110 #ifdef AFS_NEWCG_ENV
111     case FS_DYNAMICPOSTBLFMT:
112         newcg->cg_btotoff =
113 #ifdef  __alpha
114             /* Matches decl in ufs/fs.h */
115             &newcg->cg_space[0] - (u_char *) (&newcg->cg_link[0]);
116 #else /* __alpha */
117             &newcg->cg_space[0] - (u_char *) (&newcg->cg_link);
118 #endif
119         newcg->cg_boff = newcg->cg_btotoff + fs->fs_cpg * sizeof(afs_int32);
120         newcg->cg_iusedoff =
121             newcg->cg_boff + fs->fs_cpg * fs->fs_nrpos * sizeof(short);
122         newcg->cg_freeoff = newcg->cg_iusedoff + howmany(fs->fs_ipg, NBBY);
123         newcg->cg_nextfreeoff =
124             newcg->cg_freeoff + howmany(fs->fs_cpg * fs->fs_spc / NSPF(fs),
125                                         NBBY);
126         newcg->cg_magic = CG_MAGIC;
127 #ifdef  __alpha
128         /* Matches decl in ufs/fs.h */
129         basesize = &newcg->cg_space[0] - (u_char *) (&newcg->cg_link[0]);
130 #else /* __alpha */
131         basesize = &newcg->cg_space[0] - (u_char *) (&newcg->cg_link);
132 #endif
133         sumsize = newcg->cg_iusedoff - newcg->cg_btotoff;
134         mapsize = newcg->cg_nextfreeoff - newcg->cg_iusedoff;
135         break;
136
137     default:
138         errexit("UNKNOWN ROTATIONAL TABLE FORMAT %d\n", fs->fs_postblformat);
139 #endif /* AFS_NEWCG_ENV */
140
141     }
142     memset(&idesc[0], 0, sizeof idesc);
143     for (i = 0; i < 3; i++)
144         idesc[i].id_type = ADDR;
145     memset(&cstotal, 0, sizeof(struct csum));
146     (void)time(&now);
147 #ifdef notdef
148     /* this is the original from UCB/McKusick, but it is clearly wrong.  It is
149      * rounding the # of fragments to the next 1024 (in our case, with a 1K/8K file system),
150      * while instead it should be rounding to the next block.
151      *
152      * In addition, we should be sure that we allocate enough space, but that seems to be
153      * ensured by the fact that the bitmap is rounded up to the nearest short, and that there
154      * are never more than 16 frags per block.
155      */
156     for (i = fs->fs_size; i < fragroundup(fs, fs->fs_size); i++)
157 #else
158     c = 1 << fs->fs_fragshift;  /* unit to which we want to round */
159     for (i = fs->fs_size; i < roundup(fs->fs_size, c); i++)
160 #endif
161         setbmap(i);
162     for (c = 0; c < fs->fs_ncg; c++) {
163         getblk(&cgblk, cgtod(fs, c), fs->fs_cgsize);
164 #ifdef AFS_NEWCG_ENV
165         if (!cg_chkmagic(cg))
166             pfatal("CG %d: BAD MAGIC NUMBER\n", c);
167 #else /* AFS_NEWCG_ENV */
168         if (cg->cg_magic != CG_MAGIC)
169             pfatal("CG %d: BAD MAGIC NUMBER\n", c);
170 #endif /* AFS_NEWCG_ENV */
171         dbase = cgbase(fs, c);
172         dmax = dbase + fs->fs_fpg;
173         if (dmax > fs->fs_size)
174             dmax = fs->fs_size;
175         if (now > cg->cg_time)
176             newcg->cg_time = cg->cg_time;
177         else
178             newcg->cg_time = now;
179         newcg->cg_cgx = c;
180         if (c == fs->fs_ncg - 1)
181             newcg->cg_ncyl = fs->fs_ncyl % fs->fs_cpg;
182         else
183             newcg->cg_ncyl = fs->fs_cpg;
184         newcg->cg_ndblk = dmax - dbase;
185         newcg->cg_cs.cs_ndir = 0;
186         newcg->cg_cs.cs_nffree = 0;
187         newcg->cg_cs.cs_nbfree = 0;
188         newcg->cg_cs.cs_nifree = fs->fs_ipg;
189         if (cg->cg_rotor < newcg->cg_ndblk)
190             newcg->cg_rotor = cg->cg_rotor;
191         else
192             newcg->cg_rotor = 0;
193         if (cg->cg_frotor < newcg->cg_ndblk)
194             newcg->cg_frotor = cg->cg_frotor;
195         else
196             newcg->cg_frotor = 0;
197         if (cg->cg_irotor < newcg->cg_niblk)
198             newcg->cg_irotor = cg->cg_irotor;
199         else
200             newcg->cg_irotor = 0;
201         memset(&newcg->cg_frsum[0], 0, sizeof newcg->cg_frsum);
202 #ifdef AFS_NEWCG_ENV
203         memset(&cg_blktot(newcg)[0], 0, sumsize + mapsize);
204 #else /* AFS_NEWCG_ENV */
205         memset(newcg->cg_btot, 0, sizeof(newcg->cg_btot));
206         memset(newcg->cg_b, 0, sizeof(newcg->cg_b));
207         memset(newcg->cg_iused, 0, sizeof(newcg->cg_iused));
208         memset(newcg->cg_free, 0, howmany(fs->fs_fpg, NBBY));
209 #endif /* AFS_NEWCG_ENV */
210 #ifdef AFS_NEWCG_ENV
211         if (fs->fs_postblformat == FS_42POSTBLFMT)
212             ocg->cg_magic = CG_MAGIC;
213 #endif /* AFS_NEWCG_ENV */
214         j = fs->fs_ipg * c;
215         for (i = 0; i < fs->fs_ipg; j++, i++) {
216 #if defined(ACLS) && defined(AFS_HPUX_ENV)
217             switch (statemap[j] & STATE) {
218 #else
219             switch (statemap[j]) {
220 #endif
221             case USTATE:
222                 break;
223
224             case DSTATE:
225             case DCLEAR:
226             case DFOUND:
227                 newcg->cg_cs.cs_ndir++;
228                 /* fall through */
229
230 #ifdef VICE
231             case VSTATE:
232 #endif /* VICE */
233             case FSTATE:
234             case FCLEAR:
235                 newcg->cg_cs.cs_nifree--;
236 #ifdef AFS_NEWCG_ENV
237                 setbit(cg_inosused(newcg), i);
238 #else
239                 setbit(newcg->cg_iused, i);
240 #endif /* AFS_NEWCG_ENV */
241                 break;
242
243 #if defined(ACLS) && defined(AFS_HPUX_ENV)
244                 /* hpux has more dynamic states (CSTATE, CRSTATE) */
245             case CSTATE:
246             case CRSTATE:
247                 break;
248 #endif
249             default:
250                 if (j < ROOTINO)
251                     break;
252                 errexit("BAD STATE %d FOR INODE I=%d", statemap[j], j);
253             }
254         }
255         if (c == 0)
256             for (i = 0; i < ROOTINO; i++) {
257 #ifdef AFS_NEWCG_ENV
258                 setbit(cg_inosused(newcg), i);
259 #else
260                 setbit(newcg->cg_iused, i);
261 #endif /* AFS_NEWCG_ENV */
262                 newcg->cg_cs.cs_nifree--;
263             }
264         for (i = 0, d = dbase; d < dmax; d += fs->fs_frag, i += fs->fs_frag) {
265             frags = 0;
266             for (j = 0; j < fs->fs_frag; j++) {
267                 if (testbmap(d + j))
268                     continue;
269 #ifdef AFS_NEWCG_ENV
270                 setbit(cg_blksfree(newcg), i + j);
271 #else /* AFS_NEWCG_ENV */
272                 setbit(newcg->cg_free, i + j);
273 #endif /* AFS_NEWCG_ENV */
274                 frags++;
275             }
276             if (frags == fs->fs_frag) {
277                 newcg->cg_cs.cs_nbfree++;
278                 j = cbtocylno(fs, i);
279 #ifdef AFS_NEWCG_ENV
280                 cg_blktot(newcg)[j]++;
281                 cg_blks(fs, newcg, j)[cbtorpos(fs, i)]++;
282 #else /* AFS_NEWCG_ENV */
283                 newcg->cg_btot[j]++;
284                 newcg->cg_b[j][cbtorpos(fs, i)]++;
285 #endif /* AFS_NEWCG_ENV */
286             } else if (frags > 0) {
287                 newcg->cg_cs.cs_nffree += frags;
288 #ifdef AFS_NEWCG_ENV
289                 blk = blkmap(fs, cg_blksfree(newcg), i);
290 #else /* AFS_NEWCG_ENV */
291                 blk = blkmap(fs, newcg->cg_free, i);
292 #endif /* AFS_NEWCG_ENV */
293                 fragacct(fs, blk, newcg->cg_frsum, 1);
294             }
295         }
296         cstotal.cs_nffree += newcg->cg_cs.cs_nffree;
297         cstotal.cs_nbfree += newcg->cg_cs.cs_nbfree;
298         cstotal.cs_nifree += newcg->cg_cs.cs_nifree;
299         cstotal.cs_ndir += newcg->cg_cs.cs_ndir;
300         cs = &fs->fs_cs(fs, c);
301         if (memcmp((char *)&newcg->cg_cs, (char *)cs, sizeof *cs) != 0
302             && dofix(&idesc[0],
303                      "FREE BLK COUNT(S) WRONG IN CYL GROUP (SUPERBLK)")) {
304             memcpy((char *)cs, (char *)&newcg->cg_cs, sizeof *cs);
305             sbdirty();
306         }
307 #ifdef AFS_NEWCG_ENV
308         if (cvtflag) {
309             memcpy((char *)cg, (char *)newcg, (int)fs->fs_cgsize);
310             cgdirty();
311             continue;
312         }
313 #endif /* AFS_NEWCG_ENV */
314 #ifdef AFS_NEWCG_ENV
315         if (memcmp(cg_inosused(newcg), cg_inosused(cg), mapsize) != 0
316             && dofix(&idesc[1], "BLK(S) MISSING IN BIT MAPS")) {
317             memcpy(cg_inosused(cg), cg_inosused(newcg), mapsize);
318             cgdirty();
319         }
320 #else /* AFS_NEWCG_ENV */
321         if (memcmp(newcg->cg_iused, cg->cg_iused, mapsize) != 0
322             && dofix(&idesc[1], "BLK(S) MISSING IN BIT MAPS")) {
323             memcpy(cg->cg_iused, newcg->cg_iused, mapsize);
324             cgdirty();
325         }
326 #endif /* AFS_NEWCG_ENV */
327         if ((memcmp((char *)newcg, (char *)cg, basesize) != 0 ||
328 #ifdef AFS_NEWCG_ENV
329              memcmp((char *)&cg_blktot(newcg)[0], (char *)&cg_blktot(cg)[0],
330                     sumsize) != 0) &&
331 #else /* AFS_NEWCG_ENV */
332              memcmp((char *)newcg->cg_btot, (char *)cg->cg_btot,
333                     sumsize) != 0) &&
334 #endif /* AFS_NEWCG_ENV */
335             dofix(&idesc[2], "SUMMARY INFORMATION BAD")) {
336 #ifdef AFS_NEWCG_ENV
337             memcpy((char *)cg, (char *)newcg, basesize);
338             memcpy((char *)&cg_blktot(cg)[0], (char *)&cg_blktot(newcg)[0],
339                    sumsize);
340 #else /* AFS_NEWCG_ENV */
341             memcpy((char *)cg, (char *)newcg, basesize);
342             memcpy((char *)cg->cg_btot, (char *)newcg->cg_btot, sumsize);
343 #endif /* AFS_NEWCG_ENV */
344             cgdirty();
345         }
346     }
347 #ifdef AFS_NEWCG_ENV
348     if (fs->fs_postblformat == FS_42POSTBLFMT)
349         fs->fs_nrpos = savednrpos;
350 #endif /* AFS_NEWCG_ENV */
351     if (memcmp((char *)&cstotal, (char *)&fs->fs_cstotal, sizeof *cs) != 0
352         && dofix(&idesc[0], "FREE BLK COUNT(S) WRONG IN SUPERBLK")) {
353         memcpy((char *)&fs->fs_cstotal, (char *)&cstotal, sizeof *cs);
354         fs->fs_ronly = 0;
355         sbfine(fs);
356         sbdirty();
357     }
358 }
359
360 /* returns true if sbdirty should be called */
361 sbfine(fs)
362      struct fs *fs;
363 {
364     int rcode;
365     rcode = 0;
366     if (fs->fs_fmod != 0) {
367         fs->fs_fmod = 0;
368         rcode = 1;
369     }
370     return rcode;
371 }