/*
* partition.c - partition table support
*
+ * Copyright (C) 2013 Dinar Valeev
+ *
* Copyright (C) 2004 Sven Luther
*
* Copyright (C) 2001, 2002 Ethan Benson
#include "mac-part.h"
#include "fdisk-part.h"
#include "amiga-part.h"
+#include "gpt-part.h"
#include "partition.h"
#include "prom.h"
#include "string.h"
#include "linux/iso_fs.h"
#include "debug.h"
#include "errors.h"
+#include "bootinfo.h"
+#include "byteorder.h"
/* We currently don't check the partition type, some users
* are putting crap there and still expect it to work...
NULL
};
#endif
-
-/* Local functions */
-static unsigned long swab32(unsigned long value);
-#define MAX_BLOCK_SIZE 2048
-static unsigned char block_buffer[MAX_BLOCK_SIZE];
+#define MAX_BLOCK_SIZE 4096
+static unsigned char block_buffer[MAX_BLOCK_SIZE * 2];
static void
add_new_partition(struct partition_t** list, int part_number, const char *part_type,
- const char *part_name, unsigned long part_start, unsigned long part_size,
+ const char *part_name, unsigned long long part_start, unsigned long long part_size,
unsigned short part_blocksize, int sys_ind)
{
struct partition_t* part;
part = (struct partition_t*)malloc(sizeof(struct partition_t));
-
+
part->part_number = part_number;
strncpy(part->part_type, part_type, MAX_PART_NAME);
strncpy(part->part_name, part_name, MAX_PART_NAME);
struct mac_partition* part = (struct mac_partition *)block_buffer;
unsigned short ptable_block_size =
((struct mac_driver_desc *)block_buffer)->block_size;
-
+
map_size = 1;
for (block=1; block < map_size + 1; block++)
{
}
if (block == 1)
map_size = part->map_count;
-
+
#ifdef CHECK_FOR_VALID_MAC_PARTITION_TYPE
- /* We don't bother looking at swap partitions of any type,
+ /* We don't bother looking at swap partitions of any type,
* and the rest are the ones we know about */
for (ptype = valid_mac_partition_types; ptype; ptype++)
if (!strcmp (part->type, ptype))
}
}
-/*
+/*
* Same function as partition_mac_lookup(), except for fdisk
* partitioned disks.
*/
/* fdisk partition tables start at offset 0x1be
* from byte 0 of the boot drive.
*/
- struct fdisk_partition* part =
+ struct fdisk_partition* part =
(struct fdisk_partition *) (block_buffer + 0x1be);
for (partition=1; partition <= 4 ;partition++, part++) {
partition,
"Linux", /* type */
'\0', /* name */
- swab32(*(unsigned int *)(part->start4)),
- swab32(*(unsigned int *)(part->size4)),
+ le32_to_cpu(*(unsigned int *)part->start4),
+ le32_to_cpu(*(unsigned int *)part->size4),
512 /*blksize*/,
part->sys_ind /* partition type */ );
}
}
}
+/* GPT partition format */
+static int gpt_magic_present(unsigned char *block_buffer, unsigned int prom_blksize)
+{
+ struct gpt_header *header = (struct gpt_header *)(block_buffer + prom_blksize);
+ return cpu_to_le64(header->signature) == GPT_HEADER_SIGNATURE;
+}
+
+static inline int
+guid_cmp (gpt_part_type_t left, gpt_part_type_t right)
+{
+ return memcmp(&left, &right, sizeof (gpt_part_type_t));
+}
+
+static void partition_gpt_lookup(prom_handle disk, unsigned int prom_blksize,
+ struct partition_t **list)
+{
+ int partition;
+ struct gpt_header *header = (struct gpt_header *)(block_buffer + prom_blksize);
+
+ if (prom_readblocks(disk, cpu_to_le64(header->partitions), 1, block_buffer) != 1) {
+ prom_printf("Can't read GPT partition table %Lu\n", header->partitions);
+ return;
+ }
+ struct gpt_partition *part = (struct gpt_partition *)(block_buffer);
+
+ for (partition = 1; partition <= cpu_to_le32(header->maxpart); partition++, part++) {
+ if ((!guid_cmp(part->type, GPT_BASIC_DATA))||(!guid_cmp(part->type, GPT_LINUX_NATIVE))||(!guid_cmp(part->type, GPT_LINUX_RAID))) {
+ add_new_partition(list, partition, "Linux", 0, le64_to_cpu(part->start), \
+ cpu_to_le64(part->end) - cpu_to_le64(part->start) + 1, \
+ prom_blksize, 1);
+ }
+ }
+}
+
+
/* I don't know if it's possible to handle multisession and other multitrack
* stuffs with the current OF disklabel package. This can still be implemented
* with direct calls to atapi stuffs.
prom_printf("Can't read volume desc block %d\n", block);
break;
}
-
+
vdp = (struct iso_volume_descriptor *)block_buffer;
-
- /* Due to the overlapping physical location of the descriptors,
- * ISO CDs can match hdp->id==HS_STANDARD_ID as well. To ensure
+
+ /* Due to the overlapping physical location of the descriptors,
+ * ISO CDs can match hdp->id==HS_STANDARD_ID as well. To ensure
* proper identification in this case, we first check for ISO.
*/
if (strncmp (vdp->id, ISO_STANDARD_ID, sizeof vdp->id) == 0) {
return 1;
}
}
-
+
return 0;
}
-/*
+/*
* Detects and read amiga partition tables.
*/
if (prom_readblocks(disk, i, 1, block_buffer) != 1) {
prom_printf("Can't read boot block %d\n", i);
break;
- }
+ }
}
if ((amiga_block[AMIGA_ID] == AMIGA_ID_RDB) && (_amiga_checksum (prom_blksize) == 0))
return 1;
if (prom_readblocks(disk, 0, 1, block_buffer) != 1) {
prom_printf("Can't read boot blocks\n");
return 0; /* TODO: something bad happened, should fail more verbosely */
- }
+ }
return 0;
}
possible = amiga_block[AMIGA_RDBLIMIT]/32 +1;
used = (unsigned int *) malloc (sizeof (unsigned int) * (possible + 1));
+ if (!used) {
+ prom_printf("Can't allocate memory\n");
+ return;
+ }
for (i=0; i < possible; i++) used[i] = 0;
- for (part = amiga_block[AMIGA_PARTITIONS], partition = 0;
+ for (part = amiga_block[AMIGA_PARTITIONS], partition = 1;
part != AMIGA_END;
part = amiga_block[AMIGA_PART_NEXT], partition++)
{
if (prom_readblocks(disk, part, 1, block_buffer) != 1) {
prom_printf("Can't read partition block %d\n", part);
break;
- }
+ }
checksum = _amiga_checksum (prom_blksize);
if ((amiga_block[AMIGA_ID] == AMIGA_ID_PART) &&
(checksum == 0) &&
prom_blksize,
0 );
}
+ if (used)
+ free(used);
}
struct partition_t*
struct mac_driver_desc *desc = (struct mac_driver_desc *)block_buffer;
struct partition_t* list = NULL;
unsigned int prom_blksize, iso_root_block;
-
- strncpy(block_buffer, device, 2040);
- strcat(block_buffer, ":0");
-
+
+ strncpy((char *)block_buffer, device, 2040);
+ if (_machine != _MACH_bplan)
+ strcat((char *)block_buffer, ":0");
+
/* Open device */
- disk = prom_open(block_buffer);
+ disk = prom_open((char *)block_buffer);
if (disk == NULL) {
prom_printf("Can't open device <%s>\n", block_buffer);
goto bail;
prom_printf("block_size %d not supported !\n", prom_blksize);
goto bail;
}
-
- /* Read boot blocs */
- if (prom_readblocks(disk, 0, 1, block_buffer) != 1) {
+
+ /* Read boot blocks */
+ if (prom_readblocks(disk, 0, 2, block_buffer) != 1) {
prom_printf("Can't read boot blocks\n");
goto bail;
- }
+ }
if (desc->signature == MAC_DRIVER_MAGIC) {
/* pdisk partition format */
partition_mac_lookup(device, disk, prom_blksize, &list);
+ } else if (gpt_magic_present(block_buffer, prom_blksize)) {
+ /* gpt partition format */
+ partition_gpt_lookup(disk, prom_blksize, &list);
} else if ((block_buffer[510] == 0x55) && (block_buffer[511] == 0xaa)) {
/* fdisk partition format */
partition_fdisk_lookup(device, disk, prom_blksize, &list);
bail:
prom_close(disk);
-
+
return list;
}
struct partition_t* found;
char *type = NULL;
- if (prom_get_devtype(device) != FILE_DEVICE_BLOCK)
+ int device_kind = prom_get_devtype(device);
+ if (device_kind != FILE_DEVICE_BLOCK && device_kind != FILE_DEVICE_ISCSI)
return NULL;
parts = partitions_lookup(device);
return '\0';
for (p = parts; p && !found; p=p->next) {
- DEBUG_F("number: %02d, start: 0x%08lx, length: 0x%08lx, type: %s, name: %s\n",
+ DEBUG_F("number: %02d, start: 0x%08Lx, length: 0x%08Lx, type: %s, name: %s\n",
p->part_number, p->part_start, p->part_size, p->part_type, p->part_name);
if ((partition >= 0) && (partition == p->part_number)) {
type = strdup(p->part_type);
break;
- }
+ }
}
if (parts)
partitions_free(parts);
partitions_free(struct partition_t* list)
{
struct partition_t* next;
-
+
while(list) {
next = list->next;
free(list);
list = next;
}
}
-unsigned long
-swab32(unsigned long value)
-{
- __u32 result;
-
- __asm__("rlwimi %0,%1,24,16,23\n\t"
- "rlwimi %0,%1,8,8,15\n\t"
- "rlwimi %0,%1,24,0,7"
- : "=r" (result)
- : "r" (value), "0" (value >> 24));
- return result;
-}
-/*
+/*
* Local variables:
* c-file-style: "k&r"
* c-basic-offset: 5