xref: /netbsd-src/sys/arch/hppa/stand/xxboot/readufs_ffs.c (revision d16b7486a53dcb8072b60ec6fcb4373a2d0c27b7)
1 /*	$NetBSD: readufs_ffs.c,v 1.2 2022/11/17 06:40:39 chs Exp $	*/
2 /*	from Id: readufs_ffs.c,v 1.8 2004/06/12 04:26:39 itohy Exp	*/
3 
4 /*
5  * FS specific support for 4.2BSD Fast Filesystem
6  *
7  * Written in 1999, 2002, 2003 by ITOH Yasufumi.
8  * Public domain.
9  *
10  * Intended to be used for boot programs (first stage).
11  * DON'T ADD ANY FANCY FEATURE.  THIS SHALL BE COMPACT.
12  */
13 
14 #include "readufs.h"
15 
16 #include <ufs/ffs/fs.h>
17 
18 #define fsi	(*ufsinfo)
19 #define fsi_ffs	fsi.fs_u.u_ffs
20 
21 /*
22  * Read and check superblock.
23  * If it is an FFS, save information from the superblock.
24  */
25 int
26 try_ffs(void)
27 {
28 	union {
29 		struct fs	sblk;
30 		unsigned char	pad[SBLOCKSIZE];
31 	} buf;
32 	struct ufs_info *ufsinfo = &ufs_info;
33 	static int sblocs[] = SBLOCKSEARCH;
34 	int *sbl;
35 	int magic;
36 
37 #ifdef DEBUG_WITH_STDIO
38 	printf("trying FFS\n");
39 #endif
40 	/* read FFS superblock */
41 	for (sbl = sblocs; ; sbl++) {
42 		if (*sbl == -1)
43 			return 1;
44 
45 		RAW_READ(&buf, (daddr_t) btodb(*sbl), SBLOCKSIZE);
46 
47 		magic = buf.sblk.fs_magic;
48 #ifdef DEBUG_WITH_STDIO
49 		printf("FFS: sblk: pos %d magic 0x%x\n", btodb(*sbl), magic);
50 #endif
51 #ifdef USE_UFS1
52 		if (magic == FS_UFS1_MAGIC
53 		    && !(buf.sblk.fs_old_flags & FS_FLAGS_UPDATED)) {
54 			if (*sbl == SBLOCK_UFS2)
55 				/* might be an alternate suberblock */
56 				continue;
57 			break;
58 		}
59 #endif
60 		if (*sbl != buf.sblk.fs_sblockloc)
61 			/* must be an alternate suberblock */
62 			continue;
63 
64 #ifdef USE_UFS1
65 		if (magic == FS_UFS1_MAGIC)
66 			break;
67 #endif
68 #ifdef USE_UFS2
69 		if (magic == FS_UFS2_MAGIC || magic == FS_UFS2EA_MAGIC) {
70 #ifdef USE_UFS1
71 			fsi.ufstype = UFSTYPE_UFS2;
72 #endif
73 			break;
74 		}
75 #endif
76 	}
77 
78 	/*
79 	 * XXX <ufs/ffs/fs.h> always uses fs_magic
80 	 * (UFS1 only or UFS2 only is impossible)
81 	 */
82 	fsi_ffs.magic = magic;
83 #ifdef DEBUG_WITH_STDIO
84 	printf("FFS: detected UFS%d format\n",
85 	       (magic == FS_UFS2_MAGIC || magic == FS_UFS2EA_MAGIC) + 1);
86 #endif
87 
88 	/* This partition looks like an FFS. */
89 	fsi.fstype = UFSTYPE_FFS;
90 #if 0
91 	fsi.get_inode = get_ffs_inode;
92 #endif
93 
94 	/* Get information from the superblock. */
95 	fsi.bsize = buf.sblk.fs_bsize;
96 	fsi.fsbtodb = buf.sblk.fs_fsbtodb;
97 	fsi.nindir = buf.sblk.fs_nindir;
98 
99 	fsi_ffs.iblkno = buf.sblk.fs_iblkno;
100 	fsi_ffs.old_cgoffset = buf.sblk.fs_old_cgoffset;
101 	fsi_ffs.old_cgmask = buf.sblk.fs_old_cgmask;
102 	fsi_ffs.fragshift = buf.sblk.fs_fragshift;
103 	fsi_ffs.inopb = buf.sblk.fs_inopb;
104 	fsi_ffs.ipg = buf.sblk.fs_ipg;
105 	fsi_ffs.fpg = buf.sblk.fs_fpg;
106 
107 	return 0;
108 }
109 
110 /* for inode macros */
111 #define fs_ipg		fs_u.u_ffs.ipg
112 #define fs_iblkno	fs_u.u_ffs.iblkno
113 #define fs_old_cgoffset	fs_u.u_ffs.old_cgoffset
114 #define fs_old_cgmask	fs_u.u_ffs.old_cgmask
115 #define fs_fpg		fs_u.u_ffs.fpg
116 #define fs_magic	fs_u.u_ffs.magic
117 #define fs_inopb	fs_u.u_ffs.inopb
118 #define fs_fragshift	fs_u.u_ffs.fragshift
119 #define fs_fsbtodb	fsbtodb
120 
121 /*
122  * Get inode from disk.
123  */
124 int
125 get_ffs_inode(ino32_t ino, union ufs_dinode *dibuf)
126 {
127 	struct ufs_info *ufsinfo = &ufs_info;
128 	union ufs_dinode *buf = alloca((size_t) fsi.bsize);
129 	union ufs_dinode *di;
130 	unsigned ioff;
131 
132 	RAW_READ(buf, FFS_FSBTODB(&fsi, ino_to_fsba(&fsi, ino)),
133 			(size_t) fsi.bsize);
134 
135 	ioff = ino_to_fsbo(&fsi, ino);
136 
137 #if defined(USE_UFS1) && defined(USE_UFS2)
138 	if (ufsinfo->ufstype == UFSTYPE_UFS1)
139 		di = (void *) &(&buf->di1)[ioff];
140 	else {
141 		di = (void *) &(&buf->di2)[ioff];
142 
143 		/* XXX for DI_SIZE() macro */
144 		di->di1.di_size = di->di2.di_size;
145 	}
146 #else
147 	di = &buf[ioff];
148 #endif
149 
150 #ifdef DEBUG_WITH_STDIO
151 	printf("FFS: dinode(%d): mode 0%o, nlink %d, size %u\n",
152 		ino, di->di_common.di_mode, di->di_common.di_nlink,
153 		(unsigned) DI_SIZE(di));
154 #endif
155 
156 	if (di->di_common.di_mode == 0)
157 		return 1;	/* unused inode (file is not found) */
158 
159 	*dibuf = *di;
160 
161 	return 0;
162 }
163