1 /* $NetBSD: dkwedge_rdb.c,v 1.8 2021/02/20 09:51:20 rin Exp $ */ 2 3 /* 4 * Adapted from arch/amiga/amiga/disksubr.c: 5 * 6 * Copyright (c) 1982, 1986, 1988 Regents of the University of California. 7 * All rights reserved. 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 2. Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in the 16 * documentation and/or other materials provided with the distribution. 17 * 3. Neither the name of the University nor the names of its contributors 18 * may be used to endorse or promote products derived from this software 19 * without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 * 33 * @(#)ufs_disksubr.c 7.16 (Berkeley) 5/4/91 34 */ 35 36 /* 37 * Copyright (c) 1994 Christian E. Hopps 38 * 39 * Redistribution and use in source and binary forms, with or without 40 * modification, are permitted provided that the following conditions 41 * are met: 42 * 1. Redistributions of source code must retain the above copyright 43 * notice, this list of conditions and the following disclaimer. 44 * 2. Redistributions in binary form must reproduce the above copyright 45 * notice, this list of conditions and the following disclaimer in the 46 * documentation and/or other materials provided with the distribution. 47 * 3. All advertising materials mentioning features or use of this software 48 * must display the following acknowledgement: 49 * This product includes software developed by the University of 50 * California, Berkeley and its contributors. 51 * 4. Neither the name of the University nor the names of its contributors 52 * may be used to endorse or promote products derived from this software 53 * without specific prior written permission. 54 * 55 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 56 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 57 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 58 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 59 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 60 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 61 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 62 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 63 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 64 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 65 * SUCH DAMAGE. 66 * 67 * @(#)ufs_disksubr.c 7.16 (Berkeley) 5/4/91 68 */ 69 70 #include <sys/cdefs.h> 71 __KERNEL_RCSID(0, "$NetBSD: dkwedge_rdb.c,v 1.8 2021/02/20 09:51:20 rin Exp $"); 72 73 #include <sys/param.h> 74 #include <sys/buf.h> 75 #include <sys/disklabel_rdb.h> 76 #include <sys/disk.h> 77 #include <sys/endian.h> 78 #include <sys/systm.h> 79 80 /* 81 * In /usr/src/sys/dev/scsipi/sd.c, routine sdstart() adjusts the 82 * block numbers, it changes from DEV_BSIZE units to physical units: 83 * blkno = bp->b_blkno / (lp->d_secsize / DEV_BSIZE); 84 * As long as media with sector sizes of 512 bytes are used, this 85 * doesn't matter (divide by 1), but for successful usage of media with 86 * greater sector sizes (e.g. 640MB MO-media with 2048 bytes/sector) 87 * we must multiply block numbers with (lp->d_secsize / DEV_BSIZE) 88 * to keep "unchanged" physical block numbers. 89 */ 90 #define SD_C_ADJUSTS_NR 91 #ifdef SD_C_ADJUSTS_NR 92 #define ADJUST_NR(x) ((x) * (secsize / DEV_BSIZE)) 93 #else 94 #define ADJUST_NR(x) (x) 95 #endif 96 97 static unsigned rdbchksum(void *); 98 static unsigned char getarchtype(uint32_t); 99 static const char *archtype_to_ptype(uint8_t); 100 101 static int 102 dkwedge_discover_rdb(struct disk *pdk, struct vnode *vp) 103 { 104 struct dkwedge_info dkw; 105 struct partblock *pbp; 106 struct rdblock *rbp; 107 struct buf *bp; 108 int error; 109 uint32_t blk_per_cyl, bufsize, newsecsize, nextb, secsize, tabsize; 110 const char *ptype; 111 uint8_t archtype; 112 bool found, root, swap; 113 114 secsize = DEV_BSIZE << pdk->dk_blkshift; 115 bufsize = roundup(MAX(sizeof(struct partblock), sizeof(struct rdblock)), 116 secsize); 117 bp = geteblk(bufsize); 118 119 retry: 120 /* 121 * find the RDB block 122 * XXX bsdlabel should be detected by the other method 123 */ 124 for (nextb = 0; nextb < RDB_MAXBLOCKS; nextb++) { 125 error = dkwedge_read(pdk, vp, ADJUST_NR(nextb), bp->b_data, 126 bufsize); 127 if (error) { 128 aprint_error("%s: unable to read RDB @ %u, " 129 "error = %d\n", pdk->dk_name, nextb, error); 130 error = ESRCH; 131 goto done; 132 } 133 rbp = (struct rdblock *)bp->b_data; 134 if (be32toh(rbp->id) == RDBLOCK_ID) { 135 if (rdbchksum(rbp) == 0) 136 break; 137 else 138 aprint_error("%s: RDB bad checksum @ %u\n", 139 pdk->dk_name, nextb); 140 } 141 } 142 143 if (nextb == RDB_MAXBLOCKS) { 144 error = ESRCH; 145 goto done; 146 } 147 148 newsecsize = be32toh(rbp->nbytes); 149 if (secsize != newsecsize) { 150 aprint_verbose("secsize changed from %u to %u\n", 151 secsize, newsecsize); 152 secsize = newsecsize; 153 bufsize = roundup(MAX(sizeof(struct partblock), 154 sizeof(struct rdblock)), secsize); 155 brelse(bp, 0); 156 bp = geteblk(bufsize); 157 goto retry; 158 } 159 160 memset(&dkw, 0, sizeof(dkw)); 161 162 strlcpy(dkw.dkw_parent, pdk->dk_name, sizeof(dkw.dkw_parent)); 163 164 found = root = swap = false; 165 /* 166 * scan for partition blocks 167 */ 168 for (nextb = be32toh(rbp->partbhead); nextb != RDBNULL; 169 nextb = be32toh(pbp->next)) { 170 error = dkwedge_read(pdk, vp, ADJUST_NR(nextb), bp->b_data, 171 bufsize); 172 if (error) { 173 aprint_error("%s: unable to read RDB partition block @ " 174 "%u, error = %d\n", pdk->dk_name, nextb, error); 175 error = ESRCH; 176 goto done; 177 } 178 pbp = (struct partblock *)bp->b_data; 179 180 if (be32toh(pbp->id) != PARTBLOCK_ID) { 181 aprint_error( 182 "%s: RDB partition block @ %u bad id\n", 183 pdk->dk_name, nextb); 184 error = ESRCH; 185 goto done; 186 } 187 if (rdbchksum(pbp)) { 188 aprint_error( 189 "%s: RDB partition block @ %u bad checksum\n", 190 pdk->dk_name, nextb); 191 error = ESRCH; 192 goto done; 193 } 194 195 tabsize = be32toh(pbp->e.tabsize); 196 if (tabsize < 11) { 197 /* 198 * not enough info, too funky for us. 199 * I don't want to skip I want it fixed. 200 */ 201 aprint_error( 202 "%s: RDB partition block @ %u bad partition info " 203 "(environ < 11)\n", 204 pdk->dk_name, nextb); 205 error = ESRCH; 206 goto done; 207 } 208 209 /* 210 * XXXX should be ">" however some vendors don't know 211 * what a table size is so, we hack for them. 212 * the other checks can fail for all I care but this 213 * is a very common value. *sigh*. 214 */ 215 if (tabsize >= 16) 216 archtype = getarchtype(be32toh(pbp->e.dostype)); 217 else 218 archtype = ADT_UNKNOWN; 219 220 switch (archtype) { 221 case ADT_NETBSDROOT: 222 if (root) { 223 aprint_error("%s: more than one root RDB " 224 "partition, ignoring\n", pdk->dk_name); 225 continue; 226 } 227 root = true; 228 break; 229 case ADT_NETBSDSWAP: 230 if (swap) { 231 aprint_error("%s: more than one swap RDB " 232 "partition , ignoring\n", pdk->dk_name); 233 continue; 234 } 235 swap = true; 236 break; 237 default: 238 break; 239 } 240 241 if (pbp->partname[0] + 1 < sizeof(pbp->partname)) 242 pbp->partname[pbp->partname[0] + 1] = 0; 243 else 244 pbp->partname[sizeof(pbp->partname) - 1] = 0; 245 strlcpy(dkw.dkw_wname, pbp->partname + 1, 246 sizeof(dkw.dkw_wname)); 247 248 ptype = archtype_to_ptype(archtype); 249 strlcpy(dkw.dkw_ptype, ptype, sizeof(dkw.dkw_ptype)); 250 251 blk_per_cyl = 252 be32toh(pbp->e.secpertrk) * be32toh(pbp->e.numheads) 253 * ((be32toh(pbp->e.sizeblock) << 2) / secsize); 254 dkw.dkw_size = (uint64_t)(be32toh(pbp->e.highcyl) 255 - be32toh(pbp->e.lowcyl) + 1) * blk_per_cyl; 256 dkw.dkw_offset = (daddr_t)be32toh(pbp->e.lowcyl) * blk_per_cyl; 257 258 error = dkwedge_add(&dkw); 259 if (error == EEXIST) { 260 aprint_error( 261 "%s: wedge named '%s' already exists, ignoring\n", 262 pdk->dk_name, dkw.dkw_wname); 263 } else if (error) 264 aprint_error("%s: error %d adding partition %s\n", 265 pdk->dk_name, error, dkw.dkw_wname); 266 else 267 found = true; 268 } 269 270 if (found) 271 error = 0; 272 else 273 error = ESRCH; 274 done: 275 brelse(bp, 0); 276 return error; 277 } 278 279 static uint32_t 280 rdbchksum(void *bdata) 281 { 282 uint32_t *blp, cnt, val; 283 284 blp = bdata; 285 cnt = be32toh(blp[1]); 286 val = 0; 287 288 while (cnt--) 289 val += be32toh(*blp++); 290 return val; 291 } 292 293 static uint8_t 294 getarchtype(uint32_t dostype) 295 { 296 uint32_t t3, b1; 297 298 t3 = dostype & 0xffffff00; 299 b1 = dostype & 0x000000ff; 300 301 switch (t3) { 302 case DOST_NBR: 303 return ADT_NETBSDROOT; 304 case DOST_NBS: 305 return ADT_NETBSDSWAP; 306 case DOST_NBU: 307 return ADT_NETBSDUSER; 308 case DOST_MUFS: /* check for 'muFS'? */ 309 case DOST_DOS: 310 return ADT_AMIGADOS; 311 case DOST_AMIX: 312 return ADT_AMIX; 313 314 case DOST_XXXBSD: 315 #ifdef DIAGNOSTIC 316 aprint_verbose("deprecated dostype found: 0x%x\n", 317 dostype); 318 #endif 319 switch (b1) { 320 case 'R': 321 return ADT_NETBSDROOT; 322 case 'S': 323 return ADT_NETBSDSWAP; 324 default: 325 return ADT_NETBSDUSER; 326 } 327 328 case DOST_EXT2: 329 return ADT_EXT2; 330 case DOST_RAID: 331 return ADT_RAID; 332 default: 333 #ifdef DIAGNOSTIC 334 aprint_verbose("warning unknown dostype: 0x%x\n", 335 dostype); 336 #endif 337 return ADT_UNKNOWN; 338 } 339 } 340 341 static const char * 342 archtype_to_ptype(unsigned char archtype) 343 { 344 345 switch (archtype) { 346 case ADT_NETBSDROOT: 347 case ADT_NETBSDUSER: 348 return DKW_PTYPE_FFS; 349 case ADT_NETBSDSWAP: 350 return DKW_PTYPE_SWAP; 351 case ADT_AMIGADOS: 352 return DKW_PTYPE_AMIGADOS; 353 case ADT_EXT2: 354 return DKW_PTYPE_EXT2FS; 355 default: 356 return DKW_PTYPE_UNKNOWN; 357 } 358 } 359 360 #ifdef _KERNEL 361 DKWEDGE_DISCOVERY_METHOD_DECL(RDB, 15, dkwedge_discover_rdb); 362 #endif 363