libparted/labels/mac.c

   1 /*
   2     libparted - a library for manipulating disk partitions
   3     Copyright (C) 2000, 2002, 2004, 2007-2009 Free Software Foundation, Inc.
   4
   5     This program is free software; you can redistribute it and/or modify
   6     it under the terms of the GNU General Public License as published by
   7     the Free Software Foundation; either version 3 of the License, or
   8     (at your option) any later version.
   9
  10     This program is distributed in the hope that it will be useful,
  11     but WITHOUT ANY WARRANTY; without even the implied warranty of
  12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13     GNU General Public License for more details.
  14
  15     You should have received a copy of the GNU General Public License
  16     along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17 */
  18
  19 #include <config.h>
  20
  21 #include <parted/parted.h>
  22 #include <parted/debug.h>
  23 #include <parted/endian.h>
  24 #include <stdbool.h>
  25
  26 #if ENABLE_NLS
  27 #  include <libintl.h>
  28 #  define _(String) dgettext (PACKAGE, String)
  29 #else
  30 #  define _(String) (String)
  31 #endif /* ENABLE_NLS */
  32
  33 #include "misc.h"
  34 #include "pt-tools.h"
  35
  36 /* struct's hacked from Linux source:  fs/partitions/mac.h
  37  * I believe it was originally written by Paul Mackerras (from comments in
  38  * Quik source)
  39  *
  40  * See also:
  41  *      http://developer.apple.com/documentation/mac/Devices/Devices-126.html
  42  *      http://developer.apple.com/documentation/mac/Devices/Devices-121.html
  43  *      http://devworld.apple.com/technotes/tn/tn1189.html
  44  *
  45  * Partition types:
  46  *      Apple_Bootstrap         new-world (HFS) boot partition
  47  *      Apple_partition_map     partition map (table)
  48  *      Apple_Driver            device driver
  49  *      Apple_Driver43          SCSI Manager 4.3 device driver
  50  *      Apple_MFS               original Macintosh File System
  51  *      Apple_HFS               Hierarchical File System (and +)
  52  *      Apple_HFSX              HFS+ with case sensitivity and more
  53  *      Apple_UNIX_SVR2         UNIX file system (UFS?)
  54  *      Apple_PRODOS            ProDOS file system
  55  *      Apple_Free              unused space
  56  *      Apple_Scratch           empty
  57  *      Apple_Void              padding for iso9660
  58  *      Apple_Extra             an unused partition map entry
  59  *
  60  * Quick explanation:
  61  * ------------------
  62  * Terminology:
  63  *
  64  *      Parted                  Apple
  65  *      ------                  -----
  66  *      device                  disk/device
  67  *      disk                    no equivalent.
  68  *      partition               volume or partition
  69  *      sector                  block
  70  *
  71  *      * All space must be accounted for, except block 0 (driver block) and
  72  *      block 1-X (the partition map: i.e. lots of MacRawPartitions)
  73  *
  74  *      * It's really hard to grow/shrink the number of MacRawPartition
  75  *      entries in the partition map, because the first partition starts
  76  *      immediately after the partition map.  When we can move the start of
  77  *      HFS and ext2 partitions, this problem will disappear ;-)
  78  */
  79
  80 #define MAC_PARTITION_MAGIC_1   0x5453          /* old */
  81 #define MAC_PARTITION_MAGIC_2   0x504d
  82 #define MAC_DISK_MAGIC          0x4552
  83
  84 #define MAC_STATUS_BOOTABLE     8       /* partition is bootable */
  85
  86 typedef struct _MacRawPartition     MacRawPartition;
  87 typedef struct _MacRawDisk          MacRawDisk;
  88 typedef struct _MacDeviceDriver     MacDeviceDriver;
  89 typedef struct _MacPartitionData    MacPartitionData;
  90 typedef struct _MacDiskData         MacDiskData;
  91
  92 struct __attribute__ ((packed)) _MacRawPartition {
  93         uint16_t        signature;      /* expected to be MAC_PARTITION_MAGIC */
  94         uint16_t        res1;
  95         uint32_t        map_count;      /* # blocks in partition map */
  96         uint32_t        start_block;    /* absolute starting block # of partition */
  97         uint32_t        block_count;    /* number of blocks in partition */
  98         char            name[32];       /* partition name */
  99         char            type[32];       /* string type description */
 100         uint32_t        data_start;     /* rel block # of first data block */
 101         uint32_t        data_count;     /* number of data blocks */
 102         uint32_t        status;         /* partition status bits */
 103         uint32_t        boot_start;
 104         uint32_t        boot_count;
 105         uint32_t        boot_load;
 106         uint32_t        boot_load2;
 107         uint32_t        boot_entry;
 108         uint32_t        boot_entry2;
 109         uint32_t        boot_cksum;
 110         char            processor[16];  /* Contains 680x0, x=0,2,3,4; or empty */
 111         uint32_t        driver_sig;
 112         char            _padding[372];
 113 };
 114
 115 /* Driver descriptor structure, in block 0 */
 116 struct __attribute__ ((packed)) _MacRawDisk {
 117         uint16_t        signature;      /* expected to be MAC_DRIVER_MAGIC */
 118         uint16_t        block_size;     /* physical sector size */
 119         uint32_t        block_count;    /* size of device in blocks */
 120         uint16_t        dev_type;       /* reserved */
 121         uint16_t        dev_id;         /* reserved */
 122         uint32_t        data;           /* reserved */
 123         uint16_t        driver_count;   /* # of driver descriptor entries */
 124         uint8_t         driverlist[488];/* info about available drivers */
 125         uint16_t        padding[3];     /* pad to 512 bytes */
 126 };
 127
 128 struct __attribute__ ((packed)) _MacDeviceDriver {
 129         uint32_t        block;          /* startblock in MacRawDisk->block_size units */
 130         uint16_t        size;           /* size in 512 byte units */
 131         uint16_t        type;           /* operating system type (MacOS = 1) */
 132 };
 133
 134 struct _MacPartitionData {
 135         char            volume_name[33];        /* eg: "Games" */
 136         char            system_name[33];        /* eg: "Apple_Unix_SVR2" */
 137         char            processor_name[17];
 138
 139         int             is_boot;
 140         int             is_driver;
 141         int             has_driver;
 142         int             is_root;
 143         int             is_swap;
 144         int             is_lvm;
 145         int             is_raid;
 146
 147         PedSector       data_region_length;
 148         PedSector       boot_region_length;
 149
 150         uint32_t        boot_base_address;
 151         uint32_t        boot_entry_address;
 152         uint32_t        boot_checksum;
 153
 154         uint32_t        status;
 155         uint32_t        driver_sig;
 156 };
 157
 158 struct _MacDiskData {
 159         int             ghost_size;             /* sectors per "driver" block */
 160         int             part_map_entry_count;   /* # entries (incl. ghost) */
 161         int             part_map_entry_num;     /* partition map location */
 162
 163         int             active_part_entry_count;        /* # real partitions */
 164         int             free_part_entry_count;          /* # free space */
 165         int             last_part_entry_num;            /* last entry number */
 166
 167         uint16_t        block_size;             /* physical sector size */
 168         uint16_t        driver_count;
 169         MacDeviceDriver driverlist[1 + 60];     /* 488 bytes */
 170 };
 171
 172 static PedDiskType mac_disk_type;
 173
 174 static int
 175 _check_signature (MacRawDisk const *raw_disk)
 176 {
 177         if (PED_BE16_TO_CPU (raw_disk->signature) != MAC_DISK_MAGIC) {
 178 #ifdef DISCOVER_ONLY
 179                 return 0;
 180 #else
 181                 return ped_exception_throw (
 182                         PED_EXCEPTION_ERROR,
 183                         PED_EXCEPTION_IGNORE_CANCEL,
 184                         _("Invalid signature %x for Mac disk labels."),
 185                         (int) PED_BE16_TO_CPU (raw_disk->signature))
 186                         == PED_EXCEPTION_IGNORE;
 187 #endif
 188         }
 189
 190         return 1;
 191 }
 192
 193 static int
 194 _rawpart_check_signature (MacRawPartition* raw_part)
 195 {
 196         int     sig = (int) PED_BE16_TO_CPU (raw_part->signature);
 197         return sig == MAC_PARTITION_MAGIC_1 || sig == MAC_PARTITION_MAGIC_2;
 198 }
 199
 200 static int
 201 mac_probe (const PedDevice * dev)
 202 {
 203         PED_ASSERT (dev != NULL, return 0);
 204
 205         if (dev->sector_size < sizeof (MacRawDisk))
 206                 return 0;
 207
 208         void *label;
 209         if (!ptt_read_sector (dev, 0, &label))
 210                 return 0;
 211
 212         int valid = _check_signature (label);
 213
 214         free (label);
 215         return valid;
 216 }
 217
 218 static int
 219 _disk_add_part_map_entry (PedDisk* disk, int warn)
 220 {
 221         MacDiskData*            mac_disk_data = disk->disk_specific;
 222         PedPartition*           new_part;
 223         MacPartitionData*       mac_part_data;
 224         PedSector               part_map_size;
 225         PedConstraint*          constraint_any = ped_constraint_any (disk->dev);
 226
 227 #ifndef DISCOVER_ONLY
 228         if (warn && ped_exception_throw (
 229                 PED_EXCEPTION_ERROR,
 230                 PED_EXCEPTION_FIX | PED_EXCEPTION_CANCEL,
 231                 _("Partition map has no partition map entry!"))
 232                         != PED_EXCEPTION_FIX)
 233                 goto error;
 234 #endif /* !DISCOVER_ONLY */
 235
 236         part_map_size
 237                 = ped_round_up_to (mac_disk_data->last_part_entry_num, 64);
 238         if (part_map_size == 0)
 239                 part_map_size = 64;
 240
 241         new_part = ped_partition_new (disk, PED_PARTITION_NORMAL, NULL,
 242                                       1, part_map_size - 1);
 243         if (!new_part)
 244                 goto error;
 245
 246         mac_part_data = new_part->disk_specific;
 247         strcpy (mac_part_data->volume_name, "Apple");
 248         strcpy (mac_part_data->system_name, "Apple_partition_map");
 249
 250         if (!ped_disk_add_partition (disk, new_part, constraint_any))
 251                 goto error_destroy_new_part;
 252
 253         mac_disk_data->part_map_entry_num = new_part->num;
 254         mac_disk_data->part_map_entry_count
 255                 = new_part->geom.end - mac_disk_data->ghost_size;
 256         ped_constraint_destroy (constraint_any);
 257         return 1;
 258
 259 error_destroy_new_part:
 260         ped_partition_destroy (new_part);
 261 error:
 262         ped_constraint_destroy (constraint_any);
 263         return 0;
 264 }
 265
 266 static PedDisk*
 267 mac_alloc (const PedDevice* dev)
 268 {
 269         PedDisk*                disk;
 270         MacDiskData*            mac_disk_data;
 271
 272         PED_ASSERT (dev != NULL, return NULL);
 273
 274 #ifndef DISCOVER_ONLY
 275         if (dev->length < 256) {
 276                 ped_exception_throw (
 277                         PED_EXCEPTION_ERROR,
 278                         PED_EXCEPTION_CANCEL,
 279                         _("%s is too small for a Mac disk label!"),
 280                         dev->path);
 281                 goto error;
 282         }
 283 #endif
 284
 285         disk = _ped_disk_alloc (dev, &mac_disk_type);
 286         if (!disk)
 287                 goto error;
 288
 289         mac_disk_data = (MacDiskData*) ped_malloc (sizeof (MacDiskData));
 290         if (!mac_disk_data)
 291                 goto error_free_disk;
 292         disk->disk_specific = mac_disk_data;
 293         mac_disk_data->ghost_size = disk->dev->sector_size / 512;
 294         mac_disk_data->active_part_entry_count = 0;
 295         mac_disk_data->free_part_entry_count = 1;
 296         mac_disk_data->last_part_entry_num = 1;
 297         mac_disk_data->block_size = 0;
 298         mac_disk_data->driver_count = 0;
 299         memset(&mac_disk_data->driverlist[0], 0, sizeof(mac_disk_data->driverlist));
 300
 301         if (!_disk_add_part_map_entry (disk, 0))
 302                 goto error_free_disk;
 303         return disk;
 304
 305 error_free_disk:
 306         _ped_disk_free (disk);
 307 error:
 308         return NULL;
 309 }
 310
 311 static PedDisk*
 312 mac_duplicate (const PedDisk* disk)
 313 {
 314         PedDisk*        new_disk;
 315         MacDiskData*    new_mac_data;
 316         MacDiskData*    old_mac_data = (MacDiskData*) disk->disk_specific;
 317         PedPartition*   partition_map;
 318
 319         new_disk = ped_disk_new_fresh (disk->dev, &mac_disk_type);
 320         if (!new_disk)
 321                 goto error;
 322
 323         new_mac_data = (MacDiskData*) new_disk->disk_specific;
 324
 325         /* remove the partition map partition - it will be duplicated
 326          * later.
 327          */
 328         partition_map = ped_disk_get_partition_by_sector (new_disk, 1);
 329         PED_ASSERT (partition_map != NULL, return 0);
 330         ped_disk_remove_partition (new_disk, partition_map);
 331
 332         /* ugly, but C is ugly :p */
 333         memcpy (new_mac_data, old_mac_data, sizeof (MacDiskData));
 334         return new_disk;
 335
 336         _ped_disk_free (new_disk);
 337 error:
 338         return NULL;
 339 }
 340
 341 static void
 342 mac_free (PedDisk* disk)
 343 {
 344         MacDiskData*    mac_disk_data = disk->disk_specific;
 345
 346         _ped_disk_free (disk);
 347         free (mac_disk_data);
 348 }
 349
 350 #ifndef DISCOVER_ONLY
 351 static int
 352 _clobber_part_map (PedDevice* dev)
 353 {
 354         void *buf = ped_malloc (dev->sector_size);
 355         if (!buf)
 356                 return 0;
 357
 358         int ok = 1;
 359         PedSector sector;
 360         for (sector=1; 1; sector++) {
 361                 if (!ped_device_read (dev, buf, sector, 1)) {
 362                         ok = 0;
 363                         break;
 364                 }
 365                 if (!_rawpart_check_signature (buf)) {
 366                         ok = 1;
 367                         break;
 368                 }
 369                 memset (buf, 0, dev->sector_size);
 370                 if (!ped_device_write (dev, buf, sector, 1)) {
 371                         ok = 0;
 372                         break;
 373                 }
 374         }
 375         free (buf);
 376         return ok;
 377 }
 378
 379 static int
 380 mac_clobber (PedDevice* dev)
 381 {
 382         void *buf;
 383         if (!ptt_read_sector (dev, 0, &buf))
 384                 return 0;
 385
 386         if (!_check_signature (buf)) {
 387                 free (buf);
 388                 return 0;
 389         }
 390
 391         memset (buf, 0, dev->sector_size);
 392         bool ok = ped_device_write (dev, buf, 0, 1);
 393         free (buf);
 394         if (!ok)
 395                 return 0;
 396
 397         return _clobber_part_map (dev);
 398 }
 399 #endif /* !DISCOVER_ONLY */
 400
 401 static int
 402 _rawpart_cmp_type (const MacRawPartition* raw_part, const char* type)
 403 {
 404         return strncasecmp (raw_part->type, type, 32) == 0;
 405 }
 406
 407 static int
 408 _rawpart_cmp_name (const MacRawPartition* raw_part, const char* name)
 409 {
 410         return strncasecmp (raw_part->name, name, 32) == 0;
 411 }
 412
 413 static int
 414 _rawpart_is_partition_map (const MacRawPartition* raw_part)
 415 {
 416         return _rawpart_cmp_type (raw_part, "Apple_partition_map");
 417 }
 418
 419 static int
 420 strncasestr (const char* haystack, const char* needle, int n)
 421 {
 422         int     needle_size = strlen (needle);
 423         int     i;
 424
 425         for (i = 0; haystack[i] && i < n - needle_size; i++) {
 426                 if (strncasecmp (haystack + i, needle, needle_size) == 0)
 427                         return 1;
 428         }
 429
 430         return 0;
 431 }
 432
 433 static int
 434 _rawpart_is_boot (const MacRawPartition* raw_part)
 435 {
 436         if (!strcasecmp(raw_part->type, "Apple_Bootstrap"))
 437                 return 1;
 438
 439         if (!strcasecmp(raw_part->type, "Apple_Boot"))
 440                 return 1;
 441
 442         return 0;
 443 }
 444
 445 static int
 446 _rawpart_is_driver (const MacRawPartition* raw_part)
 447 {
 448         if (strncmp (raw_part->type, "Apple_", 6) != 0)
 449                 return 0;
 450         if (!strncasestr (raw_part->type, "driver", 32))
 451                 return 0;
 452         return 1;
 453 }
 454
 455 static int
 456 _rawpart_has_driver (const MacRawPartition* raw_part, MacDiskData* mac_disk_data)
 457 {
 458         MacDeviceDriver *driverlist;
 459         uint16_t i, bsz;
 460         uint32_t driver_bs, driver_be, part_be;
 461
 462         driverlist = &mac_disk_data->driverlist[0];
 463         bsz = mac_disk_data->block_size / 512;
 464         for (i = 0; i < mac_disk_data->driver_count; i++) {
 465                 driver_bs = driverlist->block * bsz;
 466                 driver_be = driver_bs + driverlist->size;
 467                 part_be = raw_part->start_block + raw_part->block_count;
 468                 if (driver_bs >= raw_part->start_block && driver_be <= part_be)
 469                         return 1;
 470                 driverlist++;
 471         }
 472         return 0;
 473 }
 474
 475 static int
 476 _rawpart_is_root (MacRawPartition* raw_part)
 477 {
 478         if (!_rawpart_cmp_type (raw_part, "Apple_UNIX_SVR2"))
 479                 return 0;
 480         if (strcmp (raw_part->name, "root") != 0)
 481                 return 0;
 482         return 1;
 483 }
 484
 485 static int
 486 _rawpart_is_swap (MacRawPartition* raw_part)
 487 {
 488         if (!_rawpart_cmp_type (raw_part, "Apple_UNIX_SVR2"))
 489                 return 0;
 490         if (strcmp (raw_part->name, "swap") != 0)
 491                 return 0;
 492         return 1;
 493 }
 494
 495 static int
 496 _rawpart_is_lvm (MacRawPartition* raw_part)
 497 {
 498         if (strcmp (raw_part->type, "Linux_LVM") != 0)
 499                 return 0;
 500         return 1;
 501 }
 502
 503 static int
 504 _rawpart_is_raid (MacRawPartition* raw_part)
 505 {
 506         if (strcmp (raw_part->type, "Linux_RAID") != 0)
 507                 return 0;
 508         return 1;
 509 }
 510
 511 static int
 512 _rawpart_is_void (MacRawPartition* raw_part)
 513 {
 514         return _rawpart_cmp_type (raw_part, "Apple_Void");
 515 }
 516
 517 /* returns 1 if the raw_part represents a partition that is "unused space", or
 518  * doesn't represent a partition at all.  NOTE: some people make Apple_Free
 519  * partitions with MacOS, because they can't select another type.  So, if the
 520  * name is anything other than "Extra" or "", it is treated as a "real"
 521  * partition.
 522  */
 523 static int
 524 _rawpart_is_active (MacRawPartition* raw_part)
 525 {
 526         if (_rawpart_cmp_type (raw_part, "Apple_Free")
 527             && (_rawpart_cmp_name (raw_part, "Extra")
 528                 || _rawpart_cmp_name (raw_part, "")))
 529                 return 0;
 530         if (_rawpart_cmp_type (raw_part, "Apple_Void"))
 531                 return 0;
 532         if (_rawpart_cmp_type (raw_part, "Apple_Scratch"))
 533                 return 0;
 534         if (_rawpart_cmp_type (raw_part, "Apple_Extra"))
 535                 return 0;
 536
 537         return 1;
 538 }
 539
 540 static PedPartition*
 541 _rawpart_analyse (MacRawPartition* raw_part, PedDisk* disk, int num)
 542 {
 543         MacDiskData*            mac_disk_data;
 544         PedPartition*           part;
 545         MacPartitionData*       mac_part_data;
 546         PedSector               block_size;
 547         PedSector               start, length;
 548
 549         if (!_rawpart_check_signature (raw_part)) {
 550 #ifndef DISCOVER_ONLY
 551                 if (ped_exception_throw (
 552                         PED_EXCEPTION_WARNING,
 553                         PED_EXCEPTION_IGNORE_CANCEL,
 554                         _("Partition %d has an invalid signature %x."),
 555                         num,
 556                         (int) PED_BE16_TO_CPU (raw_part->signature))
 557                                 != PED_EXCEPTION_IGNORE)
 558 #endif
 559                         goto error;
 560         }
 561
 562         mac_disk_data = (MacDiskData*) disk->disk_specific;
 563         block_size = disk->dev->sector_size / 512;
 564
 565         start = PED_BE32_TO_CPU (raw_part->start_block) * block_size;
 566         length = PED_BE32_TO_CPU (raw_part->block_count) * block_size;
 567         if (length == 0) {
 568 #ifndef DISCOVER_ONLY
 569                 ped_exception_throw (
 570                         PED_EXCEPTION_ERROR,
 571                         PED_EXCEPTION_CANCEL,
 572                         _("Partition %d has an invalid length of 0 bytes!"),
 573                         num);
 574 #endif
 575                 return NULL;
 576         }
 577         part = ped_partition_new (disk, PED_PARTITION_NORMAL, NULL,
 578                                   start, start + length - 1);
 579         if (!part)
 580                 goto error;
 581
 582         mac_part_data = part->disk_specific;
 583
 584         strncpy (mac_part_data->volume_name, raw_part->name, 32);
 585         strncpy (mac_part_data->system_name, raw_part->type, 32);
 586         strncpy (mac_part_data->processor_name, raw_part->processor, 16);
 587
 588         mac_part_data->is_boot = _rawpart_is_boot (raw_part);
 589         mac_part_data->is_driver = _rawpart_is_driver (raw_part);
 590         if (mac_part_data->is_driver)
 591                 mac_part_data->has_driver = _rawpart_has_driver(raw_part, mac_disk_data);
 592         mac_part_data->is_root = _rawpart_is_root (raw_part);
 593         mac_part_data->is_swap = _rawpart_is_swap (raw_part);
 594         mac_part_data->is_lvm = _rawpart_is_lvm (raw_part);
 595         mac_part_data->is_raid = _rawpart_is_raid (raw_part);
 596
 597         /* "data" region */
 598 #ifndef DISCOVER_ONLY
 599         if (raw_part->data_start) {
 600                 ped_exception_throw (
 601                         PED_EXCEPTION_ERROR,
 602                         PED_EXCEPTION_CANCEL,
 603                         _("The data region doesn't start at the start "
 604                           "of the partition."));
 605                 goto error_destroy_part;
 606         }
 607 #endif /* !DISCOVER_ONLY */
 608         mac_part_data->data_region_length
 609                 = PED_BE32_TO_CPU (raw_part->data_count) * block_size;
 610
 611         /* boot region - we have no idea what this is for, but Mac OSX
 612          * seems to put garbage here, and doesn't pay any attention to
 613          * it afterwards.  [clausen, dan burcaw]
 614          */
 615 #if 0
 616         if (raw_part->boot_start) {
 617                 ped_exception_throw (
 618                         PED_EXCEPTION_ERROR,
 619                         PED_EXCEPTION_CANCEL,
 620                         _("The boot region doesn't start at the start "
 621                           "of the partition."));
 622                 goto error_destroy_part;
 623         }
 624 #endif
 625         mac_part_data->boot_region_length
 626                 = PED_BE32_TO_CPU (raw_part->boot_count) * block_size;
 627
 628 #ifndef DISCOVER_ONLY
 629         if (mac_part_data->has_driver) {
 630                 if (mac_part_data->boot_region_length < part->geom.length) {
 631                         if (ped_exception_throw (
 632                                 PED_EXCEPTION_ERROR,
 633                                 PED_EXCEPTION_IGNORE_CANCEL,
 634                                 _("The partition's boot region doesn't occupy "
 635                                   "the entire partition."))
 636                                         != PED_EXCEPTION_IGNORE)
 637                                 goto error_destroy_part;
 638                 }
 639         } else {
 640                 if (mac_part_data->data_region_length < part->geom.length &&
 641                     !mac_part_data->is_boot) {
 642                         if (ped_exception_throw (
 643                                 PED_EXCEPTION_ERROR,
 644                                 PED_EXCEPTION_IGNORE_CANCEL,
 645                                 _("The partition's data region doesn't occupy "
 646                                   "the entire partition."))
 647                                         != PED_EXCEPTION_IGNORE)
 648                                 goto error_destroy_part;
 649                 }
 650         }
 651 #endif /* !DISCOVER_ONLY */
 652
 653         mac_part_data->boot_base_address
 654                 = PED_BE32_TO_CPU (raw_part->boot_load);
 655         mac_part_data->boot_entry_address
 656                 = PED_BE32_TO_CPU (raw_part->boot_entry);
 657         mac_part_data->boot_checksum
 658                 = PED_BE32_TO_CPU (raw_part->boot_cksum);
 659
 660         mac_part_data->status = PED_BE32_TO_CPU (raw_part->status);
 661         mac_part_data->driver_sig = PED_BE32_TO_CPU (raw_part->driver_sig);
 662
 663         return part;
 664
 665 error_destroy_part:
 666         ped_partition_destroy (part);
 667 error:
 668         return NULL;
 669 }
 670
 671 /* looks at the partition map size field in a mac raw partition, and calculates
 672  * what the size of the partition map should be, from it
 673  */
 674 static int
 675 _rawpart_get_partmap_size (MacRawPartition* raw_part, PedDisk* disk)
 676 {
 677         MacDiskData*    mac_disk_data = disk->disk_specific;
 678         PedSector       sector_size = disk->dev->sector_size / 512;
 679         PedSector       part_map_start;
 680         PedSector       part_map_end;
 681
 682         part_map_start = mac_disk_data->ghost_size;
 683         part_map_end = sector_size * PED_BE32_TO_CPU (raw_part->map_count);
 684
 685         return part_map_end - part_map_start + 1;
 686 }
 687
 688 static int
 689 _disk_analyse_block_size (PedDisk* disk, MacRawDisk* raw_disk)
 690 {
 691         PedSector       block_size;
 692
 693         if (PED_BE16_TO_CPU (raw_disk->block_size) % 512) {
 694 #ifndef DISCOVER_ONLY
 695                 ped_exception_throw (
 696                         PED_EXCEPTION_ERROR,
 697                         PED_EXCEPTION_CANCEL,
 698                         _("Weird block size on device descriptor: %d bytes is "
 699                           "not divisible by 512."),
 700                         (int) PED_BE16_TO_CPU (raw_disk->block_size));
 701 #endif
 702                 goto error;
 703         }
 704
 705         block_size = PED_BE16_TO_CPU (raw_disk->block_size) / 512;
 706         if (block_size != disk->dev->sector_size / 512) {
 707 #ifndef DISCOVER_ONLY
 708                 if (ped_exception_throw (
 709                         PED_EXCEPTION_WARNING,
 710                         PED_EXCEPTION_IGNORE_CANCEL,
 711                         _("The driver descriptor says the physical block size "
 712                           "is %d bytes, but Linux says it is %d bytes."),
 713                         (int) block_size * 512,
 714                         (int) disk->dev->sector_size)
 715                                 != PED_EXCEPTION_IGNORE)
 716                         goto error;
 717 #endif
 718                 disk->dev->sector_size = block_size * 512;
 719         }
 720
 721         return 1;
 722
 723 error:
 724         return 0;
 725 }
 726
 727 /* Tries to figure out the block size used by the drivers, for the ghost
 728  * partitioning scheme.  Ghost partitioning works like this: the OpenFirmware
 729  * (OF) sees 512 byte blocks, but some drivers use 2048 byte blocks (and,
 730  * perhaps, some other number?).  To remain compatible, the partition map
 731  * only has "real" partition map entries on ghost-aligned block numbers (and
 732  * the others are padded with Apple_Void partitions).  This function tries
 733  * to figure out what the "ghost-aligned" size is... (which, believe-it-or-not,
 734  * doesn't always equal 2048!!!)
 735  */
 736 static int
 737 _disk_analyse_ghost_size (PedDisk* disk)
 738 {
 739         MacDiskData*            mac_disk_data = disk->disk_specific;
 740
 741         void *buf = ped_malloc (disk->dev->sector_size);
 742         if (!buf)
 743                 return 0;
 744
 745         int i;
 746         int found = 0;
 747         for (i = 1; i < 64; i *= 2) {
 748                 if (!ped_device_read (disk->dev, buf, i, 1))
 749                         break;
 750                 if (_rawpart_check_signature (buf)
 751                     && !_rawpart_is_void (buf)) {
 752                         mac_disk_data->ghost_size = i;
 753                         PED_ASSERT (i <= disk->dev->sector_size / 512, break);
 754                         found = 1;
 755                         break;
 756                 }
 757         }
 758         free (buf);
 759
 760 #ifndef DISCOVER_ONLY
 761         if (!found)
 762                 ped_exception_throw (
 763                         PED_EXCEPTION_ERROR,
 764                         PED_EXCEPTION_CANCEL,
 765                         _("No valid partition map found."));
 766 #endif
 767         return found;
 768 }
 769
 770 static int
 771 mac_read (PedDisk* disk)
 772 {
 773         MacRawPartition         raw_part;
 774         MacDiskData*            mac_disk_data;
 775         PedPartition*           part;
 776         int                     num;
 777         PedSector               ghost_size;
 778         PedConstraint*          constraint_exact;
 779         int                     last_part_entry_num = 0;
 780
 781         PED_ASSERT (disk != NULL, return 0);
 782
 783         mac_disk_data = disk->disk_specific;
 784         mac_disk_data->part_map_entry_num = 0;          /* 0 == none */
 785
 786         void *s0;
 787         if (!ptt_read_sector (disk->dev, 0, &s0))
 788                 return 0;
 789
 790         MacRawDisk *raw_disk = (MacRawDisk *) s0;
 791
 792         if (!_check_signature (raw_disk))
 793                 goto error;
 794
 795         if (!_disk_analyse_block_size (disk, raw_disk))
 796                 goto error;
 797         if (!_disk_analyse_ghost_size (disk))
 798                 goto error;
 799         ghost_size = mac_disk_data->ghost_size;
 800
 801         if (!ped_disk_delete_all (disk))
 802                 goto error;
 803
 804         if (raw_disk->driver_count && raw_disk->driver_count < 62) {
 805                 memcpy(&mac_disk_data->driverlist[0], &raw_disk->driverlist[0],
 806                                 sizeof(mac_disk_data->driverlist));
 807                 mac_disk_data->driver_count = raw_disk->driver_count;
 808                 mac_disk_data->block_size = raw_disk->block_size;
 809         }
 810
 811         for (num=1; num==1 || num <= last_part_entry_num; num++) {
 812                 if (!ped_device_read (disk->dev, &raw_part,
 813                                       num * ghost_size, 1))
 814                         goto error_delete_all;
 815
 816                 if (!_rawpart_check_signature (&raw_part))
 817                         continue;
 818
 819                 if (num == 1)
 820                         last_part_entry_num
 821                                 = _rawpart_get_partmap_size (&raw_part, disk);
 822                 if (_rawpart_get_partmap_size (&raw_part, disk)
 823                                 != last_part_entry_num) {
 824                         if (ped_exception_throw (
 825                                 PED_EXCEPTION_ERROR,
 826                                 PED_EXCEPTION_IGNORE_CANCEL,
 827                                 _("Conflicting partition map entry sizes!  "
 828                                   "Entry 1 says it is %d, but entry %d says "
 829                                   "it is %d!"),
 830                                 last_part_entry_num,
 831                                 _rawpart_get_partmap_size (&raw_part, disk))
 832                                         != PED_EXCEPTION_IGNORE)
 833                                 goto error_delete_all;
 834                 }
 835
 836                 if (!_rawpart_is_active (&raw_part))
 837                         continue;
 838
 839                 part = _rawpart_analyse (&raw_part, disk, num);
 840                 if (!part)
 841                         goto error_delete_all;
 842                 part->num = num;
 843                 part->fs_type = ped_file_system_probe (&part->geom);
 844                 constraint_exact = ped_constraint_exact (&part->geom);
 845                 if (!ped_disk_add_partition (disk, part, constraint_exact))
 846                         goto error_delete_all;
 847                 ped_constraint_destroy (constraint_exact);
 848
 849                 if (_rawpart_is_partition_map (&raw_part)) {
 850                         if (mac_disk_data->part_map_entry_num
 851                             && ped_exception_throw (
 852                                         PED_EXCEPTION_ERROR,
 853                                         PED_EXCEPTION_IGNORE_CANCEL,
 854                                         _("Weird!  There are 2 partitions "
 855                                           "map entries!"))
 856                             != PED_EXCEPTION_IGNORE)
 857                                 goto error_delete_all;
 858
 859                         mac_disk_data->part_map_entry_num = num;
 860                         mac_disk_data->part_map_entry_count
 861                                 = part->geom.end - ghost_size + 1;
 862                 }
 863         }
 864
 865         if (!mac_disk_data->part_map_entry_num) {
 866                 if (!_disk_add_part_map_entry (disk, 1))
 867                         goto error_delete_all;
 868                 ped_disk_commit_to_dev (disk);
 869         }
 870         free (s0);
 871         return 1;
 872
 873 error_delete_all:
 874         ped_disk_delete_all (disk);
 875 error:
 876         free (s0);
 877         return 0;
 878 }
 879
 880 #ifndef DISCOVER_ONLY
 881 /* The Ghost partition: is a blank entry, used to pad out each block (where
 882  * there physical block size > 512 bytes).  This is because OpenFirmware uses
 883  * 512 byte blocks, but device drivers Think Different TM, with a different
 884  * lbock size, so we need to do this to avoid a clash (!)
 885  */
 886 static int
 887 _pad_raw_part (PedDisk* disk, int num, MacRawPartition* part_map)
 888 {
 889         MacDiskData*            mac_disk_data = disk->disk_specific;
 890         MacRawPartition         ghost_entry;
 891         int                     i;
 892
 893         memset (&ghost_entry, 0, sizeof (ghost_entry));
 894         ghost_entry.signature = PED_CPU_TO_BE16 (MAC_PARTITION_MAGIC_2);
 895         strcpy (ghost_entry.type, "Apple_Void");
 896         ghost_entry.map_count
 897                 = PED_CPU_TO_BE32 (mac_disk_data->last_part_entry_num);
 898
 899         for (i=0; i < mac_disk_data->ghost_size - 1; i++)
 900                 memcpy (&part_map [i + (num - 1) * mac_disk_data->ghost_size],
 901                         &ghost_entry, sizeof (MacRawPartition));
 902
 903         return 1;
 904 }
 905
 906 static void
 907 _update_driver_count (MacRawPartition* part_map_entry,
 908                       MacDiskData *mac_driverdata, const MacDiskData* mac_disk_data)
 909 {
 910         uint16_t        i, count_orig, count_cur, bsz;
 911         uint32_t        driver_bs, driver_be, part_be;
 912
 913         bsz = mac_disk_data->block_size / 512;
 914         count_cur = mac_driverdata->driver_count;
 915         count_orig = mac_disk_data->driver_count;
 916         for (i = 0; i < count_orig; i++) {
 917                 driver_bs = mac_disk_data->driverlist[i].block * bsz;
 918                 driver_be = driver_bs + mac_disk_data->driverlist[i].size;
 919                 part_be = part_map_entry->start_block + part_map_entry->block_count;
 920                 if (driver_bs >= part_map_entry->start_block
 921                                 && driver_be <= part_be) {
 922                         mac_driverdata->driverlist[count_cur].block
 923                                 = mac_disk_data->driverlist[i].block;
 924                         mac_driverdata->driverlist[count_cur].size
 925                                 = mac_disk_data->driverlist[i].size;
 926                         mac_driverdata->driverlist[count_cur].type
 927                                 = mac_disk_data->driverlist[i].type;
 928                         mac_driverdata->driver_count++;
 929                         break;
 930                 }
 931         }
 932 }
 933
 934 static int
 935 _generate_raw_part (PedDisk* disk, PedPartition* part,
 936                     MacRawPartition* part_map, MacDiskData *mac_driverdata)
 937 {
 938         MacDiskData*            mac_disk_data;
 939         MacPartitionData*       mac_part_data;
 940         MacRawPartition*        part_map_entry;
 941         PedSector               block_size = disk->dev->sector_size / 512;
 942
 943         PED_ASSERT (part->num > 0, goto error);
 944
 945         mac_disk_data = disk->disk_specific;
 946         mac_part_data = part->disk_specific;
 947
 948         part_map_entry = &part_map [part->num * mac_disk_data->ghost_size - 1];
 949
 950         part_map_entry->signature = PED_CPU_TO_BE16 (MAC_PARTITION_MAGIC_2);
 951         part_map_entry->map_count
 952                 = PED_CPU_TO_BE32 (mac_disk_data->last_part_entry_num);
 953         part_map_entry->start_block
 954                 = PED_CPU_TO_BE32 (part->geom.start / block_size);
 955         part_map_entry->block_count
 956                 = PED_CPU_TO_BE32 (part->geom.length / block_size);
 957         strcpy (part_map_entry->name, mac_part_data->volume_name);
 958         strcpy (part_map_entry->type, mac_part_data->system_name);
 959
 960         if (mac_part_data->is_driver) {
 961                 mac_part_data->boot_region_length = part->geom.length;
 962                 if (mac_part_data->has_driver)
 963                         _update_driver_count(part_map_entry, mac_driverdata,
 964                                         mac_disk_data);
 965         } else
 966                 mac_part_data->data_region_length = part->geom.length;
 967         part_map_entry->data_count = PED_CPU_TO_BE32 (
 968                         mac_part_data->data_region_length / block_size);
 969         part_map_entry->boot_count = PED_CPU_TO_BE32 (
 970                         mac_part_data->boot_region_length / block_size);
 971         part_map_entry->status = PED_CPU_TO_BE32 (mac_part_data->status);
 972         part_map_entry->driver_sig
 973                 = PED_CPU_TO_BE32 (mac_part_data->driver_sig);
 974
 975         part_map_entry->boot_load =
 976                 PED_CPU_TO_BE32 (mac_part_data->boot_base_address);
 977         part_map_entry->boot_entry =
 978                 PED_CPU_TO_BE32 (mac_part_data->boot_entry_address);
 979         part_map_entry->boot_cksum =
 980                 PED_CPU_TO_BE32 (mac_part_data->boot_checksum);
 981
 982         strncpy (part_map_entry->processor, mac_part_data->processor_name, 16);
 983
 984         if (!_pad_raw_part (disk, part->num, part_map))
 985                 goto error;
 986
 987         return 1;
 988
 989 error:
 990         return 0;
 991 }
 992
 993 static int
 994 _generate_raw_freespace_part (PedDisk* disk, PedGeometry* geom, int num,
 995                               MacRawPartition* part_map)
 996 {
 997         MacDiskData*            mac_disk_data = disk->disk_specific;
 998         MacRawPartition*        part_map_entry;
 999         PedSector               block_size = disk->dev->sector_size / 512;
1000
1001         PED_ASSERT (num > 0, goto error);
1002
1003         part_map_entry = &part_map [num * mac_disk_data->ghost_size - 1];
1004
1005         part_map_entry->signature = PED_CPU_TO_BE16 (MAC_PARTITION_MAGIC_2);
1006         part_map_entry->map_count
1007                 = PED_CPU_TO_BE32 (mac_disk_data->last_part_entry_num);
1008         part_map_entry->start_block
1009                 = PED_CPU_TO_BE32 (geom->start / block_size);
1010         part_map_entry->block_count
1011                 = PED_CPU_TO_BE32 (geom->length / block_size);
1012         strcpy (part_map_entry->name, "Extra");
1013         strcpy (part_map_entry->type, "Apple_Free");
1014
1015         part_map_entry->data_count = PED_CPU_TO_BE32 (geom->length);
1016         part_map_entry->status = 0;
1017         part_map_entry->driver_sig = 0;
1018
1019         if (!_pad_raw_part (disk, num, part_map))
1020                 goto error;
1021
1022         return 1;
1023
1024 error:
1025         return 0;
1026 }
1027
1028 static int
1029 _generate_empty_part (PedDisk* disk, int num, MacRawPartition* part_map)
1030 {
1031         MacDiskData*            mac_disk_data = disk->disk_specific;
1032         MacRawPartition*        part_map_entry;
1033
1034         PED_ASSERT (num > 0, return 0);
1035
1036         part_map_entry = &part_map [num * mac_disk_data->ghost_size - 1];
1037         part_map_entry->signature = PED_CPU_TO_BE16 (MAC_PARTITION_MAGIC_2);
1038         part_map_entry->map_count
1039                 = PED_CPU_TO_BE32 (mac_disk_data->last_part_entry_num);
1040         strcpy (part_map_entry->type, "Apple_Void");
1041
1042         return _pad_raw_part (disk, num, part_map);
1043 }
1044
1045 /* returns the first empty entry in the partition map */
1046 static int
1047 _get_first_empty_part_entry (PedDisk* disk, MacRawPartition* part_map)
1048 {
1049         MacDiskData*    mac_disk_data = disk->disk_specific;
1050         int             i;
1051
1052         for (i=1; i <= mac_disk_data->last_part_entry_num; i++) {
1053                 if (!part_map[i * mac_disk_data->ghost_size - 1].signature)
1054                         return i;
1055         }
1056
1057         return 0;
1058 }
1059
1060 static int
1061 write_block_zero (PedDisk* disk, MacDiskData* mac_driverdata)
1062 {
1063         PedDevice*      dev = disk->dev;
1064         void *s0;
1065         if (!ptt_read_sector (dev, 0, &s0))
1066                 return 0;
1067         MacRawDisk *raw_disk = (MacRawDisk *) s0;
1068
1069         raw_disk->signature = PED_CPU_TO_BE16 (MAC_DISK_MAGIC);
1070         raw_disk->block_size = PED_CPU_TO_BE16 (dev->sector_size);
1071         raw_disk->block_count
1072                 = PED_CPU_TO_BE32 (dev->length / (dev->sector_size / 512));
1073
1074         raw_disk->driver_count = mac_driverdata->driver_count;
1075         memcpy(&raw_disk->driverlist[0], &mac_driverdata->driverlist[0],
1076                         sizeof(raw_disk->driverlist));
1077
1078         return ped_device_write (dev, raw_disk, 0, 1);
1079 }
1080
1081 static int
1082 mac_write (PedDisk* disk)
1083 {
1084         MacRawPartition*        part_map;
1085         MacDiskData*            mac_disk_data;
1086         MacDiskData*            mac_driverdata; /* updated driver list */
1087         PedPartition*           part;
1088         int                     num;
1089
1090         PED_ASSERT (disk != NULL, return 0);
1091         PED_ASSERT (disk->disk_specific != NULL, return 0);
1092         PED_ASSERT (disk->dev != NULL, return 0);
1093         PED_ASSERT (!disk->update_mode, return 0);
1094
1095         mac_disk_data = disk->disk_specific;
1096
1097         if (!ped_disk_get_partition (disk, mac_disk_data->part_map_entry_num)) {
1098                 if (!_disk_add_part_map_entry (disk, 1))
1099                         goto error;
1100         }
1101
1102         mac_driverdata = ped_malloc(sizeof(MacDiskData));
1103         if (!mac_driverdata)
1104                 goto error;
1105         memset (mac_driverdata, 0, sizeof(MacDiskData));
1106
1107         size_t pmap_bytes = (mac_disk_data->part_map_entry_count
1108                              * disk->dev->sector_size);
1109         part_map = (MacRawPartition*) ped_calloc (pmap_bytes);
1110         if (!part_map)
1111                 goto error_free_driverdata;
1112
1113 /* write (to memory) the "real" partitions */
1114         for (part = ped_disk_next_partition (disk, NULL); part;
1115              part = ped_disk_next_partition (disk, part)) {
1116                 if (!ped_partition_is_active (part))
1117                         continue;
1118                 if (!_generate_raw_part (disk, part, part_map, mac_driverdata))
1119                         goto error_free_part_map;
1120         }
1121
1122 /* write the "free space" partitions */
1123         for (part = ped_disk_next_partition (disk, NULL); part;
1124              part = ped_disk_next_partition (disk, part)) {
1125                 if (part->type != PED_PARTITION_FREESPACE)
1126                         continue;
1127                 num = _get_first_empty_part_entry (disk, part_map);
1128                 if (!_generate_raw_freespace_part (disk, &part->geom, num,
1129                                                    part_map))
1130                         goto error_free_part_map;
1131         }
1132
1133 /* write the "void" (empty) partitions */
1134         for (num = _get_first_empty_part_entry (disk, part_map); num;
1135              num = _get_first_empty_part_entry (disk, part_map))
1136                 _generate_empty_part (disk, num, part_map);
1137
1138 /* write to disk */
1139         if (!ped_device_write (disk->dev, part_map, 1,
1140                                mac_disk_data->part_map_entry_count))
1141                 goto error_free_part_map;
1142         free (part_map);
1143         return write_block_zero (disk, mac_driverdata);
1144
1145 error_free_part_map:
1146         free (part_map);
1147 error_free_driverdata:
1148         free (mac_driverdata);
1149 error:
1150         return 0;
1151 }
1152 #endif /* !DISCOVER_ONLY */
1153
1154 static PedPartition*
1155 mac_partition_new (
1156         const PedDisk* disk, PedPartitionType part_type,
1157         const PedFileSystemType* fs_type, PedSector start, PedSector end)
1158 {
1159         PedPartition*           part;
1160         MacPartitionData*       mac_data;
1161
1162         part = _ped_partition_alloc (disk, part_type, fs_type, start, end);
1163         if (!part)
1164                 goto error;
1165
1166         if (ped_partition_is_active (part)) {
1167                 part->disk_specific
1168                         = mac_data = ped_malloc (sizeof (MacPartitionData));
1169                 if (!mac_data)
1170                         goto error_free_part;
1171
1172                 memset (mac_data, 0, sizeof (MacPartitionData));
1173                 strcpy (mac_data->volume_name, "untitled");
1174         } else {
1175                 part->disk_specific = NULL;
1176         }
1177         return part;
1178
1179 error_free_part:
1180         free (part);
1181 error:
1182         return NULL;
1183 }
1184
1185 static PedPartition*
1186 mac_partition_duplicate (const PedPartition* part)
1187 {
1188         PedPartition*           new_part;
1189         MacPartitionData*       new_mac_data;
1190         MacPartitionData*       old_mac_data;
1191
1192         new_part = ped_partition_new (part->disk, part->type,
1193                                       part->fs_type, part->geom.start,
1194                                       part->geom.end);
1195         if (!new_part)
1196                 return NULL;
1197         new_part->num = part->num;
1198
1199         old_mac_data = (MacPartitionData*) part->disk_specific;
1200         new_mac_data = (MacPartitionData*) new_part->disk_specific;
1201
1202         /* ugly, but C is ugly :p */
1203         memcpy (new_mac_data, old_mac_data, sizeof (MacPartitionData));
1204         return new_part;
1205 }
1206
1207 static void
1208 mac_partition_destroy (PedPartition* part)
1209 {
1210         PED_ASSERT (part != NULL, return);
1211
1212         if (ped_partition_is_active (part))
1213                 free (part->disk_specific);
1214         free (part);
1215 }
1216
1217 static int
1218 mac_partition_set_system (PedPartition* part, const PedFileSystemType* fs_type)
1219 {
1220         MacPartitionData* mac_data = part->disk_specific;
1221
1222         part->fs_type = fs_type;
1223
1224         if (fs_type && is_linux_swap (fs_type->name))
1225                 ped_partition_set_flag (part, PED_PARTITION_SWAP, 1);
1226
1227         if (mac_data->is_boot) {
1228                 strcpy (mac_data->system_name, "Apple_Bootstrap");
1229                 mac_data->status = 0x33;
1230                 return 1;
1231         }
1232
1233         if (fs_type && (!strcmp (fs_type->name, "hfs")
1234                         || !strcmp (fs_type->name, "hfs+"))) {
1235                 strcpy (mac_data->system_name, "Apple_HFS");
1236                 mac_data->status |= 0x7f;
1237         } else if (fs_type && !strcmp (fs_type->name, "hfsx")) {
1238                 strcpy (mac_data->system_name, "Apple_HFSX");
1239                 mac_data->status |= 0x7f;
1240         } else {
1241                 strcpy (mac_data->system_name, "Apple_UNIX_SVR2");
1242                 mac_data->status = 0x33;
1243         }
1244
1245         return 1;
1246 }
1247
1248 static int
1249 mac_partition_set_flag (PedPartition* part, PedPartitionFlag flag, int state)
1250 {
1251         MacPartitionData*       mac_data;
1252
1253         PED_ASSERT (part != NULL, return 0);
1254         PED_ASSERT (part->disk_specific != NULL, return 0);
1255
1256         mac_data = part->disk_specific;
1257
1258         switch (flag) {
1259         case PED_PARTITION_BOOT:
1260                 mac_data->is_boot = state;
1261
1262                 if (part->fs_type)
1263                         return mac_partition_set_system (part, part->fs_type);
1264
1265                 if (state) {
1266                         strcpy (mac_data->system_name, "Apple_Bootstrap");
1267                         mac_data->status = 0x33;
1268                 }
1269                 return 1;
1270
1271         case PED_PARTITION_ROOT:
1272                 if (state) {
1273                         strcpy (mac_data->volume_name, "root");
1274                         mac_data->is_swap = 0;
1275                 } else {
1276                         if (mac_data->is_root)
1277                                 strcpy (mac_data->volume_name, "untitled");
1278                 }
1279                 mac_data->is_root = state;
1280                 return 1;
1281
1282         case PED_PARTITION_SWAP:
1283                 if (state) {
1284                         strcpy (mac_data->volume_name, "swap");
1285                         mac_data->is_root = 0;
1286                 } else {
1287                         if (mac_data->is_swap)
1288                                 strcpy (mac_data->volume_name, "untitled");
1289                 }
1290                 mac_data->is_swap = state;
1291                 return 1;
1292
1293         case PED_PARTITION_LVM:
1294                 if (state) {
1295                         strcpy (mac_data->system_name, "Linux_LVM");
1296                         mac_data->is_lvm = state;
1297                 } else {
1298                         if (mac_data->is_lvm)
1299                                 mac_partition_set_system (part, part->fs_type);
1300                 }
1301                 return 1;
1302
1303         case PED_PARTITION_RAID:
1304                 if (state) {
1305                         strcpy (mac_data->system_name, "Linux_RAID");
1306                         mac_data->is_raid = state;
1307                 } else {
1308                         if (mac_data->is_raid)
1309                                 mac_partition_set_system (part, part->fs_type);
1310                 }
1311                 return 1;
1312
1313         default:
1314                 return 0;
1315         }
1316 }
1317
1318 static int
1319 mac_partition_get_flag (const PedPartition* part, PedPartitionFlag flag)
1320 {
1321         MacPartitionData*       mac_data;
1322
1323         PED_ASSERT (part != NULL, return 0);
1324         PED_ASSERT (part->disk_specific != NULL, return 0);
1325
1326         mac_data = part->disk_specific;
1327         switch (flag) {
1328         case PED_PARTITION_BOOT:
1329                 return mac_data->is_boot;
1330
1331         case PED_PARTITION_ROOT:
1332                 return mac_data->is_root;
1333
1334         case PED_PARTITION_SWAP:
1335                 return mac_data->is_swap;
1336
1337         case PED_PARTITION_LVM:
1338                 return mac_data->is_lvm;
1339
1340         case PED_PARTITION_RAID:
1341                 return mac_data->is_raid;
1342
1343         default:
1344                 return 0;
1345         }
1346 }
1347
1348 static int
1349 mac_partition_is_flag_available (
1350         const PedPartition* part, PedPartitionFlag flag)
1351 {
1352         switch (flag) {
1353         case PED_PARTITION_BOOT:
1354         case PED_PARTITION_ROOT:
1355         case PED_PARTITION_SWAP:
1356         case PED_PARTITION_LVM:
1357         case PED_PARTITION_RAID:
1358                 return 1;
1359
1360         default:
1361                 return 0;
1362         }
1363 }
1364
1365 static void
1366 mac_partition_set_name (PedPartition* part, const char* name)
1367 {
1368         MacPartitionData*       mac_data;
1369         int                     i;
1370
1371         PED_ASSERT (part != NULL, return);
1372         PED_ASSERT (part->disk_specific != NULL, return);
1373         mac_data = part->disk_specific;
1374
1375 #ifndef DISCOVER_ONLY
1376         if (mac_data->is_root || mac_data->is_swap) {
1377                 if (ped_exception_throw (
1378                         PED_EXCEPTION_WARNING,
1379                         PED_EXCEPTION_IGNORE_CANCEL,
1380                         _("Changing the name of a root or swap partition "
1381                           "will prevent Linux from recognising it as such."))
1382                                 != PED_EXCEPTION_IGNORE)
1383                         return;
1384                 mac_data->is_root = mac_data->is_swap = 0;
1385         }
1386 #endif
1387
1388         strncpy (mac_data->volume_name, name, 32);
1389         mac_data->volume_name [32] = 0;
1390         for (i = strlen (mac_data->volume_name) - 1;
1391                         mac_data->volume_name[i] == ' '; i--)
1392                 mac_data->volume_name [i] = 0;
1393 }
1394
1395 static const char*
1396 mac_partition_get_name (const PedPartition* part)
1397 {
1398         MacPartitionData*       mac_data;
1399
1400         PED_ASSERT (part != NULL, return NULL);
1401         PED_ASSERT (part->disk_specific != NULL, return NULL);
1402         mac_data = part->disk_specific;
1403
1404         return mac_data->volume_name;
1405 }
1406
1407 static PedConstraint*
1408 _primary_constraint (PedDisk* disk)
1409 {
1410         PedAlignment    start_align;
1411         PedAlignment    end_align;
1412         PedGeometry     max_geom;
1413         PedSector       sector_size;
1414
1415         sector_size = disk->dev->sector_size / 512;
1416
1417         if (!ped_alignment_init (&start_align, 0, sector_size))
1418                 return NULL;
1419         if (!ped_alignment_init (&end_align, -1, sector_size))
1420                 return NULL;
1421         if (!ped_geometry_init (&max_geom, disk->dev, 1, disk->dev->length - 1))
1422                 return NULL;
1423
1424         return ped_constraint_new (&start_align, &end_align, &max_geom,
1425                                    &max_geom, 1, disk->dev->length);
1426 }
1427
1428 static int
1429 mac_partition_align (PedPartition* part, const PedConstraint* constraint)
1430 {
1431         PED_ASSERT (part != NULL, return 0);
1432
1433         if (_ped_partition_attempt_align (part, constraint,
1434                                           _primary_constraint (part->disk)))
1435                 return 1;
1436
1437 #ifndef DISCOVER_ONLY
1438         ped_exception_throw (
1439                 PED_EXCEPTION_ERROR,
1440                 PED_EXCEPTION_CANCEL,
1441                 _("Unable to satisfy all constraints on the partition."));
1442 #endif
1443         return 0;
1444 }
1445
1446 static int
1447 mac_partition_enumerate (PedPartition* part)
1448 {
1449         PedDisk*                disk;
1450         MacDiskData*            mac_disk_data;
1451         int                     i;
1452         int                     max_part_count;
1453
1454         PED_ASSERT (part != NULL, return 0);
1455         PED_ASSERT (part->disk != NULL, return 0);
1456
1457         disk = part->disk;
1458         mac_disk_data = (MacDiskData*) disk->disk_specific;
1459
1460         max_part_count = ped_disk_get_max_primary_partition_count (disk);
1461
1462         if (part->num > 0 && part->num <= mac_disk_data->part_map_entry_count)
1463                 return 1;
1464
1465         for (i = 1; i <= max_part_count; i++) {
1466                 if (!ped_disk_get_partition (disk, i)) {
1467                         part->num = i;
1468                         return 1;
1469                 }
1470         }
1471
1472 #ifndef DISCOVER_ONLY
1473         ped_exception_throw (
1474                 PED_EXCEPTION_ERROR,
1475                 PED_EXCEPTION_CANCEL,
1476                 _("Can't add another partition -- the partition map is too "
1477                   "small!"));
1478 #endif
1479
1480         return 0;
1481 }
1482
1483 static int
1484 _disk_count_partitions (PedDisk* disk)
1485 {
1486         MacDiskData*            mac_disk_data = disk->disk_specific;
1487         PedPartition*           part = NULL;
1488         PedPartition*           last = NULL;
1489
1490         PED_ASSERT (disk->update_mode, return 0);
1491
1492         mac_disk_data->active_part_entry_count = 0;
1493         mac_disk_data->free_part_entry_count = 0;
1494         mac_disk_data->last_part_entry_num = 0;
1495
1496         /* subtle: we only care about free space after the partition map.
1497          * the partition map is an "active" partition, BTW... */
1498         for (part = ped_disk_next_partition (disk, part); part;
1499              part = ped_disk_next_partition (disk, part)) {
1500                 if (!ped_partition_is_active (part))
1501                         continue;
1502
1503                 mac_disk_data->active_part_entry_count++;
1504                 if (last && last->geom.end + 1 < part->geom.start)
1505                         mac_disk_data->free_part_entry_count++;
1506                 mac_disk_data->last_part_entry_num
1507                         = PED_MAX (mac_disk_data->last_part_entry_num,
1508                                    part->num);
1509
1510                 last = part;
1511         }
1512
1513         if (last && last->geom.end < disk->dev->length - 1)
1514                 mac_disk_data->free_part_entry_count++;
1515
1516         mac_disk_data->last_part_entry_num
1517                 = PED_MAX (mac_disk_data->last_part_entry_num,
1518                            mac_disk_data->active_part_entry_count
1519                                 + mac_disk_data->free_part_entry_count);
1520         return 1;
1521 }
1522
1523 static int
1524 add_metadata_part (PedDisk* disk, PedSector start, PedSector end)
1525 {
1526         PedPartition*           new_part;
1527         PedConstraint*          constraint_any = ped_constraint_any (disk->dev);
1528
1529         PED_ASSERT (disk != NULL, return 0);
1530
1531         new_part = ped_partition_new (disk, PED_PARTITION_METADATA, NULL,
1532                                       start, end);
1533         if (!new_part)
1534                 goto error;
1535         if (!ped_disk_add_partition (disk, new_part, constraint_any))
1536                 goto error_destroy_new_part;
1537
1538         ped_constraint_destroy (constraint_any);
1539         return 1;
1540
1541 error_destroy_new_part:
1542         ped_partition_destroy (new_part);
1543 error:
1544         ped_constraint_destroy (constraint_any);
1545         return 0;
1546 }
1547
1548 static int
1549 mac_alloc_metadata (PedDisk* disk)
1550 {
1551         MacDiskData*            mac_disk_data;
1552
1553         PED_ASSERT (disk != NULL, return 0);
1554         PED_ASSERT (disk->disk_specific != NULL, return 0);
1555         PED_ASSERT (disk->dev != NULL, return 0);
1556
1557         mac_disk_data = disk->disk_specific;
1558
1559         if (!add_metadata_part (disk, 0, disk->dev->sector_size / 512 - 1))
1560                 return 0;
1561
1562         /* hack: this seems to be a good place, to update the partition map
1563          * entry count, since mac_alloc_metadata() gets called during
1564          * _disk_pop_update_mode()
1565          */
1566         return _disk_count_partitions (disk);
1567 }
1568
1569 static int
1570 mac_get_max_primary_partition_count (const PedDisk* disk)
1571 {
1572         MacDiskData*    mac_disk_data = disk->disk_specific;
1573         PedPartition*   part_map_partition;
1574
1575         part_map_partition = ped_disk_get_partition (disk,
1576                                         mac_disk_data->part_map_entry_num);
1577
1578         /* HACK: if we haven't found the partition map partition (yet),
1579          * we return this.
1580          */
1581         if (!part_map_partition) {
1582                 mac_disk_data->part_map_entry_num = 0;
1583                 return 65536;
1584         }
1585
1586         /* HACK: since Mac labels need an entry for free-space regions, we
1587          * must allow half plus 1 entries for free-space partitions.  I hate
1588          * this, but things get REALLY complicated, otherwise.
1589          *     (I'm prepared to complicate things later, but I want to get
1590          * everything working, first)
1591          */
1592         return mac_disk_data->part_map_entry_count / mac_disk_data->ghost_size
1593                 - mac_disk_data->free_part_entry_count + 1;
1594 }
1595
1596 static bool
1597 mac_get_max_supported_partition_count (const PedDisk* disk, int *max_n)
1598 {
1599         *max_n = 65536;
1600         return true;
1601 }
1602
1603 static PedDiskOps mac_disk_ops = {
1604         probe:                  mac_probe,
1605 #ifndef DISCOVER_ONLY
1606         clobber:                mac_clobber,
1607 #else
1608         clobber:                NULL,
1609 #endif
1610         alloc:                  mac_alloc,
1611         duplicate:              mac_duplicate,
1612         free:                   mac_free,
1613         read:                   mac_read,
1614 #ifndef DISCOVER_ONLY
1615         /* FIXME: remove this cast, once mac_write is fixed not to
1616            modify its *DISK parameter.  */
1617         write:                  (int (*) (const PedDisk*)) mac_write,
1618 #else
1619         write:                  NULL,
1620 #endif
1621
1622         partition_new:          mac_partition_new,
1623         partition_duplicate:    mac_partition_duplicate,
1624         partition_destroy:      mac_partition_destroy,
1625         partition_set_system:   mac_partition_set_system,
1626         partition_set_flag:     mac_partition_set_flag,
1627         partition_get_flag:     mac_partition_get_flag,
1628         partition_is_flag_available:    mac_partition_is_flag_available,
1629         partition_set_name:     mac_partition_set_name,
1630         partition_get_name:     mac_partition_get_name,
1631         partition_align:        mac_partition_align,
1632         partition_enumerate:    mac_partition_enumerate,
1633
1634         alloc_metadata:         mac_alloc_metadata,
1635         get_max_primary_partition_count:
1636                                 mac_get_max_primary_partition_count,
1637         get_max_supported_partition_count:
1638                                 mac_get_max_supported_partition_count
1639 };
1640
1641 static PedDiskType mac_disk_type = {
1642         next:           NULL,
1643         name:           "mac",
1644         ops:            &mac_disk_ops,
1645         features:       PED_DISK_TYPE_PARTITION_NAME
1646 };
1647
1648 void
1649 ped_disk_mac_init ()
1650 {
1651         PED_ASSERT (sizeof (MacRawPartition) == 512, return);
1652         PED_ASSERT (sizeof (MacRawDisk) == 512, return);
1653
1654         ped_disk_type_register (&mac_disk_type);
1655 }
1656
1657 void
1658 ped_disk_mac_done ()
1659 {
1660         ped_disk_type_unregister (&mac_disk_type);
1661 }