1 /* 2 * (C) Copyright 2001 3 * Wolfgang Denk, DENX Software Engineering, wd@denx.de. 4 * 5 * See file CREDITS for list of people who contributed to this 6 * project. 7 * 8 * This program is free software; you can redistribute it and/or 9 * modify it under the terms of the GNU General Public License as 10 * published by the Free Software Foundation; either version 2 of 11 * the License, or (at your option) any later version. 12 * 13 * This program is distributed in the hope that it will be useful, 14 * but WITHOUT ANY WARRANTY; without even the implied warranty of 15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 16 * GNU General Public License for more details. 17 * 18 * You should have received a copy of the GNU General Public License 19 * along with this program; if not, write to the Free Software 20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, 21 * MA 02111-1307 USA 22 */ 23 24 #include <common.h> 25 #include <command.h> 26 #include <ide.h> 27 #include <part.h> 28 29 #undef PART_DEBUG 30 31 #ifdef PART_DEBUG 32 #define PRINTF(fmt,args...) printf (fmt ,##args) 33 #else 34 #define PRINTF(fmt,args...) 35 #endif 36 37 #if (defined(CONFIG_CMD_IDE) || \ 38 defined(CONFIG_CMD_SATA) || \ 39 defined(CONFIG_CMD_SCSI) || \ 40 defined(CONFIG_CMD_USB) || \ 41 defined(CONFIG_MMC) || \ 42 defined(CONFIG_SYSTEMACE) ) 43 44 struct block_drvr { 45 char *name; 46 block_dev_desc_t* (*get_dev)(int dev); 47 }; 48 49 static const struct block_drvr block_drvr[] = { 50 #if defined(CONFIG_CMD_IDE) 51 { .name = "ide", .get_dev = ide_get_dev, }, 52 #endif 53 #if defined(CONFIG_CMD_SATA) 54 {.name = "sata", .get_dev = sata_get_dev, }, 55 #endif 56 #if defined(CONFIG_CMD_SCSI) 57 { .name = "scsi", .get_dev = scsi_get_dev, }, 58 #endif 59 #if defined(CONFIG_CMD_USB) && defined(CONFIG_USB_STORAGE) 60 { .name = "usb", .get_dev = usb_stor_get_dev, }, 61 #endif 62 #if defined(CONFIG_MMC) 63 { .name = "mmc", .get_dev = mmc_get_dev, }, 64 #endif 65 #if defined(CONFIG_SYSTEMACE) 66 { .name = "ace", .get_dev = systemace_get_dev, }, 67 #endif 68 { }, 69 }; 70 71 DECLARE_GLOBAL_DATA_PTR; 72 73 block_dev_desc_t *get_dev(const char *ifname, int dev) 74 { 75 const struct block_drvr *drvr = block_drvr; 76 block_dev_desc_t* (*reloc_get_dev)(int dev); 77 char *name; 78 79 if (!ifname) 80 return NULL; 81 82 name = drvr->name; 83 #ifdef CONFIG_NEEDS_MANUAL_RELOC 84 name += gd->reloc_off; 85 #endif 86 while (drvr->name) { 87 name = drvr->name; 88 reloc_get_dev = drvr->get_dev; 89 #ifdef CONFIG_NEEDS_MANUAL_RELOC 90 name += gd->reloc_off; 91 reloc_get_dev += gd->reloc_off; 92 #endif 93 if (strncmp(ifname, name, strlen(name)) == 0) 94 return reloc_get_dev(dev); 95 drvr++; 96 } 97 return NULL; 98 } 99 #else 100 block_dev_desc_t *get_dev(const char *ifname, int dev) 101 { 102 return NULL; 103 } 104 #endif 105 106 #if (defined(CONFIG_CMD_IDE) || \ 107 defined(CONFIG_CMD_SATA) || \ 108 defined(CONFIG_CMD_SCSI) || \ 109 defined(CONFIG_CMD_USB) || \ 110 defined(CONFIG_MMC) || \ 111 defined(CONFIG_SYSTEMACE) ) 112 113 /* ------------------------------------------------------------------------- */ 114 /* 115 * reports device info to the user 116 */ 117 118 #ifdef CONFIG_LBA48 119 typedef uint64_t lba512_t; 120 #else 121 typedef lbaint_t lba512_t; 122 #endif 123 124 /* 125 * Overflowless variant of (block_count * mul_by / div_by) 126 * when div_by > mul_by 127 */ 128 static lba512_t lba512_muldiv (lba512_t block_count, lba512_t mul_by, lba512_t div_by) 129 { 130 lba512_t bc_quot, bc_rem; 131 132 /* x * m / d == x / d * m + (x % d) * m / d */ 133 bc_quot = block_count / div_by; 134 bc_rem = block_count - div_by * bc_quot; 135 return bc_quot * mul_by + (bc_rem * mul_by) / div_by; 136 } 137 138 void dev_print (block_dev_desc_t *dev_desc) 139 { 140 lba512_t lba512; /* number of blocks if 512bytes block size */ 141 142 if (dev_desc->type == DEV_TYPE_UNKNOWN) { 143 puts ("not available\n"); 144 return; 145 } 146 147 switch (dev_desc->if_type) { 148 case IF_TYPE_SCSI: 149 printf ("(%d:%d) Vendor: %s Prod.: %s Rev: %s\n", 150 dev_desc->target,dev_desc->lun, 151 dev_desc->vendor, 152 dev_desc->product, 153 dev_desc->revision); 154 break; 155 case IF_TYPE_ATAPI: 156 case IF_TYPE_IDE: 157 case IF_TYPE_SATA: 158 printf ("Model: %s Firm: %s Ser#: %s\n", 159 dev_desc->vendor, 160 dev_desc->revision, 161 dev_desc->product); 162 break; 163 case IF_TYPE_SD: 164 case IF_TYPE_MMC: 165 case IF_TYPE_USB: 166 printf ("Vendor: %s Rev: %s Prod: %s\n", 167 dev_desc->vendor, 168 dev_desc->revision, 169 dev_desc->product); 170 break; 171 case IF_TYPE_DOC: 172 puts("device type DOC\n"); 173 return; 174 case IF_TYPE_UNKNOWN: 175 puts("device type unknown\n"); 176 return; 177 default: 178 printf("Unhandled device type: %i\n", dev_desc->if_type); 179 return; 180 } 181 puts (" Type: "); 182 if (dev_desc->removable) 183 puts ("Removable "); 184 switch (dev_desc->type & 0x1F) { 185 case DEV_TYPE_HARDDISK: 186 puts ("Hard Disk"); 187 break; 188 case DEV_TYPE_CDROM: 189 puts ("CD ROM"); 190 break; 191 case DEV_TYPE_OPDISK: 192 puts ("Optical Device"); 193 break; 194 case DEV_TYPE_TAPE: 195 puts ("Tape"); 196 break; 197 default: 198 printf ("# %02X #", dev_desc->type & 0x1F); 199 break; 200 } 201 puts ("\n"); 202 if ((dev_desc->lba * dev_desc->blksz)>0L) { 203 ulong mb, mb_quot, mb_rem, gb, gb_quot, gb_rem; 204 lbaint_t lba; 205 206 lba = dev_desc->lba; 207 208 lba512 = (lba * (dev_desc->blksz/512)); 209 /* round to 1 digit */ 210 mb = lba512_muldiv(lba512, 10, 2048); /* 2048 = (1024 * 1024) / 512 MB */ 211 212 mb_quot = mb / 10; 213 mb_rem = mb - (10 * mb_quot); 214 215 gb = mb / 1024; 216 gb_quot = gb / 10; 217 gb_rem = gb - (10 * gb_quot); 218 #ifdef CONFIG_LBA48 219 if (dev_desc->lba48) 220 printf (" Supports 48-bit addressing\n"); 221 #endif 222 #if defined(CONFIG_SYS_64BIT_LBA) 223 printf (" Capacity: %ld.%ld MB = %ld.%ld GB (%Ld x %ld)\n", 224 mb_quot, mb_rem, 225 gb_quot, gb_rem, 226 lba, 227 dev_desc->blksz); 228 #else 229 printf (" Capacity: %ld.%ld MB = %ld.%ld GB (%ld x %ld)\n", 230 mb_quot, mb_rem, 231 gb_quot, gb_rem, 232 (ulong)lba, 233 dev_desc->blksz); 234 #endif 235 } else { 236 puts (" Capacity: not available\n"); 237 } 238 } 239 #endif 240 241 #if (defined(CONFIG_CMD_IDE) || \ 242 defined(CONFIG_CMD_SATA) || \ 243 defined(CONFIG_CMD_SCSI) || \ 244 defined(CONFIG_CMD_USB) || \ 245 defined(CONFIG_MMC) || \ 246 defined(CONFIG_SYSTEMACE) ) 247 248 #if defined(CONFIG_MAC_PARTITION) || \ 249 defined(CONFIG_DOS_PARTITION) || \ 250 defined(CONFIG_ISO_PARTITION) || \ 251 defined(CONFIG_AMIGA_PARTITION) || \ 252 defined(CONFIG_EFI_PARTITION) 253 254 void init_part (block_dev_desc_t * dev_desc) 255 { 256 #ifdef CONFIG_ISO_PARTITION 257 if (test_part_iso(dev_desc) == 0) { 258 dev_desc->part_type = PART_TYPE_ISO; 259 return; 260 } 261 #endif 262 263 #ifdef CONFIG_MAC_PARTITION 264 if (test_part_mac(dev_desc) == 0) { 265 dev_desc->part_type = PART_TYPE_MAC; 266 return; 267 } 268 #endif 269 270 /* must be placed before DOS partition detection */ 271 #ifdef CONFIG_EFI_PARTITION 272 if (test_part_efi(dev_desc) == 0) { 273 dev_desc->part_type = PART_TYPE_EFI; 274 return; 275 } 276 #endif 277 278 #ifdef CONFIG_DOS_PARTITION 279 if (test_part_dos(dev_desc) == 0) { 280 dev_desc->part_type = PART_TYPE_DOS; 281 return; 282 } 283 #endif 284 285 #ifdef CONFIG_AMIGA_PARTITION 286 if (test_part_amiga(dev_desc) == 0) { 287 dev_desc->part_type = PART_TYPE_AMIGA; 288 return; 289 } 290 #endif 291 dev_desc->part_type = PART_TYPE_UNKNOWN; 292 } 293 294 295 static void print_part_header (const char *type, block_dev_desc_t * dev_desc) 296 { 297 puts ("\nPartition Map for "); 298 switch (dev_desc->if_type) { 299 case IF_TYPE_IDE: 300 puts ("IDE"); 301 break; 302 case IF_TYPE_SATA: 303 puts ("SATA"); 304 break; 305 case IF_TYPE_SCSI: 306 puts ("SCSI"); 307 break; 308 case IF_TYPE_ATAPI: 309 puts ("ATAPI"); 310 break; 311 case IF_TYPE_USB: 312 puts ("USB"); 313 break; 314 case IF_TYPE_DOC: 315 puts ("DOC"); 316 break; 317 case IF_TYPE_MMC: 318 puts ("MMC"); 319 break; 320 default: 321 puts ("UNKNOWN"); 322 break; 323 } 324 printf (" device %d -- Partition Type: %s\n\n", 325 dev_desc->dev, type); 326 } 327 328 void print_part (block_dev_desc_t * dev_desc) 329 { 330 331 switch (dev_desc->part_type) { 332 #ifdef CONFIG_MAC_PARTITION 333 case PART_TYPE_MAC: 334 PRINTF ("## Testing for valid MAC partition ##\n"); 335 print_part_header ("MAC", dev_desc); 336 print_part_mac (dev_desc); 337 return; 338 #endif 339 #ifdef CONFIG_DOS_PARTITION 340 case PART_TYPE_DOS: 341 PRINTF ("## Testing for valid DOS partition ##\n"); 342 print_part_header ("DOS", dev_desc); 343 print_part_dos (dev_desc); 344 return; 345 #endif 346 347 #ifdef CONFIG_ISO_PARTITION 348 case PART_TYPE_ISO: 349 PRINTF ("## Testing for valid ISO Boot partition ##\n"); 350 print_part_header ("ISO", dev_desc); 351 print_part_iso (dev_desc); 352 return; 353 #endif 354 355 #ifdef CONFIG_AMIGA_PARTITION 356 case PART_TYPE_AMIGA: 357 PRINTF ("## Testing for a valid Amiga partition ##\n"); 358 print_part_header ("AMIGA", dev_desc); 359 print_part_amiga (dev_desc); 360 return; 361 #endif 362 363 #ifdef CONFIG_EFI_PARTITION 364 case PART_TYPE_EFI: 365 PRINTF ("## Testing for valid EFI partition ##\n"); 366 print_part_header ("EFI", dev_desc); 367 print_part_efi (dev_desc); 368 return; 369 #endif 370 } 371 puts ("## Unknown partition table\n"); 372 } 373 374 375 #else /* neither MAC nor DOS nor ISO nor AMIGA nor EFI partition configured */ 376 # error neither CONFIG_MAC_PARTITION nor CONFIG_DOS_PARTITION 377 # error nor CONFIG_ISO_PARTITION nor CONFIG_AMIGA_PARTITION 378 # error nor CONFIG_EFI_PARTITION configured! 379 #endif 380 381 #endif 382 383 int get_partition_info(block_dev_desc_t *dev_desc, int part 384 , disk_partition_t *info) 385 { 386 #if defined(CONFIG_CMD_IDE) || \ 387 defined(CONFIG_CMD_SATA) || \ 388 defined(CONFIG_CMD_SCSI) || \ 389 defined(CONFIG_CMD_USB) || \ 390 defined(CONFIG_MMC) || \ 391 defined(CONFIG_SYSTEMACE) 392 393 switch (dev_desc->part_type) { 394 #ifdef CONFIG_MAC_PARTITION 395 case PART_TYPE_MAC: 396 if (get_partition_info_mac(dev_desc, part, info) == 0) { 397 PRINTF("## Valid MAC partition found ##\n"); 398 return 0; 399 } 400 break; 401 #endif 402 403 #ifdef CONFIG_DOS_PARTITION 404 case PART_TYPE_DOS: 405 if (get_partition_info_dos(dev_desc, part, info) == 0) { 406 PRINTF("## Valid DOS partition found ##\n"); 407 return 0; 408 } 409 break; 410 #endif 411 412 #ifdef CONFIG_ISO_PARTITION 413 case PART_TYPE_ISO: 414 if (get_partition_info_iso(dev_desc, part, info) == 0) { 415 PRINTF("## Valid ISO boot partition found ##\n"); 416 return 0; 417 } 418 break; 419 #endif 420 421 #ifdef CONFIG_AMIGA_PARTITION 422 case PART_TYPE_AMIGA: 423 if (get_partition_info_amiga(dev_desc, part, info) == 0) { 424 PRINTF("## Valid Amiga partition found ##\n"); 425 return 0; 426 } 427 break; 428 #endif 429 430 #ifdef CONFIG_EFI_PARTITION 431 case PART_TYPE_EFI: 432 if (get_partition_info_efi(dev_desc, part, info) == 0) { 433 PRINTF("## Valid EFI partition found ##\n"); 434 return 0; 435 } 436 break; 437 #endif 438 default: 439 break; 440 } 441 #endif 442 443 return -1; 444 } 445 446 int get_device_and_partition(const char *ifname, const char *dev_str, 447 block_dev_desc_t **dev_desc, 448 disk_partition_t *info) 449 { 450 int ret; 451 char *ep; 452 int dev; 453 block_dev_desc_t *desc; 454 int part = 0; 455 char *part_str; 456 457 if (dev_str) 458 dev = simple_strtoul(dev_str, &ep, 16); 459 460 if (!dev_str || (dev_str == ep)) { 461 dev_str = getenv("bootdevice"); 462 if (dev_str) 463 dev = simple_strtoul(dev_str, &ep, 16); 464 if (!dev_str || (dev_str == ep)) 465 goto err; 466 } 467 468 desc = get_dev(ifname, dev); 469 if (!desc || (desc->type == DEV_TYPE_UNKNOWN)) 470 goto err; 471 472 if (desc->part_type == PART_TYPE_UNKNOWN) { 473 /* disk doesn't use partition table */ 474 if (!desc->lba) { 475 printf("**Bad disk size - %s %d:0 **\n", ifname, dev); 476 return -1; 477 } 478 info->start = 0; 479 info->size = desc->lba; 480 info->blksz = desc->blksz; 481 482 *dev_desc = desc; 483 return 0; 484 } 485 486 part_str = strchr(dev_str, ':'); 487 if (part_str) 488 part = (int)simple_strtoul(++part_str, NULL, 16); 489 490 ret = get_partition_info(desc, part, info); 491 if (ret) { 492 printf("** Invalid partition %d, use `dev[:part]' **\n", part); 493 return -1; 494 } 495 if (strncmp((char *)info->type, BOOT_PART_TYPE, sizeof(info->type)) != 0) { 496 printf("** Invalid partition type \"%.32s\"" 497 " (expect \"" BOOT_PART_TYPE "\")\n", 498 info->type); 499 return -1; 500 } 501 502 *dev_desc = desc; 503 return part; 504 505 err: 506 puts("** Invalid boot device, use `dev[:part]' **\n"); 507 return -1; 508 } 509