disk/part_mac.c

   1 /*
   2  * (C) Copyright 2000
   3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   4  *
   5  * SPDX-License-Identifier:     GPL-2.0+
   6  */
   7
   8 /*
   9  * Support for harddisk partitions.
  10  *
  11  * To be compatible with LinuxPPC and Apple we use the standard Apple
  12  * SCSI disk partitioning scheme. For more information see:
  13  * http://developer.apple.com/techpubs/mac/Devices/Devices-126.html#MARKER-14-92
  14  */
  15
  16 #include <common.h>
  17 #include <command.h>
  18 #include <ide.h>
  19 #include "part_mac.h"
  20
  21 #ifdef HAVE_BLOCK_DEVICE
  22
  23 /* stdlib.h causes some compatibility problems; should fixe these! -- wd */
  24 #ifndef __ldiv_t_defined
  25 typedef struct {
  26         long int quot;          /* Quotient     */
  27         long int rem;           /* Remainder    */
  28 } ldiv_t;
  29 extern ldiv_t ldiv (long int __numer, long int __denom);
  30 # define __ldiv_t_defined       1
  31 #endif
  32
  33
  34 static int part_mac_read_ddb (block_dev_desc_t *dev_desc, mac_driver_desc_t *ddb_p);
  35 static int part_mac_read_pdb (block_dev_desc_t *dev_desc, int part, mac_partition_t *pdb_p);
  36
  37 /*
  38  * Test for a valid MAC partition
  39  */
  40 int test_part_mac (block_dev_desc_t *dev_desc)
  41 {
  42         ALLOC_CACHE_ALIGN_BUFFER(mac_driver_desc_t, ddesc, 1);
  43         ALLOC_CACHE_ALIGN_BUFFER(mac_partition_t, mpart, 1);
  44         ulong i, n;
  45
  46         if (part_mac_read_ddb (dev_desc, ddesc)) {
  47                 /* error reading Driver Desriptor Block, or no valid Signature */
  48                 return (-1);
  49         }
  50
  51         n = 1;  /* assuming at least one partition */
  52         for (i=1; i<=n; ++i) {
  53                 if ((dev_desc->block_read(dev_desc->dev, i, 1, (ulong *)mpart) != 1) ||
  54                     (mpart->signature != MAC_PARTITION_MAGIC) ) {
  55                         return (-1);
  56                 }
  57                 /* update partition count */
  58                 n = mpart->map_count;
  59         }
  60         return (0);
  61 }
  62
  63
  64 void print_part_mac (block_dev_desc_t *dev_desc)
  65 {
  66         ulong i, n;
  67         ALLOC_CACHE_ALIGN_BUFFER(mac_driver_desc_t, ddesc, 1);
  68         ALLOC_CACHE_ALIGN_BUFFER(mac_partition_t, mpart, 1);
  69         ldiv_t mb, gb;
  70
  71         if (part_mac_read_ddb (dev_desc, ddesc)) {
  72                 /* error reading Driver Desriptor Block, or no valid Signature */
  73                 return;
  74         }
  75
  76         n  = ddesc->blk_count;
  77
  78         mb = ldiv(n, ((1024 * 1024) / ddesc->blk_size)); /* MB */
  79         /* round to 1 digit */
  80         mb.rem *= 10 * ddesc->blk_size;
  81         mb.rem += 512 * 1024;
  82         mb.rem /= 1024 * 1024;
  83
  84         gb = ldiv(10 * mb.quot + mb.rem, 10240);
  85         gb.rem += 512;
  86         gb.rem /= 1024;
  87
  88
  89         printf ("Block Size=%d, Number of Blocks=%d, "
  90                 "Total Capacity: %ld.%ld MB = %ld.%ld GB\n"
  91                 "DeviceType=0x%x, DeviceId=0x%x\n\n"
  92                 "   #:                 type name"
  93                 "                   length   base       (size)\n",
  94                 ddesc->blk_size,
  95                 ddesc->blk_count,
  96                 mb.quot, mb.rem, gb.quot, gb.rem,
  97                 ddesc->dev_type, ddesc->dev_id
  98                 );
  99
 100         n = 1;  /* assuming at least one partition */
 101         for (i=1; i<=n; ++i) {
 102                 ulong bytes;
 103                 char c;
 104
 105                 printf ("%4ld: ", i);
 106                 if (dev_desc->block_read (dev_desc->dev, i, 1, (ulong *)mpart) != 1) {
 107                         printf ("** Can't read Partition Map on %d:%ld **\n",
 108                                 dev_desc->dev, i);
 109                         return;
 110                 }
 111
 112                 if (mpart->signature != MAC_PARTITION_MAGIC) {
 113                         printf ("** Bad Signature on %d:%ld - "
 114                                 "expected 0x%04x, got 0x%04x\n",
 115                                 dev_desc->dev, i, MAC_PARTITION_MAGIC, mpart->signature);
 116                         return;
 117                 }
 118
 119                 /* update partition count */
 120                 n = mpart->map_count;
 121
 122                 c      = 'k';
 123                 bytes  = mpart->block_count;
 124                 bytes /= (1024 / ddesc->blk_size);  /* kB; assumes blk_size == 512 */
 125                 if (bytes >= 1024) {
 126                         bytes >>= 10;
 127                         c = 'M';
 128                 }
 129                 if (bytes >= 1024) {
 130                         bytes >>= 10;
 131                         c = 'G';
 132                 }
 133
 134                 printf ("%20.32s %-18.32s %10u @ %-10u (%3ld%c)\n",
 135                         mpart->type,
 136                         mpart->name,
 137                         mpart->block_count,
 138                         mpart->start_block,
 139                         bytes, c
 140                         );
 141         }
 142
 143         return;
 144 }
 145
 146
 147 /*
 148  * Read Device Descriptor Block
 149  */
 150 static int part_mac_read_ddb (block_dev_desc_t *dev_desc, mac_driver_desc_t *ddb_p)
 151 {
 152         if (dev_desc->block_read(dev_desc->dev, 0, 1, (ulong *)ddb_p) != 1) {
 153                 printf ("** Can't read Driver Desriptor Block **\n");
 154                 return (-1);
 155         }
 156
 157         if (ddb_p->signature != MAC_DRIVER_MAGIC) {
 158 #if 0
 159                 printf ("** Bad Signature: expected 0x%04x, got 0x%04x\n",
 160                         MAC_DRIVER_MAGIC, ddb_p->signature);
 161 #endif
 162                 return (-1);
 163         }
 164         return (0);
 165 }
 166
 167 /*
 168  * Read Partition Descriptor Block
 169  */
 170 static int part_mac_read_pdb (block_dev_desc_t *dev_desc, int part, mac_partition_t *pdb_p)
 171 {
 172         int n = 1;
 173
 174         for (;;) {
 175                 /*
 176                  * We must always read the descritpor block for
 177                  * partition 1 first since this is the only way to
 178                  * know how many partitions we have.
 179                  */
 180                 if (dev_desc->block_read (dev_desc->dev, n, 1, (ulong *)pdb_p) != 1) {
 181                         printf ("** Can't read Partition Map on %d:%d **\n",
 182                                 dev_desc->dev, n);
 183                         return (-1);
 184                 }
 185
 186                 if (pdb_p->signature != MAC_PARTITION_MAGIC) {
 187                         printf ("** Bad Signature on %d:%d: "
 188                                 "expected 0x%04x, got 0x%04x\n",
 189                                 dev_desc->dev, n, MAC_PARTITION_MAGIC, pdb_p->signature);
 190                         return (-1);
 191                 }
 192
 193                 if (n == part)
 194                         return (0);
 195
 196                 if ((part < 1) || (part > pdb_p->map_count)) {
 197                         printf ("** Invalid partition %d:%d [%d:1...%d:%d only]\n",
 198                                 dev_desc->dev, part,
 199                                 dev_desc->dev,
 200                                 dev_desc->dev, pdb_p->map_count);
 201                         return (-1);
 202                 }
 203
 204                 /* update partition count */
 205                 n = part;
 206         }
 207
 208         /* NOTREACHED */
 209 }
 210
 211 int get_partition_info_mac (block_dev_desc_t *dev_desc, int part, disk_partition_t *info)
 212 {
 213         ALLOC_CACHE_ALIGN_BUFFER(mac_driver_desc_t, ddesc, 1);
 214         ALLOC_CACHE_ALIGN_BUFFER(mac_partition_t, mpart, 1);
 215
 216         if (part_mac_read_ddb (dev_desc, ddesc)) {
 217                 return (-1);
 218         }
 219
 220         info->blksz = ddesc->blk_size;
 221
 222         if (part_mac_read_pdb (dev_desc, part, mpart)) {
 223                 return (-1);
 224         }
 225
 226         info->start = mpart->start_block;
 227         info->size  = mpart->block_count;
 228         memcpy (info->type, mpart->type, sizeof(info->type));
 229         memcpy (info->name, mpart->name, sizeof(info->name));
 230
 231         return (0);
 232 }
 233
 234 #endif