1 /* vi: set sw=4 ts=4: */
2 /*
3 * fsck.c - a file system consistency checker for Linux.
4 *
5 * (C) 1991, 1992 Linus Torvalds.
6 *
7 * Licensed under GPLv2, see file LICENSE in this source tree.
8 */
9
10 /*
11 * 09.11.91 - made the first rudimentary functions
12 *
13 * 10.11.91 - updated, does checking, no repairs yet.
14 * Sent out to the mailing-list for testing.
15 *
16 * 14.11.91 - Testing seems to have gone well. Added some
17 * correction-code, and changed some functions.
18 *
19 * 15.11.91 - More correction code. Hopefully it notices most
20 * cases now, and tries to do something about them.
21 *
22 * 16.11.91 - More corrections (thanks to Mika Jalava). Most
23 * things seem to work now. Yeah, sure.
24 *
25 * 19.04.92 - Had to start over again from this old version, as a
26 * kernel bug ate my enhanced fsck in february.
27 *
28 * 28.02.93 - added support for different directory entry sizes..
29 *
30 * Sat Mar 6 18:59:42 1993, faith@cs.unc.edu: Output namelen with
31 * superblock information
32 *
33 * Sat Oct 9 11:17:11 1993, faith@cs.unc.edu: make exit status conform
34 * to that required by fsutil
35 *
36 * Mon Jan 3 11:06:52 1994 - Dr. Wettstein (greg%wind.uucp@plains.nodak.edu)
37 * Added support for file system valid flag. Also
38 * added program_version variable and output of
39 * program name and version number when program
40 * is executed.
41 *
42 * 30.10.94 - added support for v2 filesystem
43 * (Andreas Schwab, schwab@issan.informatik.uni-dortmund.de)
44 *
45 * 10.12.94 - added test to prevent checking of mounted fs adapted
46 * from Theodore Ts'o's (tytso@athena.mit.edu) e2fsck
47 * program. (Daniel Quinlan, quinlan@yggdrasil.com)
48 *
49 * 01.07.96 - Fixed the v2 fs stuff to use the right #defines and such
50 * for modern libcs (janl@math.uio.no, Nicolai Langfeldt)
51 *
52 * 02.07.96 - Added C bit fiddling routines from rmk@ecs.soton.ac.uk
53 * (Russell King). He made them for ARM. It would seem
54 * that the ARM is powerful enough to do this in C whereas
55 * i386 and m64k must use assembly to get it fast >:-)
56 * This should make minix fsck system-independent.
57 * (janl@math.uio.no, Nicolai Langfeldt)
58 *
59 * 04.11.96 - Added minor fixes from Andreas Schwab to avoid compiler
60 * warnings. Added mc68k bitops from
61 * Joerg Dorchain <dorchain@mpi-sb.mpg.de>.
62 *
63 * 06.11.96 - Added v2 code submitted by Joerg Dorchain, but written by
64 * Andreas Schwab.
65 *
66 * 1999-02-22 Arkadiusz Mickiewicz <misiek@misiek.eu.org>
67 * - added Native Language Support
68 *
69 *
70 * I've had no time to add comments - hopefully the function names
71 * are comments enough. As with all file system checkers, this assumes
72 * the file system is quiescent - don't use it on a mounted device
73 * unless you can be sure nobody is writing to it (and remember that the
74 * kernel can write to it when it searches for files).
75 *
76 * Usage: fsck [-larvsm] device
77 * -l for a listing of all the filenames
78 * -a for automatic repairs (not implemented)
79 * -r for repairs (interactive) (not implemented)
80 * -v for verbose (tells how many files)
81 * -s for superblock info
82 * -m for minix-like "mode not cleared" warnings
83 * -f force filesystem check even if filesystem marked as valid
84 *
85 * The device may be a block device or a image of one, but this isn't
86 * enforced (but it's not much fun on a character device :-).
87 */
88 //config:config FSCK_MINIX
89 //config: bool "fsck.minix (13 kb)"
90 //config: default y
91 //config: help
92 //config: The minix filesystem is a nice, small, compact, read-write filesystem
93 //config: with little overhead. It is not a journaling filesystem however and
94 //config: can experience corruption if it is not properly unmounted or if the
95 //config: power goes off in the middle of a write. This utility allows you to
96 //config: check for and attempt to repair any corruption that occurs to a minix
97 //config: filesystem.
98
99 //applet:IF_FSCK_MINIX(APPLET_ODDNAME(fsck.minix, fsck_minix, BB_DIR_SBIN, BB_SUID_DROP, fsck_minix))
100
101 //kbuild:lib-$(CONFIG_FSCK_MINIX) += fsck_minix.o
102
103 //usage:#define fsck_minix_trivial_usage
104 //usage: "[-larvsmf] BLOCKDEV"
105 //usage:#define fsck_minix_full_usage "\n\n"
106 //usage: "Check MINIX filesystem\n"
107 //usage: "\n -l List all filenames"
108 //usage: "\n -r Perform interactive repairs"
109 //usage: "\n -a Perform automatic repairs"
110 //usage: "\n -v Verbose"
111 //usage: "\n -s Output superblock information"
112 //usage: "\n -m Show \"mode not cleared\" warnings"
113 //usage: "\n -f Force file system check"
114
115 #include <mntent.h>
116 #include "libbb.h"
117 #include "minix.h"
118
119 #ifndef BLKGETSIZE
120 #define BLKGETSIZE _IO(0x12,96) /* return device size */
121 #endif
122
123 struct BUG_bad_inode_size {
124 char BUG_bad_inode1_size[(INODE_SIZE1 * MINIX1_INODES_PER_BLOCK != BLOCK_SIZE) ? -1 : 1];
125 #if ENABLE_FEATURE_MINIX2
126 char BUG_bad_inode2_size[(INODE_SIZE2 * MINIX2_INODES_PER_BLOCK != BLOCK_SIZE) ? -1 : 1];
127 #endif
128 };
129
130 enum {
131 #ifdef UNUSED
132 MINIX1_LINK_MAX = 250,
133 MINIX2_LINK_MAX = 65530,
134 MINIX_I_MAP_SLOTS = 8,
135 MINIX_Z_MAP_SLOTS = 64,
136 MINIX_V1 = 0x0001, /* original minix fs */
137 MINIX_V2 = 0x0002, /* minix V2 fs */
138 #endif
139 MINIX_NAME_MAX = 255, /* # chars in a file name */
140 };
141
142
143 #if !ENABLE_FEATURE_MINIX2
144 enum { version2 = 0 };
145 #endif
146
147 enum { MAX_DEPTH = 32 };
148
149 enum { dev_fd = 3 };
150
151 struct globals {
152 #if ENABLE_FEATURE_MINIX2
153 smallint version2;
154 #endif
155 smallint changed; /* is filesystem modified? */
156 smallint errors_uncorrected; /* flag if some error was not corrected */
157 smallint termios_set;
158 smallint dirsize;
159 smallint namelen;
160 const char *device_name;
161 int directory, regular, blockdev, chardev, links, symlinks, total;
162 char *inode_buffer;
163
164 char *inode_map;
165 char *zone_map;
166
167 unsigned char *inode_count;
168 unsigned char *zone_count;
169
170 /* File-name data */
171 int name_depth;
172 char *name_component[MAX_DEPTH+1];
173
174 /* Bigger stuff */
175 struct termios sv_termios;
176 union {
177 char superblock_buffer[BLOCK_SIZE];
178 struct minix_superblock Super;
179 } u;
180 char add_zone_ind_blk[BLOCK_SIZE];
181 char add_zone_dind_blk[BLOCK_SIZE];
182 IF_FEATURE_MINIX2(char add_zone_tind_blk[BLOCK_SIZE];)
183 char check_file_blk[BLOCK_SIZE];
184
185 /* File-name data */
186 char current_name[MAX_DEPTH * MINIX_NAME_MAX];
187 };
188 #define G (*ptr_to_globals)
189 #if ENABLE_FEATURE_MINIX2
190 #define version2 (G.version2 )
191 #endif
192 #define changed (G.changed )
193 #define errors_uncorrected (G.errors_uncorrected )
194 #define termios_set (G.termios_set )
195 #define dirsize (G.dirsize )
196 #define namelen (G.namelen )
197 #define device_name (G.device_name )
198 #define directory (G.directory )
199 #define regular (G.regular )
200 #define blockdev (G.blockdev )
201 #define chardev (G.chardev )
202 #define links (G.links )
203 #define symlinks (G.symlinks )
204 #define total (G.total )
205 #define inode_buffer (G.inode_buffer )
206 #define inode_map (G.inode_map )
207 #define zone_map (G.zone_map )
208 #define inode_count (G.inode_count )
209 #define zone_count (G.zone_count )
210 #define name_depth (G.name_depth )
211 #define name_component (G.name_component )
212 #define sv_termios (G.sv_termios )
213 #define superblock_buffer (G.u.superblock_buffer)
214 #define add_zone_ind_blk (G.add_zone_ind_blk )
215 #define add_zone_dind_blk (G.add_zone_dind_blk )
216 #define add_zone_tind_blk (G.add_zone_tind_blk )
217 #define check_file_blk (G.check_file_blk )
218 #define current_name (G.current_name )
219 #define INIT_G() do { \
220 SET_PTR_TO_GLOBALS(xzalloc(sizeof(G))); \
221 dirsize = 16; \
222 namelen = 14; \
223 current_name[0] = '/'; \
224 /*current_name[1] = '\0';*/ \
225 name_component[0] = ¤t_name[0]; \
226 } while (0)
227
228
229 #define OPTION_STR "larvsmf"
230 enum {
231 OPT_l = (1 << 0),
232 OPT_a = (1 << 1),
233 OPT_r = (1 << 2),
234 OPT_v = (1 << 3),
235 OPT_s = (1 << 4),
236 OPT_w = (1 << 5),
237 OPT_f = (1 << 6),
238 };
239 #define OPT_list (option_mask32 & OPT_l)
240 #define OPT_automatic (option_mask32 & OPT_a)
241 #define OPT_repair (option_mask32 & OPT_r)
242 #define OPT_verbose (option_mask32 & OPT_v)
243 #define OPT_show (option_mask32 & OPT_s)
244 #define OPT_warn_mode (option_mask32 & OPT_w)
245 #define OPT_force (option_mask32 & OPT_f)
246 /* non-automatic repairs requested? */
247 #define OPT_manual ((option_mask32 & (OPT_a|OPT_r)) == OPT_r)
248
249
250 #define Inode1 (((struct minix1_inode *) inode_buffer)-1)
251 #define Inode2 (((struct minix2_inode *) inode_buffer)-1)
252
253 #define Super (G.u.Super)
254
255 #if ENABLE_FEATURE_MINIX2
256 # define ZONES ((unsigned)(version2 ? Super.s_zones : Super.s_nzones))
257 #else
258 # define ZONES ((unsigned)(Super.s_nzones))
259 #endif
260 #define INODES ((unsigned)Super.s_ninodes)
261 #define IMAPS ((unsigned)Super.s_imap_blocks)
262 #define ZMAPS ((unsigned)Super.s_zmap_blocks)
263 #define FIRSTZONE ((unsigned)Super.s_firstdatazone)
264 #define ZONESIZE ((unsigned)Super.s_log_zone_size)
265 #define MAXSIZE ((unsigned)Super.s_max_size)
266 #define MAGIC (Super.s_magic)
267
268 /* gcc likes this more (code is smaller) than macro variant */
div_roundup(unsigned size,unsigned n)269 static ALWAYS_INLINE unsigned div_roundup(unsigned size, unsigned n)
270 {
271 return (size + n-1) / n;
272 }
273
274 #if !ENABLE_FEATURE_MINIX2
275 #define INODE_BLOCKS div_roundup(INODES, MINIX1_INODES_PER_BLOCK)
276 #else
277 #define INODE_BLOCKS div_roundup(INODES, \
278 (version2 ? MINIX2_INODES_PER_BLOCK : MINIX1_INODES_PER_BLOCK))
279 #endif
280
281 #define INODE_BUFFER_SIZE (INODE_BLOCKS * BLOCK_SIZE)
282 #define NORM_FIRSTZONE (2 + IMAPS + ZMAPS + INODE_BLOCKS)
283
284 /* Before you ask "where they come from?": */
285 /* setbit/clrbit are supplied by sys/param.h */
286
minix_bit(const char * a,unsigned i)287 static int minix_bit(const char *a, unsigned i)
288 {
289 return (a[i >> 3] & (1<<(i & 7)));
290 }
291
minix_setbit(char * a,unsigned i)292 static void minix_setbit(char *a, unsigned i)
293 {
294 setbit(a, i);
295 changed = 1;
296 }
minix_clrbit(char * a,unsigned i)297 static void minix_clrbit(char *a, unsigned i)
298 {
299 clrbit(a, i);
300 changed = 1;
301 }
302
303 /* Note: do not assume 0/1, it is 0/nonzero */
304 #define zone_in_use(x) (minix_bit(zone_map,(x)-FIRSTZONE+1))
305 #define inode_in_use(x) (minix_bit(inode_map,(x)))
306
307 #define mark_inode(x) (minix_setbit(inode_map,(x)))
308 #define unmark_inode(x) (minix_clrbit(inode_map,(x)))
309
310 #define mark_zone(x) (minix_setbit(zone_map,(x)-FIRSTZONE+1))
311 #define unmark_zone(x) (minix_clrbit(zone_map,(x)-FIRSTZONE+1))
312
313
314 static void recursive_check(unsigned ino);
315 #if ENABLE_FEATURE_MINIX2
316 static void recursive_check2(unsigned ino);
317 #endif
318
319 static void die(const char *str) NORETURN;
die(const char * str)320 static void die(const char *str)
321 {
322 if (termios_set)
323 tcsetattr_stdin_TCSANOW(&sv_termios);
324 bb_simple_error_msg_and_die(str);
325 }
326
push_filename(const char * name)327 static void push_filename(const char *name)
328 {
329 // /dir/dir/dir/file
330 // ^ ^ ^
331 // [0] [1] [2] <-name_component[i]
332 if (name_depth < MAX_DEPTH) {
333 int len;
334 char *p = name_component[name_depth];
335 *p++ = '/';
336 len = sprintf(p, "%.*s", namelen, name);
337 name_component[name_depth + 1] = p + len;
338 }
339 name_depth++;
340 }
341
pop_filename(void)342 static void pop_filename(void)
343 {
344 name_depth--;
345 if (name_depth < MAX_DEPTH) {
346 *name_component[name_depth] = '\0';
347 if (!name_depth) {
348 current_name[0] = '/';
349 current_name[1] = '\0';
350 }
351 }
352 }
353
ask(const char * string,int def)354 static int ask(const char *string, int def)
355 {
356 int c;
357
358 if (!OPT_repair) {
359 bb_putchar('\n');
360 errors_uncorrected = 1;
361 return 0;
362 }
363 if (OPT_automatic) {
364 bb_putchar('\n');
365 if (!def)
366 errors_uncorrected = 1;
367 return def;
368 }
369 printf(def ? "%s (y/n)? " : "%s (n/y)? ", string);
370 for (;;) {
371 fflush_all();
372 c = getchar();
373 if (c == EOF) {
374 if (!def)
375 errors_uncorrected = 1;
376 return def;
377 }
378 if (c == '\n')
379 break;
380 c |= 0x20; /* tolower */
381 if (c == 'y') {
382 def = 1;
383 break;
384 }
385 if (c == 'n') {
386 def = 0;
387 break;
388 }
389 }
390 if (def)
391 puts("y");
392 else {
393 puts("n");
394 errors_uncorrected = 1;
395 }
396 return def;
397 }
398
399 /*
400 * Make certain that we aren't checking a filesystem that is on a
401 * mounted partition. Code adapted from e2fsck, Copyright (C) 1993,
402 * 1994 Theodore Ts'o. Also licensed under GPL.
403 */
check_mount(void)404 static void check_mount(void)
405 {
406 if (find_mount_point(device_name, 0)) {
407 int cont;
408 #if ENABLE_FEATURE_MTAB_SUPPORT
409 /*
410 * If the root is mounted read-only, then /etc/mtab is
411 * probably not correct; so we won't issue a warning based on
412 * it.
413 */
414 int fd = open(bb_path_mtab_file, O_RDWR);
415
416 if (fd < 0 && errno == EROFS)
417 return;
418 close(fd);
419 #endif
420 printf("%s is mounted. ", device_name);
421 cont = 0;
422 if (isatty(0) && isatty(1))
423 cont = ask("Do you really want to continue", 0);
424 if (!cont) {
425 puts("Check aborted");
426 exit(EXIT_SUCCESS);
427 }
428 }
429 }
430
431 /*
432 * check_zone_nr checks to see that *nr is a valid zone nr. If it
433 * isn't, it will possibly be repaired. Check_zone_nr sets *corrected
434 * if an error was corrected, and returns the zone (0 for no zone
435 * or a bad zone-number).
436 */
check_zone_nr2(uint32_t * nr,smallint * corrected)437 static int check_zone_nr2(uint32_t *nr, smallint *corrected)
438 {
439 const char *msg;
440 if (!*nr)
441 return 0;
442 if (*nr < FIRSTZONE)
443 msg = "< FIRSTZONE";
444 else if (*nr >= ZONES)
445 msg = ">= ZONES";
446 else
447 return *nr;
448 printf("Zone nr %s in file '%s'. ", msg, current_name);
449 if (ask("Remove block", 1)) {
450 *nr = 0;
451 *corrected = 1;
452 }
453 return 0;
454 }
455
check_zone_nr(uint16_t * nr,smallint * corrected)456 static int check_zone_nr(uint16_t *nr, smallint *corrected)
457 {
458 uint32_t nr32 = *nr;
459 int r = check_zone_nr2(&nr32, corrected);
460 *nr = (uint16_t)nr32;
461 return r;
462 }
463
464 /*
465 * read-block reads block nr into the buffer at addr.
466 */
read_block(unsigned nr,void * addr)467 static void read_block(unsigned nr, void *addr)
468 {
469 if (!nr) {
470 memset(addr, 0, BLOCK_SIZE);
471 return;
472 }
473 xlseek(dev_fd, BLOCK_SIZE * nr, SEEK_SET);
474 if (BLOCK_SIZE != full_read(dev_fd, addr, BLOCK_SIZE)) {
475 printf("%s: bad block %u in file '%s'\n",
476 bb_msg_read_error, nr, current_name);
477 errors_uncorrected = 1;
478 memset(addr, 0, BLOCK_SIZE);
479 }
480 }
481
482 /*
483 * write_block writes block nr to disk.
484 */
write_block(unsigned nr,void * addr)485 static void write_block(unsigned nr, void *addr)
486 {
487 if (!nr)
488 return;
489 if (nr < FIRSTZONE || nr >= ZONES) {
490 puts("Internal error: trying to write bad block\n"
491 "Write request ignored");
492 errors_uncorrected = 1;
493 return;
494 }
495 xlseek(dev_fd, BLOCK_SIZE * nr, SEEK_SET);
496 if (BLOCK_SIZE != full_write(dev_fd, addr, BLOCK_SIZE)) {
497 printf("%s: bad block %u in file '%s'\n",
498 bb_msg_write_error, nr, current_name);
499 errors_uncorrected = 1;
500 }
501 }
502
503 /*
504 * map_block calculates the absolute block nr of a block in a file.
505 * It sets 'changed' if the inode has needed changing, and re-writes
506 * any indirect blocks with errors.
507 */
map_block(struct minix1_inode * inode,unsigned blknr)508 static int map_block(struct minix1_inode *inode, unsigned blknr)
509 {
510 uint16_t ind[BLOCK_SIZE >> 1];
511 int block, result;
512 smallint blk_chg;
513
514 if (blknr < 7)
515 return check_zone_nr(inode->i_zone + blknr, &changed);
516 blknr -= 7;
517 if (blknr < 512) {
518 block = check_zone_nr(inode->i_zone + 7, &changed);
519 goto common;
520 }
521 blknr -= 512;
522 block = check_zone_nr(inode->i_zone + 8, &changed);
523 read_block(block, ind); /* double indirect */
524 blk_chg = 0;
525 result = check_zone_nr(&ind[blknr / 512], &blk_chg);
526 if (blk_chg)
527 write_block(block, ind);
528 block = result;
529 common:
530 read_block(block, ind);
531 blk_chg = 0;
532 result = check_zone_nr(&ind[blknr % 512], &blk_chg);
533 if (blk_chg)
534 write_block(block, ind);
535 return result;
536 }
537
538 #if ENABLE_FEATURE_MINIX2
map_block2(struct minix2_inode * inode,unsigned blknr)539 static int map_block2(struct minix2_inode *inode, unsigned blknr)
540 {
541 uint32_t ind[BLOCK_SIZE >> 2];
542 int block, result;
543 smallint blk_chg;
544
545 if (blknr < 7)
546 return check_zone_nr2(inode->i_zone + blknr, &changed);
547 blknr -= 7;
548 if (blknr < 256) {
549 block = check_zone_nr2(inode->i_zone + 7, &changed);
550 goto common2;
551 }
552 blknr -= 256;
553 if (blknr < 256 * 256) {
554 block = check_zone_nr2(inode->i_zone + 8, &changed);
555 goto common1;
556 }
557 blknr -= 256 * 256;
558 block = check_zone_nr2(inode->i_zone + 9, &changed);
559 read_block(block, ind); /* triple indirect */
560 blk_chg = 0;
561 result = check_zone_nr2(&ind[blknr / (256 * 256)], &blk_chg);
562 if (blk_chg)
563 write_block(block, ind);
564 block = result;
565 common1:
566 read_block(block, ind); /* double indirect */
567 blk_chg = 0;
568 result = check_zone_nr2(&ind[(blknr / 256) % 256], &blk_chg);
569 if (blk_chg)
570 write_block(block, ind);
571 block = result;
572 common2:
573 read_block(block, ind);
574 blk_chg = 0;
575 result = check_zone_nr2(&ind[blknr % 256], &blk_chg);
576 if (blk_chg)
577 write_block(block, ind);
578 return result;
579 }
580 #endif
581
write_superblock(void)582 static void write_superblock(void)
583 {
584 /*
585 * Set the state of the filesystem based on whether or not there
586 * are uncorrected errors. The filesystem valid flag is
587 * unconditionally set if we get this far.
588 */
589 Super.s_state |= MINIX_VALID_FS | MINIX_ERROR_FS;
590 if (!errors_uncorrected)
591 Super.s_state &= ~MINIX_ERROR_FS;
592
593 xlseek(dev_fd, BLOCK_SIZE, SEEK_SET);
594 if (BLOCK_SIZE != full_write(dev_fd, superblock_buffer, BLOCK_SIZE))
595 die("can't write superblock");
596 }
597
write_tables(void)598 static void write_tables(void)
599 {
600 write_superblock();
601
602 if (IMAPS * BLOCK_SIZE != write(dev_fd, inode_map, IMAPS * BLOCK_SIZE))
603 die("can't write inode map");
604 if (ZMAPS * BLOCK_SIZE != write(dev_fd, zone_map, ZMAPS * BLOCK_SIZE))
605 die("can't write zone map");
606 if (INODE_BUFFER_SIZE != write(dev_fd, inode_buffer, INODE_BUFFER_SIZE))
607 die("can't write inodes");
608 }
609
get_dirsize(void)610 static void get_dirsize(void)
611 {
612 int block;
613 char blk[BLOCK_SIZE];
614 int size;
615
616 #if ENABLE_FEATURE_MINIX2
617 if (version2)
618 block = Inode2[MINIX_ROOT_INO].i_zone[0];
619 else
620 #endif
621 block = Inode1[MINIX_ROOT_INO].i_zone[0];
622 read_block(block, blk);
623 for (size = 16; size < BLOCK_SIZE; size <<= 1) {
624 if (strcmp(blk + size + 2, "..") == 0) {
625 dirsize = size;
626 namelen = size - 2;
627 return;
628 }
629 }
630 /* use defaults */
631 }
632
read_superblock(void)633 static void read_superblock(void)
634 {
635 xlseek(dev_fd, BLOCK_SIZE, SEEK_SET);
636 if (BLOCK_SIZE != full_read(dev_fd, superblock_buffer, BLOCK_SIZE))
637 die("can't read superblock");
638 /* already initialized to:
639 namelen = 14;
640 dirsize = 16;
641 version2 = 0;
642 */
643 if (MAGIC == MINIX1_SUPER_MAGIC) {
644 } else if (MAGIC == MINIX1_SUPER_MAGIC2) {
645 namelen = 30;
646 dirsize = 32;
647 #if ENABLE_FEATURE_MINIX2
648 } else if (MAGIC == MINIX2_SUPER_MAGIC) {
649 version2 = 1;
650 } else if (MAGIC == MINIX2_SUPER_MAGIC2) {
651 namelen = 30;
652 dirsize = 32;
653 version2 = 1;
654 #endif
655 } else
656 die("bad magic number in superblock");
657 if (ZONESIZE != 0 || BLOCK_SIZE != 1024)
658 die("only 1k blocks/zones supported");
659 if (IMAPS * BLOCK_SIZE * 8 < INODES + 1)
660 die("bad s_imap_blocks field in superblock");
661 if (ZMAPS * BLOCK_SIZE * 8 < ZONES - FIRSTZONE + 1)
662 die("bad s_zmap_blocks field in superblock");
663 }
664
read_tables(void)665 static void read_tables(void)
666 {
667 inode_map = xzalloc(IMAPS * BLOCK_SIZE);
668 zone_map = xzalloc(ZMAPS * BLOCK_SIZE);
669 inode_buffer = xmalloc(INODE_BUFFER_SIZE);
670 inode_count = xmalloc(INODES + 1);
671 zone_count = xmalloc(ZONES);
672 if (IMAPS * BLOCK_SIZE != read(dev_fd, inode_map, IMAPS * BLOCK_SIZE))
673 die("can't read inode map");
674 if (ZMAPS * BLOCK_SIZE != read(dev_fd, zone_map, ZMAPS * BLOCK_SIZE))
675 die("can't read zone map");
676 if (INODE_BUFFER_SIZE != read(dev_fd, inode_buffer, INODE_BUFFER_SIZE))
677 die("can't read inodes");
678 if (NORM_FIRSTZONE != FIRSTZONE) {
679 puts("warning: firstzone!=norm_firstzone");
680 errors_uncorrected = 1;
681 }
682 get_dirsize();
683 if (OPT_show) {
684 printf("%u inodes\n"
685 "%u blocks\n"
686 "Firstdatazone=%u (%u)\n"
687 "Zonesize=%u\n"
688 "Maxsize=%u\n"
689 "Filesystem state=%u\n"
690 "namelen=%u\n\n",
691 INODES,
692 ZONES,
693 FIRSTZONE, NORM_FIRSTZONE,
694 BLOCK_SIZE << ZONESIZE,
695 MAXSIZE,
696 Super.s_state,
697 namelen);
698 }
699 }
700
get_inode_common(unsigned nr,uint16_t i_mode)701 static void get_inode_common(unsigned nr, uint16_t i_mode)
702 {
703 total++;
704 if (!inode_count[nr]) {
705 if (!inode_in_use(nr)) {
706 printf("Inode %u is marked as 'unused', but it is used "
707 "for file '%s'\n", nr, current_name);
708 if (OPT_repair) {
709 if (ask("Mark as 'in use'", 1))
710 mark_inode(nr);
711 else
712 errors_uncorrected = 1;
713 }
714 }
715 if (S_ISDIR(i_mode))
716 directory++;
717 else if (S_ISREG(i_mode))
718 regular++;
719 else if (S_ISCHR(i_mode))
720 chardev++;
721 else if (S_ISBLK(i_mode))
722 blockdev++;
723 else if (S_ISLNK(i_mode))
724 symlinks++;
725 else if (S_ISSOCK(i_mode));
726 else if (S_ISFIFO(i_mode));
727 else {
728 printf("%s has mode %05o\n", current_name, i_mode);
729 }
730 } else
731 links++;
732 if (!++inode_count[nr]) {
733 puts("Warning: inode count too big");
734 inode_count[nr]--;
735 errors_uncorrected = 1;
736 }
737 }
738
get_inode(unsigned nr)739 static struct minix1_inode *get_inode(unsigned nr)
740 {
741 struct minix1_inode *inode;
742
743 if (!nr || nr > INODES)
744 return NULL;
745 inode = Inode1 + nr;
746 get_inode_common(nr, inode->i_mode);
747 return inode;
748 }
749
750 #if ENABLE_FEATURE_MINIX2
get_inode2(unsigned nr)751 static struct minix2_inode *get_inode2(unsigned nr)
752 {
753 struct minix2_inode *inode;
754
755 if (!nr || nr > INODES)
756 return NULL;
757 inode = Inode2 + nr;
758 get_inode_common(nr, inode->i_mode);
759 return inode;
760 }
761 #endif
762
check_root(void)763 static void check_root(void)
764 {
765 struct minix1_inode *inode = Inode1 + MINIX_ROOT_INO;
766
767 if (!inode || !S_ISDIR(inode->i_mode))
768 die("root inode isn't a directory");
769 }
770
771 #if ENABLE_FEATURE_MINIX2
check_root2(void)772 static void check_root2(void)
773 {
774 struct minix2_inode *inode = Inode2 + MINIX_ROOT_INO;
775
776 if (!inode || !S_ISDIR(inode->i_mode))
777 die("root inode isn't a directory");
778 }
779 #else
780 void check_root2(void);
781 #endif
782
add_zone_common(int block,smallint * corrected)783 static int add_zone_common(int block, smallint *corrected)
784 {
785 if (!block)
786 return 0;
787 if (zone_count[block]) {
788 printf("Already used block is reused in file '%s'. ",
789 current_name);
790 if (ask("Clear", 1)) {
791 block = 0;
792 *corrected = 1;
793 return -1; /* "please zero out *znr" */
794 }
795 }
796 if (!zone_in_use(block)) {
797 printf("Block %d in file '%s' is marked as 'unused'. ",
798 block, current_name);
799 if (ask("Correct", 1))
800 mark_zone(block);
801 }
802 if (!++zone_count[block])
803 zone_count[block]--;
804 return block;
805 }
806
add_zone(uint16_t * znr,smallint * corrected)807 static int add_zone(uint16_t *znr, smallint *corrected)
808 {
809 int block;
810
811 block = check_zone_nr(znr, corrected);
812 block = add_zone_common(block, corrected);
813 if (block == -1) {
814 *znr = 0;
815 block = 0;
816 }
817 return block;
818 }
819
820 #if ENABLE_FEATURE_MINIX2
add_zone2(uint32_t * znr,smallint * corrected)821 static int add_zone2(uint32_t *znr, smallint *corrected)
822 {
823 int block;
824
825 block = check_zone_nr2(znr, corrected);
826 block = add_zone_common(block, corrected);
827 if (block == -1) {
828 *znr = 0;
829 block = 0;
830 }
831 return block;
832 }
833 #endif
834
add_zone_ind(uint16_t * znr,smallint * corrected)835 static void add_zone_ind(uint16_t *znr, smallint *corrected)
836 {
837 int i;
838 int block;
839 smallint chg_blk = 0;
840
841 block = add_zone(znr, corrected);
842 if (!block)
843 return;
844 read_block(block, add_zone_ind_blk);
845 for (i = 0; i < (BLOCK_SIZE >> 1); i++)
846 add_zone(i + (uint16_t *) add_zone_ind_blk, &chg_blk);
847 if (chg_blk)
848 write_block(block, add_zone_ind_blk);
849 }
850
851 #if ENABLE_FEATURE_MINIX2
add_zone_ind2(uint32_t * znr,smallint * corrected)852 static void add_zone_ind2(uint32_t *znr, smallint *corrected)
853 {
854 int i;
855 int block;
856 smallint chg_blk = 0;
857
858 block = add_zone2(znr, corrected);
859 if (!block)
860 return;
861 read_block(block, add_zone_ind_blk);
862 for (i = 0; i < BLOCK_SIZE >> 2; i++)
863 add_zone2(i + (uint32_t *) add_zone_ind_blk, &chg_blk);
864 if (chg_blk)
865 write_block(block, add_zone_ind_blk);
866 }
867 #endif
868
add_zone_dind(uint16_t * znr,smallint * corrected)869 static void add_zone_dind(uint16_t *znr, smallint *corrected)
870 {
871 int i;
872 int block;
873 smallint chg_blk = 0;
874
875 block = add_zone(znr, corrected);
876 if (!block)
877 return;
878 read_block(block, add_zone_dind_blk);
879 for (i = 0; i < (BLOCK_SIZE >> 1); i++)
880 add_zone_ind(i + (uint16_t *) add_zone_dind_blk, &chg_blk);
881 if (chg_blk)
882 write_block(block, add_zone_dind_blk);
883 }
884
885 #if ENABLE_FEATURE_MINIX2
add_zone_dind2(uint32_t * znr,smallint * corrected)886 static void add_zone_dind2(uint32_t *znr, smallint *corrected)
887 {
888 int i;
889 int block;
890 smallint chg_blk = 0;
891
892 block = add_zone2(znr, corrected);
893 if (!block)
894 return;
895 read_block(block, add_zone_dind_blk);
896 for (i = 0; i < BLOCK_SIZE >> 2; i++)
897 add_zone_ind2(i + (uint32_t *) add_zone_dind_blk, &chg_blk);
898 if (chg_blk)
899 write_block(block, add_zone_dind_blk);
900 }
901
add_zone_tind2(uint32_t * znr,smallint * corrected)902 static void add_zone_tind2(uint32_t *znr, smallint *corrected)
903 {
904 int i;
905 int block;
906 smallint chg_blk = 0;
907
908 block = add_zone2(znr, corrected);
909 if (!block)
910 return;
911 read_block(block, add_zone_tind_blk);
912 for (i = 0; i < BLOCK_SIZE >> 2; i++)
913 add_zone_dind2(i + (uint32_t *) add_zone_tind_blk, &chg_blk);
914 if (chg_blk)
915 write_block(block, add_zone_tind_blk);
916 }
917 #endif
918
check_zones(unsigned i)919 static void check_zones(unsigned i)
920 {
921 struct minix1_inode *inode;
922
923 if (!i || i > INODES)
924 return;
925 if (inode_count[i] > 1) /* have we counted this file already? */
926 return;
927 inode = Inode1 + i;
928 if (!S_ISDIR(inode->i_mode)
929 && !S_ISREG(inode->i_mode)
930 && !S_ISLNK(inode->i_mode)
931 ) {
932 return;
933 }
934 for (i = 0; i < 7; i++)
935 add_zone(i + inode->i_zone, &changed);
936 add_zone_ind(7 + inode->i_zone, &changed);
937 add_zone_dind(8 + inode->i_zone, &changed);
938 }
939
940 #if ENABLE_FEATURE_MINIX2
check_zones2(unsigned i)941 static void check_zones2(unsigned i)
942 {
943 struct minix2_inode *inode;
944
945 if (!i || i > INODES)
946 return;
947 if (inode_count[i] > 1) /* have we counted this file already? */
948 return;
949 inode = Inode2 + i;
950 if (!S_ISDIR(inode->i_mode) && !S_ISREG(inode->i_mode)
951 && !S_ISLNK(inode->i_mode))
952 return;
953 for (i = 0; i < 7; i++)
954 add_zone2(i + inode->i_zone, &changed);
955 add_zone_ind2(7 + inode->i_zone, &changed);
956 add_zone_dind2(8 + inode->i_zone, &changed);
957 add_zone_tind2(9 + inode->i_zone, &changed);
958 }
959 #endif
960
check_file(struct minix1_inode * dir,unsigned offset)961 static void check_file(struct minix1_inode *dir, unsigned offset)
962 {
963 struct minix1_inode *inode;
964 int ino;
965 char *name;
966 int block;
967
968 block = map_block(dir, offset / BLOCK_SIZE);
969 read_block(block, check_file_blk);
970 name = check_file_blk + (offset % BLOCK_SIZE) + 2;
971 ino = *(uint16_t *) (name - 2);
972 if (ino > INODES) {
973 printf("%s contains a bad inode number for file '%.*s'. ",
974 current_name, namelen, name);
975 if (ask("Remove", 1)) {
976 *(uint16_t *) (name - 2) = 0;
977 write_block(block, check_file_blk);
978 }
979 ino = 0;
980 }
981 push_filename(name);
982 inode = get_inode(ino);
983 pop_filename();
984 if (!offset) {
985 if (inode && LONE_CHAR(name, '.'))
986 return;
987 printf("%s: bad directory: '.' isn't first\n", current_name);
988 errors_uncorrected = 1;
989 }
990 if (offset == dirsize) {
991 if (inode && strcmp("..", name) == 0)
992 return;
993 printf("%s: bad directory: '..' isn't second\n", current_name);
994 errors_uncorrected = 1;
995 }
996 if (!inode)
997 return;
998 push_filename(name);
999 if (OPT_list) {
1000 if (OPT_verbose)
1001 printf("%6d %07o %3d ", ino, inode->i_mode, inode->i_nlinks);
1002 printf("%s%s\n", current_name, S_ISDIR(inode->i_mode) ? ":" : "");
1003 }
1004 check_zones(ino);
1005 if (inode && S_ISDIR(inode->i_mode))
1006 recursive_check(ino);
1007 pop_filename();
1008 }
1009
1010 #if ENABLE_FEATURE_MINIX2
check_file2(struct minix2_inode * dir,unsigned offset)1011 static void check_file2(struct minix2_inode *dir, unsigned offset)
1012 {
1013 struct minix2_inode *inode;
1014 int ino;
1015 char *name;
1016 int block;
1017
1018 block = map_block2(dir, offset / BLOCK_SIZE);
1019 read_block(block, check_file_blk);
1020 name = check_file_blk + (offset % BLOCK_SIZE) + 2;
1021 ino = *(uint16_t *) (name - 2);
1022 if (ino > INODES) {
1023 printf("%s contains a bad inode number for file '%.*s'. ",
1024 current_name, namelen, name);
1025 if (ask("Remove", 1)) {
1026 *(uint16_t *) (name - 2) = 0;
1027 write_block(block, check_file_blk);
1028 }
1029 ino = 0;
1030 }
1031 push_filename(name);
1032 inode = get_inode2(ino);
1033 pop_filename();
1034 if (!offset) {
1035 if (inode && LONE_CHAR(name, '.'))
1036 return;
1037 printf("%s: bad directory: '.' isn't first\n", current_name);
1038 errors_uncorrected = 1;
1039 }
1040 if (offset == dirsize) {
1041 if (inode && strcmp("..", name) == 0)
1042 return;
1043 printf("%s: bad directory: '..' isn't second\n", current_name);
1044 errors_uncorrected = 1;
1045 }
1046 if (!inode)
1047 return;
1048 push_filename(name);
1049 if (OPT_list) {
1050 if (OPT_verbose)
1051 printf("%6d %07o %3d ", ino, inode->i_mode, inode->i_nlinks);
1052 printf("%s%s\n", current_name, S_ISDIR(inode->i_mode) ? ":" : "");
1053 }
1054 check_zones2(ino);
1055 if (inode && S_ISDIR(inode->i_mode))
1056 recursive_check2(ino);
1057 pop_filename();
1058 }
1059 #endif
1060
recursive_check(unsigned ino)1061 static void recursive_check(unsigned ino)
1062 {
1063 struct minix1_inode *dir;
1064 unsigned offset;
1065
1066 dir = Inode1 + ino;
1067 if (!S_ISDIR(dir->i_mode))
1068 die("internal error");
1069 if (dir->i_size < 2 * dirsize) {
1070 printf("%s: bad directory: size<32", current_name);
1071 errors_uncorrected = 1;
1072 }
1073 for (offset = 0; offset < dir->i_size; offset += dirsize)
1074 check_file(dir, offset);
1075 }
1076
1077 #if ENABLE_FEATURE_MINIX2
recursive_check2(unsigned ino)1078 static void recursive_check2(unsigned ino)
1079 {
1080 struct minix2_inode *dir;
1081 unsigned offset;
1082
1083 dir = Inode2 + ino;
1084 if (!S_ISDIR(dir->i_mode))
1085 die("internal error");
1086 if (dir->i_size < 2 * dirsize) {
1087 printf("%s: bad directory: size<32", current_name);
1088 errors_uncorrected = 1;
1089 }
1090 for (offset = 0; offset < dir->i_size; offset += dirsize)
1091 check_file2(dir, offset);
1092 }
1093 #endif
1094
bad_zone(int i)1095 static int bad_zone(int i)
1096 {
1097 char buffer[BLOCK_SIZE];
1098
1099 xlseek(dev_fd, BLOCK_SIZE * i, SEEK_SET);
1100 return (BLOCK_SIZE != full_read(dev_fd, buffer, BLOCK_SIZE));
1101 }
1102
check_counts(void)1103 static void check_counts(void)
1104 {
1105 int i;
1106
1107 for (i = 1; i <= INODES; i++) {
1108 if (OPT_warn_mode && Inode1[i].i_mode && !inode_in_use(i)) {
1109 printf("Inode %d has non-zero mode. ", i);
1110 if (ask("Clear", 1)) {
1111 Inode1[i].i_mode = 0;
1112 changed = 1;
1113 }
1114 }
1115 if (!inode_count[i]) {
1116 if (!inode_in_use(i))
1117 continue;
1118 printf("Unused inode %d is marked as 'used' in the bitmap. ", i);
1119 if (ask("Clear", 1))
1120 unmark_inode(i);
1121 continue;
1122 }
1123 if (!inode_in_use(i)) {
1124 printf("Inode %d is used, but marked as 'unused' in the bitmap. ", i);
1125 if (ask("Set", 1))
1126 mark_inode(i);
1127 }
1128 if (Inode1[i].i_nlinks != inode_count[i]) {
1129 printf("Inode %d (mode=%07o), i_nlinks=%d, counted=%d. ",
1130 i, Inode1[i].i_mode, Inode1[i].i_nlinks,
1131 inode_count[i]);
1132 if (ask("Set i_nlinks to count", 1)) {
1133 Inode1[i].i_nlinks = inode_count[i];
1134 changed = 1;
1135 }
1136 }
1137 }
1138 for (i = FIRSTZONE; i < ZONES; i++) {
1139 if ((zone_in_use(i) != 0) == zone_count[i])
1140 continue;
1141 if (!zone_count[i]) {
1142 if (bad_zone(i))
1143 continue;
1144 printf("Zone %d is marked 'in use', but no file uses it. ", i);
1145 if (ask("Unmark", 1))
1146 unmark_zone(i);
1147 continue;
1148 }
1149 printf("Zone %d: %sin use, counted=%d\n",
1150 i, zone_in_use(i) ? "" : "not ", zone_count[i]);
1151 }
1152 }
1153
1154 #if ENABLE_FEATURE_MINIX2
check_counts2(void)1155 static void check_counts2(void)
1156 {
1157 int i;
1158
1159 for (i = 1; i <= INODES; i++) {
1160 if (OPT_warn_mode && Inode2[i].i_mode && !inode_in_use(i)) {
1161 printf("Inode %d has non-zero mode. ", i);
1162 if (ask("Clear", 1)) {
1163 Inode2[i].i_mode = 0;
1164 changed = 1;
1165 }
1166 }
1167 if (!inode_count[i]) {
1168 if (!inode_in_use(i))
1169 continue;
1170 printf("Unused inode %d is marked as 'used' in the bitmap. ", i);
1171 if (ask("Clear", 1))
1172 unmark_inode(i);
1173 continue;
1174 }
1175 if (!inode_in_use(i)) {
1176 printf("Inode %d is used, but marked as 'unused' in the bitmap. ", i);
1177 if (ask("Set", 1))
1178 mark_inode(i);
1179 }
1180 if (Inode2[i].i_nlinks != inode_count[i]) {
1181 printf("Inode %d (mode=%07o), i_nlinks=%d, counted=%d. ",
1182 i, Inode2[i].i_mode, Inode2[i].i_nlinks,
1183 inode_count[i]);
1184 if (ask("Set i_nlinks to count", 1)) {
1185 Inode2[i].i_nlinks = inode_count[i];
1186 changed = 1;
1187 }
1188 }
1189 }
1190 for (i = FIRSTZONE; i < ZONES; i++) {
1191 if ((zone_in_use(i) != 0) == zone_count[i])
1192 continue;
1193 if (!zone_count[i]) {
1194 if (bad_zone(i))
1195 continue;
1196 printf("Zone %d is marked 'in use', but no file uses it. ", i);
1197 if (ask("Unmark", 1))
1198 unmark_zone(i);
1199 continue;
1200 }
1201 printf("Zone %d: %sin use, counted=%d\n",
1202 i, zone_in_use(i) ? "" : "not ", zone_count[i]);
1203 }
1204 }
1205 #endif
1206
check(void)1207 static void check(void)
1208 {
1209 memset(inode_count, 0, (INODES + 1) * sizeof(*inode_count));
1210 memset(zone_count, 0, ZONES * sizeof(*zone_count));
1211 check_zones(MINIX_ROOT_INO);
1212 recursive_check(MINIX_ROOT_INO);
1213 check_counts();
1214 }
1215
1216 #if ENABLE_FEATURE_MINIX2
check2(void)1217 static void check2(void)
1218 {
1219 memset(inode_count, 0, (INODES + 1) * sizeof(*inode_count));
1220 memset(zone_count, 0, ZONES * sizeof(*zone_count));
1221 check_zones2(MINIX_ROOT_INO);
1222 recursive_check2(MINIX_ROOT_INO);
1223 check_counts2();
1224 }
1225 #else
1226 void check2(void);
1227 #endif
1228
1229 int fsck_minix_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
fsck_minix_main(int argc UNUSED_PARAM,char ** argv)1230 int fsck_minix_main(int argc UNUSED_PARAM, char **argv)
1231 {
1232 int retcode = 0;
1233
1234 xfunc_error_retval = 8;
1235
1236 INIT_G();
1237
1238 getopt32(argv, "^" OPTION_STR "\0" "=1:ar" /* one arg; -a assumes -r */);
1239 argv += optind;
1240 device_name = argv[0];
1241
1242 check_mount(); /* trying to check a mounted filesystem? */
1243 if (OPT_manual) {
1244 if (!isatty(0) || !isatty(1))
1245 die("need terminal for interactive repairs");
1246 }
1247 xmove_fd(xopen(device_name, OPT_repair ? O_RDWR : O_RDONLY), dev_fd);
1248
1249 /*sync(); paranoia? */
1250 read_superblock();
1251
1252 /*
1253 * Determine whether or not we should continue with the checking.
1254 * This is based on the status of the filesystem valid and error
1255 * flags and whether or not the -f switch was specified on the
1256 * command line.
1257 */
1258 printf("%s: %s\n", applet_name, bb_banner);
1259
1260 if (!(Super.s_state & MINIX_ERROR_FS)
1261 && (Super.s_state & MINIX_VALID_FS) && !OPT_force
1262 ) {
1263 if (OPT_repair)
1264 printf("%s is clean, check is skipped\n", device_name);
1265 return 0;
1266 } else if (OPT_force)
1267 printf("Forcing filesystem check on %s\n", device_name);
1268 else if (OPT_repair)
1269 printf("Filesystem on %s is dirty, needs checking\n",
1270 device_name);
1271
1272 read_tables();
1273
1274 if (OPT_manual) {
1275 set_termios_to_raw(STDIN_FILENO, &sv_termios, 0);
1276 termios_set = 1;
1277 }
1278
1279 if (version2) {
1280 check_root2();
1281 check2();
1282 } else {
1283 check_root();
1284 check();
1285 }
1286
1287 if (OPT_verbose) {
1288 int i, free_cnt;
1289
1290 for (i = 1, free_cnt = 0; i <= INODES; i++)
1291 if (!inode_in_use(i))
1292 free_cnt++;
1293 printf("\n%6u inodes used (%u%%)\n", (INODES - free_cnt),
1294 100 * (INODES - free_cnt) / INODES);
1295 for (i = FIRSTZONE, free_cnt = 0; i < ZONES; i++)
1296 if (!zone_in_use(i))
1297 free_cnt++;
1298 printf("%6u zones used (%u%%)\n\n"
1299 "%6u regular files\n"
1300 "%6u directories\n"
1301 "%6u character device files\n"
1302 "%6u block device files\n"
1303 "%6u links\n"
1304 "%6u symbolic links\n"
1305 "------\n"
1306 "%6u files\n",
1307 (ZONES - free_cnt), 100 * (ZONES - free_cnt) / ZONES,
1308 regular, directory, chardev, blockdev,
1309 links - 2 * directory + 1, symlinks,
1310 total - 2 * directory + 1);
1311 }
1312 if (changed) {
1313 write_tables();
1314 puts("FILE SYSTEM HAS BEEN CHANGED");
1315 sync();
1316 } else if (OPT_repair)
1317 write_superblock();
1318
1319 if (OPT_manual)
1320 tcsetattr_stdin_TCSANOW(&sv_termios);
1321
1322 if (changed)
1323 retcode += 3;
1324 if (errors_uncorrected)
1325 retcode += 4;
1326 return retcode;
1327 }
1328