| /* vi: set sw=4 ts=4: */ |
| /* fdisk.c -- Partition table manipulator for Linux. |
| * |
| * Copyright (C) 1992 A. V. Le Blanc (LeBlanc@mcc.ac.uk) |
| * Copyright (C) 2001,2002 Vladimir Oleynik <dzo@simtreas.ru> (initial bb port) |
| * |
| * Licensed under the GPL v2 or later, see the file LICENSE in this tarball. |
| */ |
| |
| #include <assert.h> /* assert */ |
| #include "busybox.h" |
| #define _(x) x |
| |
| /* Looks like someone forgot to add this to config system */ |
| #ifndef ENABLE_FEATURE_FDISK_BLKSIZE |
| # define ENABLE_FEATURE_FDISK_BLKSIZE 0 |
| # define USE_FEATURE_FDISK_BLKSIZE(a) |
| #endif |
| |
| #define DEFAULT_SECTOR_SIZE 512 |
| #define MAX_SECTOR_SIZE 2048 |
| #define SECTOR_SIZE 512 /* still used in osf/sgi/sun code */ |
| #define MAXIMUM_PARTS 60 |
| |
| #define ACTIVE_FLAG 0x80 |
| |
| #define EXTENDED 0x05 |
| #define WIN98_EXTENDED 0x0f |
| #define LINUX_PARTITION 0x81 |
| #define LINUX_SWAP 0x82 |
| #define LINUX_NATIVE 0x83 |
| #define LINUX_EXTENDED 0x85 |
| #define LINUX_LVM 0x8e |
| #define LINUX_RAID 0xfd |
| |
| #define IS_EXTENDED(i) \ |
| ((i) == EXTENDED || (i) == WIN98_EXTENDED || (i) == LINUX_EXTENDED) |
| |
| #define SIZE(a) (sizeof(a)/sizeof((a)[0])) |
| |
| #define cround(n) (display_in_cyl_units ? ((n)/units_per_sector)+1 : (n)) |
| #define scround(x) (((x)+units_per_sector-1)/units_per_sector) |
| |
| struct hd_geometry { |
| unsigned char heads; |
| unsigned char sectors; |
| unsigned short cylinders; |
| unsigned long start; |
| }; |
| |
| #define HDIO_GETGEO 0x0301 /* get device geometry */ |
| |
| struct systypes { |
| const char *name; |
| }; |
| |
| static unsigned sector_size = DEFAULT_SECTOR_SIZE; |
| static unsigned user_set_sector_size; |
| static unsigned sector_offset = 1; |
| |
| /* |
| * Raw disk label. For DOS-type partition tables the MBR, |
| * with descriptions of the primary partitions. |
| */ |
| #if (MAX_SECTOR_SIZE) > (BUFSIZ+1) |
| static char MBRbuffer[MAX_SECTOR_SIZE]; |
| #else |
| # define MBRbuffer bb_common_bufsiz1 |
| #endif |
| |
| #if ENABLE_FEATURE_OSF_LABEL |
| static int possibly_osf_label; |
| #endif |
| |
| static unsigned heads, sectors, cylinders; |
| static void update_units(void); |
| |
| |
| /* |
| * return partition name - uses static storage unless buf is supplied |
| */ |
| static const char * |
| partname(const char *dev, int pno, int lth) |
| { |
| static char buffer[80]; |
| const char *p; |
| int w, wp; |
| int bufsiz; |
| char *bufp; |
| |
| bufp = buffer; |
| bufsiz = sizeof(buffer); |
| |
| w = strlen(dev); |
| p = ""; |
| |
| if (isdigit(dev[w-1])) |
| p = "p"; |
| |
| /* devfs kludge - note: fdisk partition names are not supposed |
| to equal kernel names, so there is no reason to do this */ |
| if (strcmp(dev + w - 4, "disc") == 0) { |
| w -= 4; |
| p = "part"; |
| } |
| |
| wp = strlen(p); |
| |
| if (lth) { |
| snprintf(bufp, bufsiz, "%*.*s%s%-2u", |
| lth-wp-2, w, dev, p, pno); |
| } else { |
| snprintf(bufp, bufsiz, "%.*s%s%-2u", w, dev, p, pno); |
| } |
| return bufp; |
| } |
| |
| struct partition { |
| unsigned char boot_ind; /* 0x80 - active */ |
| unsigned char head; /* starting head */ |
| unsigned char sector; /* starting sector */ |
| unsigned char cyl; /* starting cylinder */ |
| unsigned char sys_ind; /* What partition type */ |
| unsigned char end_head; /* end head */ |
| unsigned char end_sector; /* end sector */ |
| unsigned char end_cyl; /* end cylinder */ |
| unsigned char start4[4]; /* starting sector counting from 0 */ |
| unsigned char size4[4]; /* nr of sectors in partition */ |
| } ATTRIBUTE_PACKED; |
| |
| enum failure { |
| ioctl_error, unable_to_open, unable_to_read, unable_to_seek, |
| unable_to_write |
| }; |
| |
| enum label_type { |
| label_dos, label_sun, label_sgi, label_aix, label_osf |
| }; |
| #define LABEL_IS_DOS (label_dos == current_label_type) |
| |
| #if ENABLE_FEATURE_SUN_LABEL |
| #define LABEL_IS_SUN (label_sun == current_label_type) |
| #define STATIC_SUN static |
| #else |
| #define LABEL_IS_SUN 0 |
| #define STATIC_SUN extern |
| #endif |
| |
| #if ENABLE_FEATURE_SGI_LABEL |
| #define LABEL_IS_SGI (label_sgi == current_label_type) |
| #define STATIC_SGI static |
| #else |
| #define LABEL_IS_SGI 0 |
| #define STATIC_SGI extern |
| #endif |
| |
| #if ENABLE_FEATURE_AIX_LABEL |
| #define LABEL_IS_AIX (label_aix == current_label_type) |
| #define STATIC_AIX static |
| #else |
| #define LABEL_IS_AIX 0 |
| #define STATIC_AIX extern |
| #endif |
| |
| #if ENABLE_FEATURE_OSF_LABEL |
| #define LABEL_IS_OSF (label_osf == current_label_type) |
| #define STATIC_OSF static |
| #else |
| #define LABEL_IS_OSF 0 |
| #define STATIC_OSF extern |
| #endif |
| |
| enum action { fdisk, require, try_only, create_empty_dos, create_empty_sun }; |
| |
| static enum label_type current_label_type; |
| |
| static const char *disk_device; |
| static int fd; /* the disk */ |
| static int partitions = 4; /* maximum partition + 1 */ |
| static int display_in_cyl_units = 1; |
| static unsigned units_per_sector = 1; |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static void change_units(void); |
| static void reread_partition_table(int leave); |
| static void delete_partition(int i); |
| static int get_partition(int warn, int max); |
| static void list_types(const struct systypes *sys); |
| static unsigned read_int(unsigned low, unsigned dflt, unsigned high, unsigned base, char *mesg); |
| #endif |
| static const char *partition_type(unsigned char type); |
| static void fdisk_fatal(enum failure why) ATTRIBUTE_NORETURN; |
| static void get_geometry(void); |
| static int get_boot(enum action what); |
| |
| #define PLURAL 0 |
| #define SINGULAR 1 |
| |
| #define hex_val(c) ({ \ |
| char _c = (c); \ |
| isdigit(_c) ? _c - '0' : \ |
| tolower(_c) + 10 - 'a'; \ |
| }) |
| |
| |
| #define LINE_LENGTH 800 |
| #define pt_offset(b, n) ((struct partition *)((b) + 0x1be + \ |
| (n) * sizeof(struct partition))) |
| #define sector(s) ((s) & 0x3f) |
| #define cylinder(s, c) ((c) | (((s) & 0xc0) << 2)) |
| |
| #define hsc2sector(h,s,c) (sector(s) - 1 + sectors * \ |
| ((h) + heads * cylinder(s,c))) |
| #define set_hsc(h,s,c,sector) { \ |
| s = sector % sectors + 1; \ |
| sector /= sectors; \ |
| h = sector % heads; \ |
| sector /= heads; \ |
| c = sector & 0xff; \ |
| s |= (sector >> 2) & 0xc0; \ |
| } |
| |
| |
| static unsigned get_start_sect(const struct partition *p); |
| static unsigned get_nr_sects(const struct partition *p); |
| |
| /* |
| * per partition table entry data |
| * |
| * The four primary partitions have the same sectorbuffer (MBRbuffer) |
| * and have NULL ext_pointer. |
| * Each logical partition table entry has two pointers, one for the |
| * partition and one link to the next one. |
| */ |
| static struct pte { |
| struct partition *part_table; /* points into sectorbuffer */ |
| struct partition *ext_pointer; /* points into sectorbuffer */ |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| char changed; /* boolean */ |
| #endif |
| off_t offset; /* disk sector number */ |
| char *sectorbuffer; /* disk sector contents */ |
| } ptes[MAXIMUM_PARTS]; |
| |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static void |
| set_all_unchanged(void) |
| { |
| int i; |
| |
| for (i = 0; i < MAXIMUM_PARTS; i++) |
| ptes[i].changed = 0; |
| } |
| |
| static ATTRIBUTE_ALWAYS_INLINE void |
| set_changed(int i) |
| { |
| ptes[i].changed = 1; |
| } |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| |
| static ATTRIBUTE_ALWAYS_INLINE struct partition * |
| get_part_table(int i) |
| { |
| return ptes[i].part_table; |
| } |
| |
| static const char * |
| str_units(int n) |
| { /* n==1: use singular */ |
| if (n == 1) |
| return display_in_cyl_units ? _("cylinder") : _("sector"); |
| else |
| return display_in_cyl_units ? _("cylinders") : _("sectors"); |
| } |
| |
| static int |
| valid_part_table_flag(const char *mbuffer) |
| { |
| return (mbuffer[510] == 0x55 && (uint8_t)mbuffer[511] == 0xaa); |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static ATTRIBUTE_ALWAYS_INLINE void |
| write_part_table_flag(char *b) |
| { |
| b[510] = 0x55; |
| b[511] = 0xaa; |
| } |
| |
| static char line_buffer[LINE_LENGTH]; |
| static char *line_ptr; |
| |
| /* read line; return 0 or first char */ |
| static int |
| read_line(void) |
| { |
| fflush(stdout); /* requested by niles@scyld.com */ |
| line_ptr = line_buffer; |
| if (!fgets(line_buffer, LINE_LENGTH, stdin)) { |
| /* error or eof */ |
| bb_error_msg_and_die("\ngot EOF, exiting"); |
| } |
| while (*line_ptr && !isgraph(*line_ptr)) |
| line_ptr++; |
| return *line_ptr; |
| } |
| |
| static char |
| read_nonempty(const char *mesg) |
| { |
| do { |
| fputs(mesg, stdout); |
| } while (!read_line()); |
| return *line_ptr; |
| } |
| |
| static char |
| read_maybe_empty(const char *mesg) |
| { |
| fputs(mesg, stdout); |
| if (!read_line()) { |
| line_ptr = line_buffer; |
| *line_ptr = '\n'; |
| line_ptr[1] = 0; |
| } |
| return *line_ptr; |
| } |
| |
| static int |
| read_hex(const struct systypes *sys) |
| { |
| unsigned long v; |
| while (1) { |
| read_nonempty(_("Hex code (type L to list codes): ")); |
| if (*line_ptr == 'l' || *line_ptr == 'L') { |
| list_types(sys); |
| continue; |
| } |
| v = bb_strtoul(line_ptr, NULL, 16); |
| if (v > 0xff) |
| /* Bad input also triggers this */ |
| continue; |
| return v; |
| } |
| } |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| |
| #include "fdisk_aix.c" |
| |
| typedef struct { |
| unsigned char info[128]; /* Informative text string */ |
| unsigned char spare0[14]; |
| struct sun_info { |
| unsigned char spare1; |
| unsigned char id; |
| unsigned char spare2; |
| unsigned char flags; |
| } infos[8]; |
| unsigned char spare1[246]; /* Boot information etc. */ |
| unsigned short rspeed; /* Disk rotational speed */ |
| unsigned short pcylcount; /* Physical cylinder count */ |
| unsigned short sparecyl; /* extra sects per cylinder */ |
| unsigned char spare2[4]; /* More magic... */ |
| unsigned short ilfact; /* Interleave factor */ |
| unsigned short ncyl; /* Data cylinder count */ |
| unsigned short nacyl; /* Alt. cylinder count */ |
| unsigned short ntrks; /* Tracks per cylinder */ |
| unsigned short nsect; /* Sectors per track */ |
| unsigned char spare3[4]; /* Even more magic... */ |
| struct sun_partinfo { |
| uint32_t start_cylinder; |
| uint32_t num_sectors; |
| } partitions[8]; |
| unsigned short magic; /* Magic number */ |
| unsigned short csum; /* Label xor'd checksum */ |
| } sun_partition; |
| #define sunlabel ((sun_partition *)MBRbuffer) |
| #define SUNOS_SWAP 3 |
| #define SUN_WHOLE_DISK 5 |
| STATIC_OSF void bsd_select(void); |
| STATIC_OSF void xbsd_print_disklabel(int); |
| #include "fdisk_osf.c" |
| |
| #define SGI_VOLHDR 0x00 |
| /* 1 and 2 were used for drive types no longer supported by SGI */ |
| #define SGI_SWAP 0x03 |
| /* 4 and 5 were for filesystem types SGI haven't ever supported on MIPS CPUs */ |
| #define SGI_VOLUME 0x06 |
| #define SGI_EFS 0x07 |
| #define SGI_LVOL 0x08 |
| #define SGI_RLVOL 0x09 |
| #define SGI_XFS 0x0a |
| #define SGI_XFSLOG 0x0b |
| #define SGI_XLV 0x0c |
| #define SGI_XVM 0x0d |
| #define SGI_ENTIRE_DISK SGI_VOLUME |
| #if ENABLE_FEATURE_SGI_LABEL || ENABLE_FEATURE_SUN_LABEL |
| static uint16_t |
| fdisk_swap16(uint16_t x) |
| { |
| return (x << 8) | (x >> 8); |
| } |
| |
| static uint32_t |
| fdisk_swap32(uint32_t x) |
| { |
| return (x << 24) | |
| ((x & 0xFF00) << 8) | |
| ((x & 0xFF0000) >> 8) | |
| (x >> 24); |
| } |
| #endif |
| |
| STATIC_SGI const struct systypes sgi_sys_types[]; |
| STATIC_SGI unsigned sgi_get_num_sectors(int i); |
| STATIC_SGI int sgi_get_sysid(int i); |
| STATIC_SGI void sgi_delete_partition(int i); |
| STATIC_SGI void sgi_change_sysid(int i, int sys); |
| STATIC_SGI void sgi_list_table(int xtra); |
| STATIC_SGI void sgi_set_xcyl(void); |
| STATIC_SGI int verify_sgi(int verbose); |
| STATIC_SGI void sgi_add_partition(int n, int sys); |
| STATIC_SGI void sgi_set_swappartition(int i); |
| STATIC_SGI const char *sgi_get_bootfile(void); |
| STATIC_SGI void sgi_set_bootfile(const char* aFile); |
| STATIC_SGI void create_sgiinfo(void); |
| STATIC_SGI void sgi_write_table(void); |
| STATIC_SGI void sgi_set_bootpartition(int i); |
| |
| #include "fdisk_sgi.c" |
| |
| STATIC_SUN const struct systypes sun_sys_types[]; |
| STATIC_SUN void sun_delete_partition(int i); |
| STATIC_SUN void sun_change_sysid(int i, int sys); |
| STATIC_SUN void sun_list_table(int xtra); |
| STATIC_SUN void sun_set_xcyl(void); |
| STATIC_SUN void add_sun_partition(int n, int sys); |
| STATIC_SUN void sun_set_alt_cyl(void); |
| STATIC_SUN void sun_set_ncyl(int cyl); |
| STATIC_SUN void sun_set_xcyl(void); |
| STATIC_SUN void sun_set_ilfact(void); |
| STATIC_SUN void sun_set_rspeed(void); |
| STATIC_SUN void sun_set_pcylcount(void); |
| STATIC_SUN void toggle_sunflags(int i, unsigned char mask); |
| STATIC_SUN void verify_sun(void); |
| STATIC_SUN void sun_write_table(void); |
| #include "fdisk_sun.c" |
| |
| /* DOS partition types */ |
| |
| static const struct systypes i386_sys_types[] = { |
| { "\x00" "Empty" }, |
| { "\x01" "FAT12" }, |
| { "\x04" "FAT16 <32M" }, |
| { "\x05" "Extended" }, /* DOS 3.3+ extended partition */ |
| { "\x06" "FAT16" }, /* DOS 16-bit >=32M */ |
| { "\x07" "HPFS/NTFS" }, /* OS/2 IFS, eg, HPFS or NTFS or QNX */ |
| { "\x0a" "OS/2 Boot Manager" },/* OS/2 Boot Manager */ |
| { "\x0b" "Win95 FAT32" }, |
| { "\x0c" "Win95 FAT32 (LBA)" },/* LBA really is 'Extended Int 13h' */ |
| { "\x0e" "Win95 FAT16 (LBA)" }, |
| { "\x0f" "Win95 Ext'd (LBA)" }, |
| { "\x11" "Hidden FAT12" }, |
| { "\x12" "Compaq diagnostics" }, |
| { "\x14" "Hidden FAT16 <32M" }, |
| { "\x16" "Hidden FAT16" }, |
| { "\x17" "Hidden HPFS/NTFS" }, |
| { "\x1b" "Hidden Win95 FAT32" }, |
| { "\x1c" "Hidden Win95 FAT32 (LBA)" }, |
| { "\x1e" "Hidden Win95 FAT16 (LBA)" }, |
| { "\x3c" "PartitionMagic recovery" }, |
| { "\x41" "PPC PReP Boot" }, |
| { "\x42" "SFS" }, |
| { "\x63" "GNU HURD or SysV" }, /* GNU HURD or Mach or Sys V/386 (such as ISC UNIX) */ |
| { "\x80" "Old Minix" }, /* Minix 1.4a and earlier */ |
| { "\x81" "Minix / old Linux" },/* Minix 1.4b and later */ |
| { "\x82" "Linux swap" }, /* also Solaris */ |
| { "\x83" "Linux" }, |
| { "\x84" "OS/2 hidden C: drive" }, |
| { "\x85" "Linux extended" }, |
| { "\x86" "NTFS volume set" }, |
| { "\x87" "NTFS volume set" }, |
| { "\x8e" "Linux LVM" }, |
| { "\x9f" "BSD/OS" }, /* BSDI */ |
| { "\xa0" "IBM Thinkpad hibernation" }, |
| { "\xa5" "FreeBSD" }, /* various BSD flavours */ |
| { "\xa6" "OpenBSD" }, |
| { "\xa8" "Darwin UFS" }, |
| { "\xa9" "NetBSD" }, |
| { "\xab" "Darwin boot" }, |
| { "\xb7" "BSDI fs" }, |
| { "\xb8" "BSDI swap" }, |
| { "\xbe" "Solaris boot" }, |
| { "\xeb" "BeOS fs" }, |
| { "\xee" "EFI GPT" }, /* Intel EFI GUID Partition Table */ |
| { "\xef" "EFI (FAT-12/16/32)" },/* Intel EFI System Partition */ |
| { "\xf0" "Linux/PA-RISC boot" },/* Linux/PA-RISC boot loader */ |
| { "\xf2" "DOS secondary" }, /* DOS 3.3+ secondary */ |
| { "\xfd" "Linux raid autodetect" },/* New (2.2.x) raid partition with |
| autodetect using persistent |
| superblock */ |
| #if 0 /* ENABLE_WEIRD_PARTITION_TYPES */ |
| { "\x02" "XENIX root" }, |
| { "\x03" "XENIX usr" }, |
| { "\x08" "AIX" }, /* AIX boot (AIX -- PS/2 port) or SplitDrive */ |
| { "\x09" "AIX bootable" }, /* AIX data or Coherent */ |
| { "\x10" "OPUS" }, |
| { "\x18" "AST SmartSleep" }, |
| { "\x24" "NEC DOS" }, |
| { "\x39" "Plan 9" }, |
| { "\x40" "Venix 80286" }, |
| { "\x4d" "QNX4.x" }, |
| { "\x4e" "QNX4.x 2nd part" }, |
| { "\x4f" "QNX4.x 3rd part" }, |
| { "\x50" "OnTrack DM" }, |
| { "\x51" "OnTrack DM6 Aux1" }, /* (or Novell) */ |
| { "\x52" "CP/M" }, /* CP/M or Microport SysV/AT */ |
| { "\x53" "OnTrack DM6 Aux3" }, |
| { "\x54" "OnTrackDM6" }, |
| { "\x55" "EZ-Drive" }, |
| { "\x56" "Golden Bow" }, |
| { "\x5c" "Priam Edisk" }, |
| { "\x61" "SpeedStor" }, |
| { "\x64" "Novell Netware 286" }, |
| { "\x65" "Novell Netware 386" }, |
| { "\x70" "DiskSecure Multi-Boot" }, |
| { "\x75" "PC/IX" }, |
| { "\x93" "Amoeba" }, |
| { "\x94" "Amoeba BBT" }, /* (bad block table) */ |
| { "\xa7" "NeXTSTEP" }, |
| { "\xbb" "Boot Wizard hidden" }, |
| { "\xc1" "DRDOS/sec (FAT-12)" }, |
| { "\xc4" "DRDOS/sec (FAT-16 < 32M)" }, |
| { "\xc6" "DRDOS/sec (FAT-16)" }, |
| { "\xc7" "Syrinx" }, |
| { "\xda" "Non-FS data" }, |
| { "\xdb" "CP/M / CTOS / ..." },/* CP/M or Concurrent CP/M or |
| Concurrent DOS or CTOS */ |
| { "\xde" "Dell Utility" }, /* Dell PowerEdge Server utilities */ |
| { "\xdf" "BootIt" }, /* BootIt EMBRM */ |
| { "\xe1" "DOS access" }, /* DOS access or SpeedStor 12-bit FAT |
| extended partition */ |
| { "\xe3" "DOS R/O" }, /* DOS R/O or SpeedStor */ |
| { "\xe4" "SpeedStor" }, /* SpeedStor 16-bit FAT extended |
| partition < 1024 cyl. */ |
| { "\xf1" "SpeedStor" }, |
| { "\xf4" "SpeedStor" }, /* SpeedStor large partition */ |
| { "\xfe" "LANstep" }, /* SpeedStor >1024 cyl. or LANstep */ |
| { "\xff" "BBT" }, /* Xenix Bad Block Table */ |
| #endif |
| { 0 } |
| }; |
| |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| /* start_sect and nr_sects are stored little endian on all machines */ |
| /* moreover, they are not aligned correctly */ |
| static void |
| store4_little_endian(unsigned char *cp, unsigned val) |
| { |
| cp[0] = val; |
| cp[1] = val >> 8; |
| cp[2] = val >> 16; |
| cp[3] = val >> 24; |
| } |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| |
| static unsigned |
| read4_little_endian(const unsigned char *cp) |
| { |
| return cp[0] + (cp[1] << 8) + (cp[2] << 16) + (cp[3] << 24); |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static void |
| set_start_sect(struct partition *p, unsigned start_sect) |
| { |
| store4_little_endian(p->start4, start_sect); |
| } |
| #endif |
| |
| static unsigned |
| get_start_sect(const struct partition *p) |
| { |
| return read4_little_endian(p->start4); |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static void |
| set_nr_sects(struct partition *p, unsigned nr_sects) |
| { |
| store4_little_endian(p->size4, nr_sects); |
| } |
| #endif |
| |
| static unsigned |
| get_nr_sects(const struct partition *p) |
| { |
| return read4_little_endian(p->size4); |
| } |
| |
| /* normally O_RDWR, -l option gives O_RDONLY */ |
| static int type_open = O_RDWR; |
| |
| |
| static int ext_index; /* the prime extended partition */ |
| static int listing; /* no aborts for fdisk -l */ |
| static int dos_compatible_flag = ~0; |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static int dos_changed; |
| static int nowarn; /* no warnings for fdisk -l/-s */ |
| #endif |
| |
| |
| |
| static unsigned user_cylinders, user_heads, user_sectors; |
| static unsigned pt_heads, pt_sectors; |
| static unsigned kern_heads, kern_sectors; |
| |
| static off_t extended_offset; /* offset of link pointers */ |
| |
| static unsigned long long total_number_of_sectors; |
| |
| |
| static jmp_buf listingbuf; |
| |
| static void fdisk_fatal(enum failure why) |
| { |
| const char *message; |
| |
| if (listing) { |
| close(fd); |
| longjmp(listingbuf, 1); |
| } |
| |
| switch (why) { |
| case unable_to_open: |
| message = "\nUnable to open %s"; |
| break; |
| case unable_to_read: |
| message = "\nUnable to read %s"; |
| break; |
| case unable_to_seek: |
| message = "\nUnable to seek on %s"; |
| break; |
| case unable_to_write: |
| message = "\nUnable to write %s"; |
| break; |
| case ioctl_error: |
| message = "\nBLKGETSIZE ioctl failed on %s"; |
| break; |
| default: |
| message = "\nFatal error"; |
| } |
| |
| bb_error_msg_and_die(message, disk_device); |
| } |
| |
| static void |
| seek_sector(off_t secno) |
| { |
| off_t offset = secno * sector_size; |
| if (lseek(fd, offset, SEEK_SET) == (off_t) -1) |
| fdisk_fatal(unable_to_seek); |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static void |
| write_sector(off_t secno, char *buf) |
| { |
| seek_sector(secno); |
| if (write(fd, buf, sector_size) != sector_size) |
| fdisk_fatal(unable_to_write); |
| } |
| #endif |
| |
| /* Allocate a buffer and read a partition table sector */ |
| static void |
| read_pte(struct pte *pe, off_t offset) |
| { |
| pe->offset = offset; |
| pe->sectorbuffer = xmalloc(sector_size); |
| seek_sector(offset); |
| if (read(fd, pe->sectorbuffer, sector_size) != sector_size) |
| fdisk_fatal(unable_to_read); |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| pe->changed = 0; |
| #endif |
| pe->part_table = pe->ext_pointer = NULL; |
| } |
| |
| static unsigned |
| get_partition_start(const struct pte *pe) |
| { |
| return pe->offset + get_start_sect(pe->part_table); |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| /* |
| * Avoid warning about DOS partitions when no DOS partition was changed. |
| * Here a heuristic "is probably dos partition". |
| * We might also do the opposite and warn in all cases except |
| * for "is probably nondos partition". |
| */ |
| static int |
| is_dos_partition(int t) |
| { |
| return (t == 1 || t == 4 || t == 6 || |
| t == 0x0b || t == 0x0c || t == 0x0e || |
| t == 0x11 || t == 0x12 || t == 0x14 || t == 0x16 || |
| t == 0x1b || t == 0x1c || t == 0x1e || t == 0x24 || |
| t == 0xc1 || t == 0xc4 || t == 0xc6); |
| } |
| |
| static void |
| menu(void) |
| { |
| if (LABEL_IS_SUN) { |
| puts(_("Command action")); |
| puts(_("\ta\ttoggle a read only flag")); /* sun */ |
| puts(_("\tb\tedit bsd disklabel")); |
| puts(_("\tc\ttoggle the mountable flag")); /* sun */ |
| puts(_("\td\tdelete a partition")); |
| puts(_("\tl\tlist known partition types")); |
| puts(_("\tm\tprint this menu")); |
| puts(_("\tn\tadd a new partition")); |
| puts(_("\to\tcreate a new empty DOS partition table")); |
| puts(_("\tp\tprint the partition table")); |
| puts(_("\tq\tquit without saving changes")); |
| puts(_("\ts\tcreate a new empty Sun disklabel")); /* sun */ |
| puts(_("\tt\tchange a partition's system id")); |
| puts(_("\tu\tchange display/entry units")); |
| puts(_("\tv\tverify the partition table")); |
| puts(_("\tw\twrite table to disk and exit")); |
| #if ENABLE_FEATURE_FDISK_ADVANCED |
| puts(_("\tx\textra functionality (experts only)")); |
| #endif |
| } else |
| if (LABEL_IS_SGI) { |
| puts(_("Command action")); |
| puts(_("\ta\tselect bootable partition")); /* sgi flavour */ |
| puts(_("\tb\tedit bootfile entry")); /* sgi */ |
| puts(_("\tc\tselect sgi swap partition")); /* sgi flavour */ |
| puts(_("\td\tdelete a partition")); |
| puts(_("\tl\tlist known partition types")); |
| puts(_("\tm\tprint this menu")); |
| puts(_("\tn\tadd a new partition")); |
| puts(_("\to\tcreate a new empty DOS partition table")); |
| puts(_("\tp\tprint the partition table")); |
| puts(_("\tq\tquit without saving changes")); |
| puts(_("\ts\tcreate a new empty Sun disklabel")); /* sun */ |
| puts(_("\tt\tchange a partition's system id")); |
| puts(_("\tu\tchange display/entry units")); |
| puts(_("\tv\tverify the partition table")); |
| puts(_("\tw\twrite table to disk and exit")); |
| } else |
| if (LABEL_IS_AIX) { |
| puts(_("Command action")); |
| puts(_("\tm\tprint this menu")); |
| puts(_("\to\tcreate a new empty DOS partition table")); |
| puts(_("\tq\tquit without saving changes")); |
| puts(_("\ts\tcreate a new empty Sun disklabel")); /* sun */ |
| } else |
| { |
| puts(_("Command action")); |
| puts(_("\ta\ttoggle a bootable flag")); |
| puts(_("\tb\tedit bsd disklabel")); |
| puts(_("\tc\ttoggle the dos compatibility flag")); |
| puts(_("\td\tdelete a partition")); |
| puts(_("\tl\tlist known partition types")); |
| puts(_("\tm\tprint this menu")); |
| puts(_("\tn\tadd a new partition")); |
| puts(_("\to\tcreate a new empty DOS partition table")); |
| puts(_("\tp\tprint the partition table")); |
| puts(_("\tq\tquit without saving changes")); |
| puts(_("\ts\tcreate a new empty Sun disklabel")); /* sun */ |
| puts(_("\tt\tchange a partition's system id")); |
| puts(_("\tu\tchange display/entry units")); |
| puts(_("\tv\tverify the partition table")); |
| puts(_("\tw\twrite table to disk and exit")); |
| #if ENABLE_FEATURE_FDISK_ADVANCED |
| puts(_("\tx\textra functionality (experts only)")); |
| #endif |
| } |
| } |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| |
| |
| #if ENABLE_FEATURE_FDISK_ADVANCED |
| static void |
| xmenu(void) |
| { |
| if (LABEL_IS_SUN) { |
| puts(_("Command action")); |
| puts(_("\ta\tchange number of alternate cylinders")); /*sun*/ |
| puts(_("\tc\tchange number of cylinders")); |
| puts(_("\td\tprint the raw data in the partition table")); |
| puts(_("\te\tchange number of extra sectors per cylinder"));/*sun*/ |
| puts(_("\th\tchange number of heads")); |
| puts(_("\ti\tchange interleave factor")); /*sun*/ |
| puts(_("\to\tchange rotation speed (rpm)")); /*sun*/ |
| puts(_("\tm\tprint this menu")); |
| puts(_("\tp\tprint the partition table")); |
| puts(_("\tq\tquit without saving changes")); |
| puts(_("\tr\treturn to main menu")); |
| puts(_("\ts\tchange number of sectors/track")); |
| puts(_("\tv\tverify the partition table")); |
| puts(_("\tw\twrite table to disk and exit")); |
| puts(_("\ty\tchange number of physical cylinders")); /*sun*/ |
| } else |
| if (LABEL_IS_SGI) { |
| puts(_("Command action")); |
| puts(_("\tb\tmove beginning of data in a partition")); /* !sun */ |
| puts(_("\tc\tchange number of cylinders")); |
| puts(_("\td\tprint the raw data in the partition table")); |
| puts(_("\te\tlist extended partitions")); /* !sun */ |
| puts(_("\tg\tcreate an IRIX (SGI) partition table"));/* sgi */ |
| puts(_("\th\tchange number of heads")); |
| puts(_("\tm\tprint this menu")); |
| puts(_("\tp\tprint the partition table")); |
| puts(_("\tq\tquit without saving changes")); |
| puts(_("\tr\treturn to main menu")); |
| puts(_("\ts\tchange number of sectors/track")); |
| puts(_("\tv\tverify the partition table")); |
| puts(_("\tw\twrite table to disk and exit")); |
| } else |
| if (LABEL_IS_AIX) { |
| puts(_("Command action")); |
| puts(_("\tb\tmove beginning of data in a partition")); /* !sun */ |
| puts(_("\tc\tchange number of cylinders")); |
| puts(_("\td\tprint the raw data in the partition table")); |
| puts(_("\te\tlist extended partitions")); /* !sun */ |
| puts(_("\tg\tcreate an IRIX (SGI) partition table"));/* sgi */ |
| puts(_("\th\tchange number of heads")); |
| puts(_("\tm\tprint this menu")); |
| puts(_("\tp\tprint the partition table")); |
| puts(_("\tq\tquit without saving changes")); |
| puts(_("\tr\treturn to main menu")); |
| puts(_("\ts\tchange number of sectors/track")); |
| puts(_("\tv\tverify the partition table")); |
| puts(_("\tw\twrite table to disk and exit")); |
| } else { |
| puts(_("Command action")); |
| puts(_("\tb\tmove beginning of data in a partition")); /* !sun */ |
| puts(_("\tc\tchange number of cylinders")); |
| puts(_("\td\tprint the raw data in the partition table")); |
| puts(_("\te\tlist extended partitions")); /* !sun */ |
| puts(_("\tf\tfix partition order")); /* !sun, !aix, !sgi */ |
| #if ENABLE_FEATURE_SGI_LABEL |
| puts(_("\tg\tcreate an IRIX (SGI) partition table"));/* sgi */ |
| #endif |
| puts(_("\th\tchange number of heads")); |
| puts(_("\tm\tprint this menu")); |
| puts(_("\tp\tprint the partition table")); |
| puts(_("\tq\tquit without saving changes")); |
| puts(_("\tr\treturn to main menu")); |
| puts(_("\ts\tchange number of sectors/track")); |
| puts(_("\tv\tverify the partition table")); |
| puts(_("\tw\twrite table to disk and exit")); |
| } |
| } |
| #endif /* ADVANCED mode */ |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static const struct systypes * |
| get_sys_types(void) |
| { |
| return ( |
| LABEL_IS_SUN ? sun_sys_types : |
| LABEL_IS_SGI ? sgi_sys_types : |
| i386_sys_types); |
| } |
| #else |
| #define get_sys_types() i386_sys_types |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| |
| static const char *partition_type(unsigned char type) |
| { |
| int i; |
| const struct systypes *types = get_sys_types(); |
| |
| for (i = 0; types[i].name; i++) |
| if ((unsigned char )types[i].name[0] == type) |
| return types[i].name + 1; |
| |
| return _("Unknown"); |
| } |
| |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static int |
| get_sysid(int i) |
| { |
| return LABEL_IS_SUN ? sunlabel->infos[i].id : |
| (LABEL_IS_SGI ? sgi_get_sysid(i) : |
| ptes[i].part_table->sys_ind); |
| } |
| |
| void list_types(const struct systypes *sys) |
| { |
| unsigned last[4], done = 0, next = 0, size; |
| int i; |
| |
| for (i = 0; sys[i].name; i++); |
| size = i; |
| |
| for (i = 3; i >= 0; i--) |
| last[3 - i] = done += (size + i - done) / (i + 1); |
| i = done = 0; |
| |
| do { |
| printf("%c%2x %-15.15s", i ? ' ' : '\n', |
| (unsigned char)sys[next].name[0], |
| partition_type((unsigned char)sys[next].name[0])); |
| next = last[i++] + done; |
| if (i > 3 || next >= last[i]) { |
| i = 0; |
| next = ++done; |
| } |
| } while (done < last[0]); |
| putchar('\n'); |
| } |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| |
| static int |
| is_cleared_partition(const struct partition *p) |
| { |
| return !(!p || p->boot_ind || p->head || p->sector || p->cyl || |
| p->sys_ind || p->end_head || p->end_sector || p->end_cyl || |
| get_start_sect(p) || get_nr_sects(p)); |
| } |
| |
| static void |
| clear_partition(struct partition *p) |
| { |
| if (!p) |
| return; |
| memset(p, 0, sizeof(struct partition)); |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static void |
| set_partition(int i, int doext, off_t start, off_t stop, int sysid) |
| { |
| struct partition *p; |
| off_t offset; |
| |
| if (doext) { |
| p = ptes[i].ext_pointer; |
| offset = extended_offset; |
| } else { |
| p = ptes[i].part_table; |
| offset = ptes[i].offset; |
| } |
| p->boot_ind = 0; |
| p->sys_ind = sysid; |
| set_start_sect(p, start - offset); |
| set_nr_sects(p, stop - start + 1); |
| if (dos_compatible_flag && (start/(sectors*heads) > 1023)) |
| start = heads*sectors*1024 - 1; |
| set_hsc(p->head, p->sector, p->cyl, start); |
| if (dos_compatible_flag && (stop/(sectors*heads) > 1023)) |
| stop = heads*sectors*1024 - 1; |
| set_hsc(p->end_head, p->end_sector, p->end_cyl, stop); |
| ptes[i].changed = 1; |
| } |
| #endif |
| |
| static int |
| test_c(const char **m, const char *mesg) |
| { |
| int val = 0; |
| if (!*m) |
| printf(_("You must set")); |
| else { |
| printf(" %s", *m); |
| val = 1; |
| } |
| *m = mesg; |
| return val; |
| } |
| |
| static int |
| warn_geometry(void) |
| { |
| const char *m = NULL; |
| int prev = 0; |
| |
| if (!heads) |
| prev = test_c(&m, _("heads")); |
| if (!sectors) |
| prev = test_c(&m, _("sectors")); |
| if (!cylinders) |
| prev = test_c(&m, _("cylinders")); |
| if (!m) |
| return 0; |
| |
| printf("%s%s.\n" |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| "You can do this from the extra functions menu.\n" |
| #endif |
| , prev ? _(" and ") : " ", m); |
| |
| return 1; |
| } |
| |
| static void update_units(void) |
| { |
| int cyl_units = heads * sectors; |
| |
| if (display_in_cyl_units && cyl_units) |
| units_per_sector = cyl_units; |
| else |
| units_per_sector = 1; /* in sectors */ |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static void |
| warn_cylinders(void) |
| { |
| if (LABEL_IS_DOS && cylinders > 1024 && !nowarn) |
| printf(_("\n" |
| "The number of cylinders for this disk is set to %d.\n" |
| "There is nothing wrong with that, but this is larger than 1024,\n" |
| "and could in certain setups cause problems with:\n" |
| "1) software that runs at boot time (e.g., old versions of LILO)\n" |
| "2) booting and partitioning software from other OSs\n" |
| " (e.g., DOS FDISK, OS/2 FDISK)\n"), |
| cylinders); |
| } |
| #endif |
| |
| static void |
| read_extended(int ext) |
| { |
| int i; |
| struct pte *pex; |
| struct partition *p, *q; |
| |
| ext_index = ext; |
| pex = &ptes[ext]; |
| pex->ext_pointer = pex->part_table; |
| |
| p = pex->part_table; |
| if (!get_start_sect(p)) { |
| printf(_("Bad offset in primary extended partition\n")); |
| return; |
| } |
| |
| while (IS_EXTENDED(p->sys_ind)) { |
| struct pte *pe = &ptes[partitions]; |
| |
| if (partitions >= MAXIMUM_PARTS) { |
| /* This is not a Linux restriction, but |
| this program uses arrays of size MAXIMUM_PARTS. |
| Do not try to 'improve' this test. */ |
| struct pte *pre = &ptes[partitions-1]; |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| printf(_("Warning: deleting partitions after %d\n"), |
| partitions); |
| pre->changed = 1; |
| #endif |
| clear_partition(pre->ext_pointer); |
| return; |
| } |
| |
| read_pte(pe, extended_offset + get_start_sect(p)); |
| |
| if (!extended_offset) |
| extended_offset = get_start_sect(p); |
| |
| q = p = pt_offset(pe->sectorbuffer, 0); |
| for (i = 0; i < 4; i++, p++) if (get_nr_sects(p)) { |
| if (IS_EXTENDED(p->sys_ind)) { |
| if (pe->ext_pointer) |
| printf(_("Warning: extra link " |
| "pointer in partition table" |
| " %d\n"), partitions + 1); |
| else |
| pe->ext_pointer = p; |
| } else if (p->sys_ind) { |
| if (pe->part_table) |
| printf(_("Warning: ignoring extra " |
| "data in partition table" |
| " %d\n"), partitions + 1); |
| else |
| pe->part_table = p; |
| } |
| } |
| |
| /* very strange code here... */ |
| if (!pe->part_table) { |
| if (q != pe->ext_pointer) |
| pe->part_table = q; |
| else |
| pe->part_table = q + 1; |
| } |
| if (!pe->ext_pointer) { |
| if (q != pe->part_table) |
| pe->ext_pointer = q; |
| else |
| pe->ext_pointer = q + 1; |
| } |
| |
| p = pe->ext_pointer; |
| partitions++; |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| /* remove empty links */ |
| remove: |
| for (i = 4; i < partitions; i++) { |
| struct pte *pe = &ptes[i]; |
| |
| if (!get_nr_sects(pe->part_table) && |
| (partitions > 5 || ptes[4].part_table->sys_ind)) { |
| printf("omitting empty partition (%d)\n", i+1); |
| delete_partition(i); |
| goto remove; /* numbering changed */ |
| } |
| } |
| #endif |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static void |
| create_doslabel(void) |
| { |
| int i; |
| |
| printf( |
| _("Building a new DOS disklabel. Changes will remain in memory only,\n" |
| "until you decide to write them. After that, of course, the previous\n" |
| "content won't be recoverable.\n\n")); |
| |
| current_label_type = label_dos; |
| |
| #if ENABLE_FEATURE_OSF_LABEL |
| possibly_osf_label = 0; |
| #endif |
| partitions = 4; |
| |
| for (i = 510-64; i < 510; i++) |
| MBRbuffer[i] = 0; |
| write_part_table_flag(MBRbuffer); |
| extended_offset = 0; |
| set_all_unchanged(); |
| set_changed(0); |
| get_boot(create_empty_dos); |
| } |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| |
| static void |
| get_sectorsize(void) |
| { |
| if (!user_set_sector_size) { |
| int arg; |
| if (ioctl(fd, BLKSSZGET, &arg) == 0) |
| sector_size = arg; |
| if (sector_size != DEFAULT_SECTOR_SIZE) |
| printf(_("Note: sector size is %d (not %d)\n"), |
| sector_size, DEFAULT_SECTOR_SIZE); |
| } |
| } |
| |
| static void |
| get_kernel_geometry(void) |
| { |
| struct hd_geometry geometry; |
| |
| if (!ioctl(fd, HDIO_GETGEO, &geometry)) { |
| kern_heads = geometry.heads; |
| kern_sectors = geometry.sectors; |
| /* never use geometry.cylinders - it is truncated */ |
| } |
| } |
| |
| static void |
| get_partition_table_geometry(void) |
| { |
| const unsigned char *bufp = (const unsigned char *)MBRbuffer; |
| struct partition *p; |
| int i, h, s, hh, ss; |
| int first = 1; |
| int bad = 0; |
| |
| if (!(valid_part_table_flag((char*)bufp))) |
| return; |
| |
| hh = ss = 0; |
| for (i = 0; i < 4; i++) { |
| p = pt_offset(bufp, i); |
| if (p->sys_ind != 0) { |
| h = p->end_head + 1; |
| s = (p->end_sector & 077); |
| if (first) { |
| hh = h; |
| ss = s; |
| first = 0; |
| } else if (hh != h || ss != s) |
| bad = 1; |
| } |
| } |
| |
| if (!first && !bad) { |
| pt_heads = hh; |
| pt_sectors = ss; |
| } |
| } |
| |
| static void |
| get_geometry(void) |
| { |
| int sec_fac; |
| unsigned long long bytes; /* really u64 */ |
| |
| get_sectorsize(); |
| sec_fac = sector_size / 512; |
| #if ENABLE_FEATURE_SUN_LABEL |
| guess_device_type(); |
| #endif |
| heads = cylinders = sectors = 0; |
| kern_heads = kern_sectors = 0; |
| pt_heads = pt_sectors = 0; |
| |
| get_kernel_geometry(); |
| get_partition_table_geometry(); |
| |
| heads = user_heads ? user_heads : |
| pt_heads ? pt_heads : |
| kern_heads ? kern_heads : 255; |
| sectors = user_sectors ? user_sectors : |
| pt_sectors ? pt_sectors : |
| kern_sectors ? kern_sectors : 63; |
| if (ioctl(fd, BLKGETSIZE64, &bytes) == 0) { |
| /* got bytes */ |
| } else { |
| unsigned long longsectors; |
| |
| if (ioctl(fd, BLKGETSIZE, &longsectors)) |
| longsectors = 0; |
| bytes = ((unsigned long long) longsectors) << 9; |
| } |
| |
| total_number_of_sectors = (bytes >> 9); |
| |
| sector_offset = 1; |
| if (dos_compatible_flag) |
| sector_offset = sectors; |
| |
| cylinders = total_number_of_sectors / (heads * sectors * sec_fac); |
| if (!cylinders) |
| cylinders = user_cylinders; |
| } |
| |
| /* |
| * Read MBR. Returns: |
| * -1: no 0xaa55 flag present (possibly entire disk BSD) |
| * 0: found or created label |
| * 1: I/O error |
| */ |
| static int |
| get_boot(enum action what) |
| { |
| int i; |
| |
| partitions = 4; |
| |
| for (i = 0; i < 4; i++) { |
| struct pte *pe = &ptes[i]; |
| |
| pe->part_table = pt_offset(MBRbuffer, i); |
| pe->ext_pointer = NULL; |
| pe->offset = 0; |
| pe->sectorbuffer = MBRbuffer; |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| pe->changed = (what == create_empty_dos); |
| #endif |
| } |
| |
| #if ENABLE_FEATURE_SUN_LABEL |
| if (what == create_empty_sun && check_sun_label()) |
| return 0; |
| #endif |
| |
| memset(MBRbuffer, 0, 512); |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| if (what == create_empty_dos) |
| goto got_dos_table; /* skip reading disk */ |
| |
| if ((fd = open(disk_device, type_open)) < 0) { |
| if ((fd = open(disk_device, O_RDONLY)) < 0) { |
| if (what == try_only) |
| return 1; |
| fdisk_fatal(unable_to_open); |
| } else |
| printf(_("You will not be able to write " |
| "the partition table.\n")); |
| } |
| |
| if (512 != read(fd, MBRbuffer, 512)) { |
| if (what == try_only) |
| return 1; |
| fdisk_fatal(unable_to_read); |
| } |
| #else |
| if ((fd = open(disk_device, O_RDONLY)) < 0) |
| return 1; |
| if (512 != read(fd, MBRbuffer, 512)) |
| return 1; |
| #endif |
| |
| get_geometry(); |
| |
| update_units(); |
| |
| #if ENABLE_FEATURE_SUN_LABEL |
| if (check_sun_label()) |
| return 0; |
| #endif |
| |
| #if ENABLE_FEATURE_SGI_LABEL |
| if (check_sgi_label()) |
| return 0; |
| #endif |
| |
| #if ENABLE_FEATURE_AIX_LABEL |
| if (check_aix_label()) |
| return 0; |
| #endif |
| |
| #if ENABLE_FEATURE_OSF_LABEL |
| if (check_osf_label()) { |
| possibly_osf_label = 1; |
| if (!valid_part_table_flag(MBRbuffer)) { |
| current_label_type = label_osf; |
| return 0; |
| } |
| printf(_("This disk has both DOS and BSD magic.\n" |
| "Give the 'b' command to go to BSD mode.\n")); |
| } |
| #endif |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| got_dos_table: |
| #endif |
| |
| if (!valid_part_table_flag(MBRbuffer)) { |
| #ifndef CONFIG_FEATURE_FDISK_WRITABLE |
| return -1; |
| #else |
| switch (what) { |
| case fdisk: |
| printf(_("Device contains neither a valid DOS " |
| "partition table, nor Sun, SGI or OSF " |
| "disklabel\n")); |
| #ifdef __sparc__ |
| #if ENABLE_FEATURE_SUN_LABEL |
| create_sunlabel(); |
| #endif |
| #else |
| create_doslabel(); |
| #endif |
| return 0; |
| case try_only: |
| return -1; |
| case create_empty_dos: |
| #if ENABLE_FEATURE_SUN_LABEL |
| case create_empty_sun: |
| #endif |
| break; |
| default: |
| bb_error_msg_and_die(_("internal error")); |
| } |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| warn_cylinders(); |
| #endif |
| warn_geometry(); |
| |
| for (i = 0; i < 4; i++) { |
| struct pte *pe = &ptes[i]; |
| |
| if (IS_EXTENDED(pe->part_table->sys_ind)) { |
| if (partitions != 4) |
| printf(_("Ignoring extra extended " |
| "partition %d\n"), i + 1); |
| else |
| read_extended(i); |
| } |
| } |
| |
| for (i = 3; i < partitions; i++) { |
| struct pte *pe = &ptes[i]; |
| |
| if (!valid_part_table_flag(pe->sectorbuffer)) { |
| printf(_("Warning: invalid flag 0x%02x,0x%02x of partition " |
| "table %d will be corrected by w(rite)\n"), |
| pe->sectorbuffer[510], |
| pe->sectorbuffer[511], |
| i + 1); |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| pe->changed = 1; |
| #endif |
| } |
| } |
| |
| return 0; |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| /* |
| * Print the message MESG, then read an integer between LOW and HIGH (inclusive). |
| * If the user hits Enter, DFLT is returned. |
| * Answers like +10 are interpreted as offsets from BASE. |
| * |
| * There is no default if DFLT is not between LOW and HIGH. |
| */ |
| static unsigned |
| read_int(unsigned low, unsigned dflt, unsigned high, unsigned base, char *mesg) |
| { |
| unsigned i; |
| int default_ok = 1; |
| const char *fmt = "%s (%u-%u, default %u): "; |
| |
| if (dflt < low || dflt > high) { |
| fmt = "%s (%u-%u): "; |
| default_ok = 0; |
| } |
| |
| while (1) { |
| int use_default = default_ok; |
| |
| /* ask question and read answer */ |
| do { |
| printf(fmt, mesg, low, high, dflt); |
| read_maybe_empty(""); |
| } while (*line_ptr != '\n' && !isdigit(*line_ptr) |
| && *line_ptr != '-' && *line_ptr != '+'); |
| |
| if (*line_ptr == '+' || *line_ptr == '-') { |
| int minus = (*line_ptr == '-'); |
| int absolute = 0; |
| |
| i = atoi(line_ptr + 1); |
| |
| while (isdigit(*++line_ptr)) |
| use_default = 0; |
| |
| switch (*line_ptr) { |
| case 'c': |
| case 'C': |
| if (!display_in_cyl_units) |
| i *= heads * sectors; |
| break; |
| case 'K': |
| absolute = 1024; |
| break; |
| case 'k': |
| absolute = 1000; |
| break; |
| case 'm': |
| case 'M': |
| absolute = 1000000; |
| break; |
| case 'g': |
| case 'G': |
| absolute = 1000000000; |
| break; |
| default: |
| break; |
| } |
| if (absolute) { |
| unsigned long long bytes; |
| unsigned long unit; |
| |
| bytes = (unsigned long long) i * absolute; |
| unit = sector_size * units_per_sector; |
| bytes += unit/2; /* round */ |
| bytes /= unit; |
| i = bytes; |
| } |
| if (minus) |
| i = -i; |
| i += base; |
| } else { |
| i = atoi(line_ptr); |
| while (isdigit(*line_ptr)) { |
| line_ptr++; |
| use_default = 0; |
| } |
| } |
| if (use_default) |
| printf(_("Using default value %u\n"), i = dflt); |
| if (i >= low && i <= high) |
| break; |
| else |
| printf(_("Value is out of range\n")); |
| } |
| return i; |
| } |
| |
| static int |
| get_partition(int warn, int max) |
| { |
| struct pte *pe; |
| int i; |
| |
| i = read_int(1, 0, max, 0, _("Partition number")) - 1; |
| pe = &ptes[i]; |
| |
| if (warn) { |
| if ((!LABEL_IS_SUN && !LABEL_IS_SGI && !pe->part_table->sys_ind) |
| || (LABEL_IS_SUN && (!sunlabel->partitions[i].num_sectors || !sunlabel->infos[i].id)) |
| || (LABEL_IS_SGI && !sgi_get_num_sectors(i)) |
| ) { |
| printf(_("Warning: partition %d has empty type\n"), i+1); |
| } |
| } |
| return i; |
| } |
| |
| static int |
| get_existing_partition(int warn, int max) |
| { |
| int pno = -1; |
| int i; |
| |
| for (i = 0; i < max; i++) { |
| struct pte *pe = &ptes[i]; |
| struct partition *p = pe->part_table; |
| |
| if (p && !is_cleared_partition(p)) { |
| if (pno >= 0) |
| goto not_unique; |
| pno = i; |
| } |
| } |
| if (pno >= 0) { |
| printf(_("Selected partition %d\n"), pno+1); |
| return pno; |
| } |
| printf(_("No partition is defined yet!\n")); |
| return -1; |
| |
| not_unique: |
| return get_partition(warn, max); |
| } |
| |
| static int |
| get_nonexisting_partition(int warn, int max) |
| { |
| int pno = -1; |
| int i; |
| |
| for (i = 0; i < max; i++) { |
| struct pte *pe = &ptes[i]; |
| struct partition *p = pe->part_table; |
| |
| if (p && is_cleared_partition(p)) { |
| if (pno >= 0) |
| goto not_unique; |
| pno = i; |
| } |
| } |
| if (pno >= 0) { |
| printf(_("Selected partition %d\n"), pno+1); |
| return pno; |
| } |
| printf(_("All primary partitions have been defined already!\n")); |
| return -1; |
| |
| not_unique: |
| return get_partition(warn, max); |
| } |
| |
| |
| static void |
| change_units(void) |
| { |
| display_in_cyl_units = !display_in_cyl_units; |
| update_units(); |
| printf(_("Changing display/entry units to %s\n"), |
| str_units(PLURAL)); |
| } |
| |
| static void |
| toggle_active(int i) |
| { |
| struct pte *pe = &ptes[i]; |
| struct partition *p = pe->part_table; |
| |
| if (IS_EXTENDED(p->sys_ind) && !p->boot_ind) |
| printf(_("WARNING: Partition %d is an extended partition\n"), i + 1); |
| p->boot_ind = (p->boot_ind ? 0 : ACTIVE_FLAG); |
| pe->changed = 1; |
| } |
| |
| static void |
| toggle_dos_compatibility_flag(void) |
| { |
| dos_compatible_flag = ~dos_compatible_flag; |
| if (dos_compatible_flag) { |
| sector_offset = sectors; |
| printf(_("DOS Compatibility flag is set\n")); |
| } |
| else { |
| sector_offset = 1; |
| printf(_("DOS Compatibility flag is not set\n")); |
| } |
| } |
| |
| static void |
| delete_partition(int i) |
| { |
| struct pte *pe = &ptes[i]; |
| struct partition *p = pe->part_table; |
| struct partition *q = pe->ext_pointer; |
| |
| /* Note that for the fifth partition (i == 4) we don't actually |
| * decrement partitions. |
| */ |
| |
| if (warn_geometry()) |
| return; /* C/H/S not set */ |
| pe->changed = 1; |
| |
| if (LABEL_IS_SUN) { |
| sun_delete_partition(i); |
| return; |
| } |
| if (LABEL_IS_SGI) { |
| sgi_delete_partition(i); |
| return; |
| } |
| |
| if (i < 4) { |
| if (IS_EXTENDED(p->sys_ind) && i == ext_index) { |
| partitions = 4; |
| ptes[ext_index].ext_pointer = NULL; |
| extended_offset = 0; |
| } |
| clear_partition(p); |
| return; |
| } |
| |
| if (!q->sys_ind && i > 4) { |
| /* the last one in the chain - just delete */ |
| --partitions; |
| --i; |
| clear_partition(ptes[i].ext_pointer); |
| ptes[i].changed = 1; |
| } else { |
| /* not the last one - further ones will be moved down */ |
| if (i > 4) { |
| /* delete this link in the chain */ |
| p = ptes[i-1].ext_pointer; |
| *p = *q; |
| set_start_sect(p, get_start_sect(q)); |
| set_nr_sects(p, get_nr_sects(q)); |
| ptes[i-1].changed = 1; |
| } else if (partitions > 5) { /* 5 will be moved to 4 */ |
| /* the first logical in a longer chain */ |
| pe = &ptes[5]; |
| |
| if (pe->part_table) /* prevent SEGFAULT */ |
| set_start_sect(pe->part_table, |
| get_partition_start(pe) - |
| extended_offset); |
| pe->offset = extended_offset; |
| pe->changed = 1; |
| } |
| |
| if (partitions > 5) { |
| partitions--; |
| while (i < partitions) { |
| ptes[i] = ptes[i+1]; |
| i++; |
| } |
| } else |
| /* the only logical: clear only */ |
| clear_partition(ptes[i].part_table); |
| } |
| } |
| |
| static void |
| change_sysid(void) |
| { |
| int i, sys, origsys; |
| struct partition *p; |
| |
| /* If sgi_label then don't use get_existing_partition, |
| let the user select a partition, since get_existing_partition() |
| only works for Linux like partition tables. */ |
| if (!LABEL_IS_SGI) { |
| i = get_existing_partition(0, partitions); |
| } else { |
| i = get_partition(0, partitions); |
| } |
| if (i == -1) |
| return; |
| p = ptes[i].part_table; |
| origsys = sys = get_sysid(i); |
| |
| /* if changing types T to 0 is allowed, then |
| the reverse change must be allowed, too */ |
| if (!sys && !LABEL_IS_SGI && !LABEL_IS_SUN && !get_nr_sects(p)) { |
| printf(_("Partition %d does not exist yet!\n"), i + 1); |
| return; |
| } |
| while (1) { |
| sys = read_hex (get_sys_types()); |
| |
| if (!sys && !LABEL_IS_SGI && !LABEL_IS_SUN) { |
| printf(_("Type 0 means free space to many systems\n" |
| "(but not to Linux). Having partitions of\n" |
| "type 0 is probably unwise. You can delete\n" |
| "a partition using the 'd' command.\n")); |
| /* break; */ |
| } |
| |
| if (!LABEL_IS_SUN && !LABEL_IS_SGI) { |
| if (IS_EXTENDED(sys) != IS_EXTENDED(p->sys_ind)) { |
| printf(_("You cannot change a partition into" |
| " an extended one or vice versa\n" |
| "Delete it first.\n")); |
| break; |
| } |
| } |
| |
| if (sys < 256) { |
| if (LABEL_IS_SUN && i == 2 && sys != SUN_WHOLE_DISK) |
| printf(_("Consider leaving partition 3 " |
| "as Whole disk (5),\n" |
| "as SunOS/Solaris expects it and " |
| "even Linux likes it.\n\n")); |
| if (LABEL_IS_SGI && |
| ( |
| (i == 10 && sys != SGI_ENTIRE_DISK) || |
| (i == 8 && sys != 0) |
| ) |
| ){ |
| printf(_("Consider leaving partition 9 " |
| "as volume header (0),\nand " |
| "partition 11 as entire volume (6)" |
| "as IRIX expects it.\n\n")); |
| } |
| if (sys == origsys) |
| break; |
| if (LABEL_IS_SUN) { |
| sun_change_sysid(i, sys); |
| } else if (LABEL_IS_SGI) { |
| sgi_change_sysid(i, sys); |
| } else |
| p->sys_ind = sys; |
| |
| printf(_("Changed system type of partition %d " |
| "to %x (%s)\n"), i + 1, sys, |
| partition_type(sys)); |
| ptes[i].changed = 1; |
| if (is_dos_partition(origsys) || |
| is_dos_partition(sys)) |
| dos_changed = 1; |
| break; |
| } |
| } |
| } |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| |
| |
| /* check_consistency() and linear2chs() added Sat Mar 6 12:28:16 1993, |
| * faith@cs.unc.edu, based on code fragments from pfdisk by Gordon W. Ross, |
| * Jan. 1990 (version 1.2.1 by Gordon W. Ross Aug. 1990; Modified by S. |
| * Lubkin Oct. 1991). */ |
| |
| static void |
| linear2chs(unsigned ls, unsigned *c, unsigned *h, unsigned *s) |
| { |
| int spc = heads * sectors; |
| |
| *c = ls / spc; |
| ls = ls % spc; |
| *h = ls / sectors; |
| *s = ls % sectors + 1; /* sectors count from 1 */ |
| } |
| |
| static void |
| check_consistency(const struct partition *p, int partition) |
| { |
| unsigned pbc, pbh, pbs; /* physical beginning c, h, s */ |
| unsigned pec, peh, pes; /* physical ending c, h, s */ |
| unsigned lbc, lbh, lbs; /* logical beginning c, h, s */ |
| unsigned lec, leh, les; /* logical ending c, h, s */ |
| |
| if (!heads || !sectors || (partition >= 4)) |
| return; /* do not check extended partitions */ |
| |
| /* physical beginning c, h, s */ |
| pbc = (p->cyl & 0xff) | ((p->sector << 2) & 0x300); |
| pbh = p->head; |
| pbs = p->sector & 0x3f; |
| |
| /* physical ending c, h, s */ |
| pec = (p->end_cyl & 0xff) | ((p->end_sector << 2) & 0x300); |
| peh = p->end_head; |
| pes = p->end_sector & 0x3f; |
| |
| /* compute logical beginning (c, h, s) */ |
| linear2chs(get_start_sect(p), &lbc, &lbh, &lbs); |
| |
| /* compute logical ending (c, h, s) */ |
| linear2chs(get_start_sect(p) + get_nr_sects(p) - 1, &lec, &leh, &les); |
| |
| /* Same physical / logical beginning? */ |
| if (cylinders <= 1024 && (pbc != lbc || pbh != lbh || pbs != lbs)) { |
| printf(_("Partition %d has different physical/logical " |
| "beginnings (non-Linux?):\n"), partition + 1); |
| printf(_(" phys=(%d, %d, %d) "), pbc, pbh, pbs); |
| printf(_("logical=(%d, %d, %d)\n"),lbc, lbh, lbs); |
| } |
| |
| /* Same physical / logical ending? */ |
| if (cylinders <= 1024 && (pec != lec || peh != leh || pes != les)) { |
| printf(_("Partition %d has different physical/logical " |
| "endings:\n"), partition + 1); |
| printf(_(" phys=(%d, %d, %d) "), pec, peh, pes); |
| printf(_("logical=(%d, %d, %d)\n"),lec, leh, les); |
| } |
| |
| /* Ending on cylinder boundary? */ |
| if (peh != (heads - 1) || pes != sectors) { |
| printf(_("Partition %i does not end on cylinder boundary.\n"), |
| partition + 1); |
| } |
| } |
| |
| static void |
| list_disk_geometry(void) |
| { |
| long long bytes = (total_number_of_sectors << 9); |
| long megabytes = bytes/1000000; |
| |
| if (megabytes < 10000) |
| printf(_("\nDisk %s: %ld MB, %lld bytes\n"), |
| disk_device, megabytes, bytes); |
| else |
| printf(_("\nDisk %s: %ld.%ld GB, %lld bytes\n"), |
| disk_device, megabytes/1000, (megabytes/100)%10, bytes); |
| printf(_("%d heads, %d sectors/track, %d cylinders"), |
| heads, sectors, cylinders); |
| if (units_per_sector == 1) |
| printf(_(", total %llu sectors"), |
| total_number_of_sectors / (sector_size/512)); |
| printf(_("\nUnits = %s of %d * %d = %d bytes\n\n"), |
| str_units(PLURAL), |
| units_per_sector, sector_size, units_per_sector * sector_size); |
| } |
| |
| /* |
| * Check whether partition entries are ordered by their starting positions. |
| * Return 0 if OK. Return i if partition i should have been earlier. |
| * Two separate checks: primary and logical partitions. |
| */ |
| static int |
| wrong_p_order(int *prev) |
| { |
| const struct pte *pe; |
| const struct partition *p; |
| off_t last_p_start_pos = 0, p_start_pos; |
| int i, last_i = 0; |
| |
| for (i = 0 ; i < partitions; i++) { |
| if (i == 4) { |
| last_i = 4; |
| last_p_start_pos = 0; |
| } |
| pe = &ptes[i]; |
| if ((p = pe->part_table)->sys_ind) { |
| p_start_pos = get_partition_start(pe); |
| |
| if (last_p_start_pos > p_start_pos) { |
| if (prev) |
| *prev = last_i; |
| return i; |
| } |
| |
| last_p_start_pos = p_start_pos; |
| last_i = i; |
| } |
| } |
| return 0; |
| } |
| |
| #if ENABLE_FEATURE_FDISK_ADVANCED |
| /* |
| * Fix the chain of logicals. |
| * extended_offset is unchanged, the set of sectors used is unchanged |
| * The chain is sorted so that sectors increase, and so that |
| * starting sectors increase. |
| * |
| * After this it may still be that cfdisk doesnt like the table. |
| * (This is because cfdisk considers expanded parts, from link to |
| * end of partition, and these may still overlap.) |
| * Now |
| * sfdisk /dev/hda > ohda; sfdisk /dev/hda < ohda |
| * may help. |
| */ |
| static void |
| fix_chain_of_logicals(void) |
| { |
| int j, oj, ojj, sj, sjj; |
| struct partition *pj,*pjj,tmp; |
| |
| /* Stage 1: sort sectors but leave sector of part 4 */ |
| /* (Its sector is the global extended_offset.) */ |
| stage1: |
| for (j = 5; j < partitions-1; j++) { |
| oj = ptes[j].offset; |
| ojj = ptes[j+1].offset; |
| if (oj > ojj) { |
| ptes[j].offset = ojj; |
| ptes[j+1].offset = oj; |
| pj = ptes[j].part_table; |
| set_start_sect(pj, get_start_sect(pj)+oj-ojj); |
| pjj = ptes[j+1].part_table; |
| set_start_sect(pjj, get_start_sect(pjj)+ojj-oj); |
| set_start_sect(ptes[j-1].ext_pointer, |
| ojj-extended_offset); |
| set_start_sect(ptes[j].ext_pointer, |
| oj-extended_offset); |
| goto stage1; |
| } |
| } |
| |
| /* Stage 2: sort starting sectors */ |
| stage2: |
| for (j = 4; j < partitions-1; j++) { |
| pj = ptes[j].part_table; |
| pjj = ptes[j+1].part_table; |
| sj = get_start_sect(pj); |
| sjj = get_start_sect(pjj); |
| oj = ptes[j].offset; |
| ojj = ptes[j+1].offset; |
| if (oj+sj > ojj+sjj) { |
| tmp = *pj; |
| *pj = *pjj; |
| *pjj = tmp; |
| set_start_sect(pj, ojj+sjj-oj); |
| set_start_sect(pjj, oj+sj-ojj); |
| goto stage2; |
| } |
| } |
| |
| /* Probably something was changed */ |
| for (j = 4; j < partitions; j++) |
| ptes[j].changed = 1; |
| } |
| |
| |
| static void |
| fix_partition_table_order(void) |
| { |
| struct pte *pei, *pek; |
| int i,k; |
| |
| if (!wrong_p_order(NULL)) { |
| printf(_("Nothing to do. Ordering is correct already.\n\n")); |
| return; |
| } |
| |
| while ((i = wrong_p_order(&k)) != 0 && i < 4) { |
| /* partition i should have come earlier, move it */ |
| /* We have to move data in the MBR */ |
| struct partition *pi, *pk, *pe, pbuf; |
| pei = &ptes[i]; |
| pek = &ptes[k]; |
| |
| pe = pei->ext_pointer; |
| pei->ext_pointer = pek->ext_pointer; |
| pek->ext_pointer = pe; |
| |
| pi = pei->part_table; |
| pk = pek->part_table; |
| |
| memmove(&pbuf, pi, sizeof(struct partition)); |
| memmove(pi, pk, sizeof(struct partition)); |
| memmove(pk, &pbuf, sizeof(struct partition)); |
| |
| pei->changed = pek->changed = 1; |
| } |
| |
| if (i) |
| fix_chain_of_logicals(); |
| |
| printf("Done.\n"); |
| |
| } |
| #endif |
| |
| static void |
| list_table(int xtra) |
| { |
| const struct partition *p; |
| int i, w; |
| |
| if (LABEL_IS_SUN) { |
| sun_list_table(xtra); |
| return; |
| } |
| if (LABEL_IS_SUN) { |
| sgi_list_table(xtra); |
| return; |
| } |
| |
| list_disk_geometry(); |
| |
| if (LABEL_IS_OSF) { |
| xbsd_print_disklabel(xtra); |
| return; |
| } |
| |
| /* Heuristic: we list partition 3 of /dev/foo as /dev/foo3, |
| but if the device name ends in a digit, say /dev/foo1, |
| then the partition is called /dev/foo1p3. */ |
| w = strlen(disk_device); |
| if (w && isdigit(disk_device[w-1])) |
| w++; |
| if (w < 5) |
| w = 5; |
| |
| // 1 12345678901 12345678901 12345678901 12 |
| printf(_("%*s Boot Start End Blocks Id System\n"), |
| w+1, _("Device")); |
| |
| for (i = 0; i < partitions; i++) { |
| const struct pte *pe = &ptes[i]; |
| off_t psects; |
| off_t pblocks; |
| unsigned podd; |
| |
| p = pe->part_table; |
| if (!p || is_cleared_partition(p)) |
| continue; |
| |
| psects = get_nr_sects(p); |
| pblocks = psects; |
| podd = 0; |
| |
| if (sector_size < 1024) { |
| pblocks /= (1024 / sector_size); |
| podd = psects % (1024 / sector_size); |
| } |
| if (sector_size > 1024) |
| pblocks *= (sector_size / 1024); |
| |
| printf("%s %c %11llu %11llu %11llu%c %2x %s\n", |
| partname(disk_device, i+1, w+2), |
| !p->boot_ind ? ' ' : p->boot_ind == ACTIVE_FLAG /* boot flag */ |
| ? '*' : '?', |
| (unsigned long long) cround(get_partition_start(pe)), /* start */ |
| (unsigned long long) cround(get_partition_start(pe) + psects /* end */ |
| - (psects ? 1 : 0)), |
| (unsigned long long) pblocks, podd ? '+' : ' ', /* odd flag on end */ |
| p->sys_ind, /* type id */ |
| partition_type(p->sys_ind)); /* type name */ |
| |
| check_consistency(p, i); |
| } |
| |
| /* Is partition table in disk order? It need not be, but... */ |
| /* partition table entries are not checked for correct order if this |
| is a sgi, sun or aix labeled disk... */ |
| if (LABEL_IS_DOS && wrong_p_order(NULL)) { |
| /* FIXME */ |
| printf(_("\nPartition table entries are not in disk order\n")); |
| } |
| } |
| |
| #if ENABLE_FEATURE_FDISK_ADVANCED |
| static void |
| x_list_table(int extend) |
| { |
| const struct pte *pe; |
| const struct partition *p; |
| int i; |
| |
| printf(_("\nDisk %s: %d heads, %d sectors, %d cylinders\n\n"), |
| disk_device, heads, sectors, cylinders); |
| printf(_("Nr AF Hd Sec Cyl Hd Sec Cyl Start Size ID\n")); |
| for (i = 0 ; i < partitions; i++) { |
| pe = &ptes[i]; |
| p = (extend ? pe->ext_pointer : pe->part_table); |
| if (p != NULL) { |
| printf("%2d %02x%4d%4d%5d%4d%4d%5d%11u%11u %02x\n", |
| i + 1, p->boot_ind, p->head, |
| sector(p->sector), |
| cylinder(p->sector, p->cyl), p->end_head, |
| sector(p->end_sector), |
| cylinder(p->end_sector, p->end_cyl), |
| get_start_sect(p), get_nr_sects(p), p->sys_ind); |
| if (p->sys_ind) |
| check_consistency(p, i); |
| } |
| } |
| } |
| #endif |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static void |
| fill_bounds(off_t *first, off_t *last) |
| { |
| int i; |
| const struct pte *pe = &ptes[0]; |
| const struct partition *p; |
| |
| for (i = 0; i < partitions; pe++,i++) { |
| p = pe->part_table; |
| if (!p->sys_ind || IS_EXTENDED(p->sys_ind)) { |
| first[i] = 0xffffffff; |
| last[i] = 0; |
| } else { |
| first[i] = get_partition_start(pe); |
| last[i] = first[i] + get_nr_sects(p) - 1; |
| } |
| } |
| } |
| |
| static void |
| check(int n, unsigned h, unsigned s, unsigned c, off_t start) |
| { |
| off_t total, real_s, real_c; |
| |
| real_s = sector(s) - 1; |
| real_c = cylinder(s, c); |
| total = (real_c * sectors + real_s) * heads + h; |
| if (!total) |
| printf(_("Warning: partition %d contains sector 0\n"), n); |
| if (h >= heads) |
| printf(_("Partition %d: head %d greater than maximum %d\n"), |
| n, h + 1, heads); |
| if (real_s >= sectors) |
| printf(_("Partition %d: sector %d greater than " |
| "maximum %d\n"), n, s, sectors); |
| if (real_c >= cylinders) |
| printf(_("Partitions %d: cylinder %llu greater than " |
| "maximum %d\n"), n, (unsigned long long)real_c + 1, cylinders); |
| if (cylinders <= 1024 && start != total) |
| printf(_("Partition %d: previous sectors %llu disagrees with " |
| "total %llu\n"), n, (unsigned long long)start, (unsigned long long)total); |
| } |
| |
| static void |
| verify(void) |
| { |
| int i, j; |
| unsigned total = 1; |
| off_t first[partitions], last[partitions]; |
| struct partition *p; |
| |
| if (warn_geometry()) |
| return; |
| |
| if (LABEL_IS_SUN) { |
| verify_sun(); |
| return; |
| } |
| if (LABEL_IS_SGI) { |
| verify_sgi(1); |
| return; |
| } |
| |
| fill_bounds(first, last); |
| for (i = 0; i < partitions; i++) { |
| struct pte *pe = &ptes[i]; |
| |
| p = pe->part_table; |
| if (p->sys_ind && !IS_EXTENDED(p->sys_ind)) { |
| check_consistency(p, i); |
| if (get_partition_start(pe) < first[i]) |
| printf(_("Warning: bad start-of-data in " |
| "partition %d\n"), i + 1); |
| check(i + 1, p->end_head, p->end_sector, p->end_cyl, |
| last[i]); |
| total += last[i] + 1 - first[i]; |
| for (j = 0; j < i; j++) |
| if ((first[i] >= first[j] && first[i] <= last[j]) |
| || ((last[i] <= last[j] && last[i] >= first[j]))) { |
| printf(_("Warning: partition %d overlaps " |
| "partition %d.\n"), j + 1, i + 1); |
| total += first[i] >= first[j] ? |
| first[i] : first[j]; |
| total -= last[i] <= last[j] ? |
| last[i] : last[j]; |
| } |
| } |
| } |
| |
| if (extended_offset) { |
| struct pte *pex = &ptes[ext_index]; |
| off_t e_last = get_start_sect(pex->part_table) + |
| get_nr_sects(pex->part_table) - 1; |
| |
| for (i = 4; i < partitions; i++) { |
| total++; |
| p = ptes[i].part_table; |
| if (!p->sys_ind) { |
| if (i != 4 || i + 1 < partitions) |
| printf(_("Warning: partition %d " |
| "is empty\n"), i + 1); |
| } |
| else if (first[i] < extended_offset || |
| last[i] > e_last) |
| printf(_("Logical partition %d not entirely in " |
| "partition %d\n"), i + 1, ext_index + 1); |
| } |
| } |
| |
| if (total > heads * sectors * cylinders) |
| printf(_("Total allocated sectors %d greater than the maximum " |
| "%d\n"), total, heads * sectors * cylinders); |
| else if ((total = heads * sectors * cylinders - total) != 0) |
| printf(_("%d unallocated sectors\n"), total); |
| } |
| |
| static void |
| add_partition(int n, int sys) |
| { |
| char mesg[256]; /* 48 does not suffice in Japanese */ |
| int i, num_read = 0; |
| struct partition *p = ptes[n].part_table; |
| struct partition *q = ptes[ext_index].part_table; |
| long long llimit; |
| off_t start, stop = 0, limit, temp, |
| first[partitions], last[partitions]; |
| |
| if (p && p->sys_ind) { |
| printf(_("Partition %d is already defined. Delete " |
| "it before re-adding it.\n"), n + 1); |
| return; |
| } |
| fill_bounds(first, last); |
| if (n < 4) { |
| start = sector_offset; |
| if (display_in_cyl_units || !total_number_of_sectors) |
| llimit = heads * sectors * cylinders - 1; |
| else |
| llimit = total_number_of_sectors - 1; |
| limit = llimit; |
| if (limit != llimit) |
| limit = 0x7fffffff; |
| if (extended_offset) { |
| first[ext_index] = extended_offset; |
| last[ext_index] = get_start_sect(q) + |
| get_nr_sects(q) - 1; |
| } |
| } else { |
| start = extended_offset + sector_offset; |
| limit = get_start_sect(q) + get_nr_sects(q) - 1; |
| } |
| if (display_in_cyl_units) |
| for (i = 0; i < partitions; i++) |
| first[i] = (cround(first[i]) - 1) * units_per_sector; |
| |
| snprintf(mesg, sizeof(mesg), _("First %s"), str_units(SINGULAR)); |
| do { |
| temp = start; |
| for (i = 0; i < partitions; i++) { |
| int lastplusoff; |
| |
| if (start == ptes[i].offset) |
| start += sector_offset; |
| lastplusoff = last[i] + ((n < 4) ? 0 : sector_offset); |
| if (start >= first[i] && start <= lastplusoff) |
| start = lastplusoff + 1; |
| } |
| if (start > limit) |
| break; |
| if (start >= temp+units_per_sector && num_read) { |
| printf(_("Sector %"OFF_FMT"d is already allocated\n"), temp); |
| temp = start; |
| num_read = 0; |
| } |
| if (!num_read && start == temp) { |
| off_t saved_start; |
| |
| saved_start = start; |
| start = read_int(cround(saved_start), cround(saved_start), cround(limit), |
| 0, mesg); |
| if (display_in_cyl_units) { |
| start = (start - 1) * units_per_sector; |
| if (start < saved_start) start = saved_start; |
| } |
| num_read = 1; |
| } |
| } while (start != temp || !num_read); |
| if (n > 4) { /* NOT for fifth partition */ |
| struct pte *pe = &ptes[n]; |
| |
| pe->offset = start - sector_offset; |
| if (pe->offset == extended_offset) { /* must be corrected */ |
| pe->offset++; |
| if (sector_offset == 1) |
| start++; |
| } |
| } |
| |
| for (i = 0; i < partitions; i++) { |
| struct pte *pe = &ptes[i]; |
| |
| if (start < pe->offset && limit >= pe->offset) |
| limit = pe->offset - 1; |
| if (start < first[i] && limit >= first[i]) |
| limit = first[i] - 1; |
| } |
| if (start > limit) { |
| printf(_("No free sectors available\n")); |
| if (n > 4) |
| partitions--; |
| return; |
| } |
| if (cround(start) == cround(limit)) { |
| stop = limit; |
| } else { |
| snprintf(mesg, sizeof(mesg), |
| _("Last %s or +size or +sizeM or +sizeK"), |
| str_units(SINGULAR)); |
| stop = read_int(cround(start), cround(limit), cround(limit), |
| cround(start), mesg); |
| if (display_in_cyl_units) { |
| stop = stop * units_per_sector - 1; |
| if (stop >limit) |
| stop = limit; |
| } |
| } |
| |
| set_partition(n, 0, start, stop, sys); |
| if (n > 4) |
| set_partition(n - 1, 1, ptes[n].offset, stop, EXTENDED); |
| |
| if (IS_EXTENDED(sys)) { |
| struct pte *pe4 = &ptes[4]; |
| struct pte *pen = &ptes[n]; |
| |
| ext_index = n; |
| pen->ext_pointer = p; |
| pe4->offset = extended_offset = start; |
| pe4->sectorbuffer = xzalloc(sector_size); |
| pe4->part_table = pt_offset(pe4->sectorbuffer, 0); |
| pe4->ext_pointer = pe4->part_table + 1; |
| pe4->changed = 1; |
| partitions = 5; |
| } |
| } |
| |
| static void |
| add_logical(void) |
| { |
| if (partitions > 5 || ptes[4].part_table->sys_ind) { |
| struct pte *pe = &ptes[partitions]; |
| |
| pe->sectorbuffer = xzalloc(sector_size); |
| pe->part_table = pt_offset(pe->sectorbuffer, 0); |
| pe->ext_pointer = pe->part_table + 1; |
| pe->offset = 0; |
| pe->changed = 1; |
| partitions++; |
| } |
| add_partition(partitions - 1, LINUX_NATIVE); |
| } |
| |
| static void |
| new_partition(void) |
| { |
| int i, free_primary = 0; |
| |
| if (warn_geometry()) |
| return; |
| |
| if (LABEL_IS_SUN) { |
| add_sun_partition(get_partition(0, partitions), LINUX_NATIVE); |
| return; |
| } |
| if (LABEL_IS_SGI) { |
| sgi_add_partition(get_partition(0, partitions), LINUX_NATIVE); |
| return; |
| } |
| if (LABEL_IS_AIX) { |
| printf(_("\tSorry - this fdisk cannot handle AIX disk labels." |
| "\n\tIf you want to add DOS-type partitions, create" |
| "\n\ta new empty DOS partition table first. (Use o.)" |
| "\n\tWARNING: " |
| "This will destroy the present disk contents.\n")); |
| return; |
| } |
| |
| for (i = 0; i < 4; i++) |
| free_primary += !ptes[i].part_table->sys_ind; |
| |
| if (!free_primary && partitions >= MAXIMUM_PARTS) { |
| printf(_("The maximum number of partitions has been created\n")); |
| return; |
| } |
| |
| if (!free_primary) { |
| if (extended_offset) |
| add_logical(); |
| else |
| printf(_("You must delete some partition and add " |
| "an extended partition first\n")); |
| } else { |
| char c, line[LINE_LENGTH]; |
| snprintf(line, sizeof(line), "%s\n %s\n p primary " |
| "partition (1-4)\n", |
| "Command action", (extended_offset ? |
| "l logical (5 or over)" : "e extended")); |
| while (1) { |
| c = read_nonempty(line); |
| if (c == 'p' || c == 'P') { |
| i = get_nonexisting_partition(0, 4); |
| if (i >= 0) |
| add_partition(i, LINUX_NATIVE); |
| return; |
| } |
| else if (c == 'l' && extended_offset) { |
| add_logical(); |
| return; |
| } |
| else if (c == 'e' && !extended_offset) { |
| i = get_nonexisting_partition(0, 4); |
| if (i >= 0) |
| add_partition(i, EXTENDED); |
| return; |
| } |
| else |
| printf(_("Invalid partition number " |
| "for type '%c'\n"), c); |
| } |
| } |
| } |
| |
| static void |
| write_table(void) |
| { |
| int i; |
| |
| if (LABEL_IS_DOS) { |
| for (i = 0; i < 3; i++) |
| if (ptes[i].changed) |
| ptes[3].changed = 1; |
| for (i = 3; i < partitions; i++) { |
| struct pte *pe = &ptes[i]; |
| |
| if (pe->changed) { |
| write_part_table_flag(pe->sectorbuffer); |
| write_sector(pe->offset, pe->sectorbuffer); |
| } |
| } |
| } |
| else if (LABEL_IS_SGI) { |
| /* no test on change? the printf below might be mistaken */ |
| sgi_write_table(); |
| } |
| else if (LABEL_IS_SUN) { |
| int needw = 0; |
| |
| for (i = 0; i < 8; i++) |
| if (ptes[i].changed) |
| needw = 1; |
| if (needw) |
| sun_write_table(); |
| } |
| |
| printf(_("The partition table has been altered!\n\n")); |
| reread_partition_table(1); |
| } |
| |
| static void |
| reread_partition_table(int leave) |
| { |
| int i; |
| |
| printf(_("Calling ioctl() to re-read partition table\n")); |
| sync(); |
| sleep(2); /* Huh? */ |
| i = ioctl(fd, BLKRRPART); |
| #if 0 |
| else { |
| /* some kernel versions (1.2.x) seem to have trouble |
| rereading the partition table, but if asked to do it |
| twice, the second time works. - biro@yggdrasil.com */ |
| sync(); |
| sleep(2); |
| i = ioctl(fd, BLKRRPART); |
| } |
| #endif |
| |
| if (i) { |
| bb_perror_msg("WARNING: rereading partition table " |
| "failed, kernel still uses old table"); |
| } |
| |
| #if 0 |
| if (dos_changed) |
| printf( |
| _("\nWARNING: If you have created or modified any DOS 6.x\n" |
| "partitions, please see the fdisk manual page for additional\n" |
| "information.\n")); |
| #endif |
| |
| if (leave) { |
| if (ENABLE_FEATURE_CLEAN_UP) |
| close(fd); |
| exit(i != 0); |
| } |
| } |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| |
| #if ENABLE_FEATURE_FDISK_ADVANCED |
| #define MAX_PER_LINE 16 |
| static void |
| print_buffer(char *pbuffer) |
| { |
| int i,l; |
| |
| for (i = 0, l = 0; i < sector_size; i++, l++) { |
| if (l == 0) |
| printf("0x%03X:", i); |
| printf(" %02X", (unsigned char) pbuffer[i]); |
| if (l == MAX_PER_LINE - 1) { |
| puts(""); |
| l = -1; |
| } |
| } |
| if (l > 0) |
| puts(""); |
| puts(""); |
| } |
| |
| static void |
| print_raw(void) |
| { |
| int i; |
| |
| printf(_("Device: %s\n"), disk_device); |
| if (LABEL_IS_SGI || LABEL_IS_SUN) |
| print_buffer(MBRbuffer); |
| else { |
| for (i = 3; i < partitions; i++) |
| print_buffer(ptes[i].sectorbuffer); |
| } |
| } |
| |
| static void |
| move_begin(int i) |
| { |
| struct pte *pe = &ptes[i]; |
| struct partition *p = pe->part_table; |
| off_t new, first; |
| |
| if (warn_geometry()) |
| return; |
| if (!p->sys_ind || !get_nr_sects(p) || IS_EXTENDED(p->sys_ind)) { |
| printf(_("Partition %d has no data area\n"), i + 1); |
| return; |
| } |
| first = get_partition_start(pe); |
| new = read_int(first, first, first + get_nr_sects(p) - 1, first, |
| _("New beginning of data")) - pe->offset; |
| |
| if (new != get_nr_sects(p)) { |
| first = get_nr_sects(p) + get_start_sect(p) - new; |
| set_nr_sects(p, first); |
| set_start_sect(p, new); |
| pe->changed = 1; |
| } |
| } |
| |
| static void |
| xselect(void) |
| { |
| char c; |
| |
| while (1) { |
| putchar('\n'); |
| c = tolower(read_nonempty(_("Expert command (m for help): "))); |
| switch (c) { |
| case 'a': |
| if (LABEL_IS_SUN) |
| sun_set_alt_cyl(); |
| break; |
| case 'b': |
| if (LABEL_IS_DOS) |
| move_begin(get_partition(0, partitions)); |
| break; |
| case 'c': |
| user_cylinders = cylinders = |
| read_int(1, cylinders, 1048576, 0, |
| _("Number of cylinders")); |
| if (LABEL_IS_SUN) |
| sun_set_ncyl(cylinders); |
| if (LABEL_IS_DOS) |
| warn_cylinders(); |
| break; |
| case 'd': |
| print_raw(); |
| break; |
| case 'e': |
| if (LABEL_IS_SGI) |
| sgi_set_xcyl(); |
| else if (LABEL_IS_SUN) |
| sun_set_xcyl(); |
| else if (LABEL_IS_DOS) |
| x_list_table(1); |
| break; |
| case 'f': |
| if (LABEL_IS_DOS) |
| fix_partition_table_order(); |
| break; |
| case 'g': |
| #if ENABLE_FEATURE_SGI_LABEL |
| create_sgilabel(); |
| #endif |
| break; |
| case 'h': |
| user_heads = heads = read_int(1, heads, 256, 0, |
| _("Number of heads")); |
| update_units(); |
| break; |
| case 'i': |
| if (LABEL_IS_SUN) |
| sun_set_ilfact(); |
| break; |
| case 'o': |
| if (LABEL_IS_SUN) |
| sun_set_rspeed(); |
| break; |
| case 'p': |
| if (LABEL_IS_SUN) |
| list_table(1); |
| else |
| x_list_table(0); |
| break; |
| case 'q': |
| close(fd); |
| puts(""); |
| exit(0); |
| case 'r': |
| return; |
| case 's': |
| user_sectors = sectors = read_int(1, sectors, 63, 0, |
| _("Number of sectors")); |
| if (dos_compatible_flag) { |
| sector_offset = sectors; |
| printf(_("Warning: setting sector offset for DOS " |
| "compatiblity\n")); |
| } |
| update_units(); |
| break; |
| case 'v': |
| verify(); |
| break; |
| case 'w': |
| write_table(); /* does not return */ |
| break; |
| case 'y': |
| if (LABEL_IS_SUN) |
| sun_set_pcylcount(); |
| break; |
| default: |
| xmenu(); |
| } |
| } |
| } |
| #endif /* ADVANCED mode */ |
| |
| static int |
| is_ide_cdrom_or_tape(const char *device) |
| { |
| FILE *procf; |
| char buf[100]; |
| struct stat statbuf; |
| int is_ide = 0; |
| |
| /* No device was given explicitly, and we are trying some |
| likely things. But opening /dev/hdc may produce errors like |
| "hdc: tray open or drive not ready" |
| if it happens to be a CD-ROM drive. It even happens that |
| the process hangs on the attempt to read a music CD. |
| So try to be careful. This only works since 2.1.73. */ |
| |
| if (strncmp("/dev/hd", device, 7)) |
| return 0; |
| |
| snprintf(buf, sizeof(buf), "/proc/ide/%s/media", device+5); |
| procf = fopen(buf, "r"); |
| if (procf != NULL && fgets(buf, sizeof(buf), procf)) |
| is_ide = (!strncmp(buf, "cdrom", 5) || |
| !strncmp(buf, "tape", 4)); |
| else |
| /* Now when this proc file does not exist, skip the |
| device when it is read-only. */ |
| if (stat(device, &statbuf) == 0) |
| is_ide = ((statbuf.st_mode & 0222) == 0); |
| |
| if (procf) |
| fclose(procf); |
| return is_ide; |
| } |
| |
| |
| static void |
| try(const char *device, int user_specified) |
| { |
| int gb; |
| |
| disk_device = device; |
| if (setjmp(listingbuf)) |
| return; |
| if (!user_specified) |
| if (is_ide_cdrom_or_tape(device)) |
| return; |
| fd = open(disk_device, type_open); |
| if (fd >= 0) { |
| gb = get_boot(try_only); |
| if (gb > 0) { /* I/O error */ |
| close(fd); |
| } else if (gb < 0) { /* no DOS signature */ |
| list_disk_geometry(); |
| if (LABEL_IS_AIX) { |
| return; |
| } |
| #if ENABLE_FEATURE_OSF_LABEL |
| if (btrydev(device) < 0) |
| #endif |
| printf(_("Disk %s doesn't contain a valid " |
| "partition table\n"), device); |
| close(fd); |
| } else { |
| close(fd); |
| list_table(0); |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| if (!LABEL_IS_SUN && partitions > 4){ |
| delete_partition(ext_index); |
| } |
| #endif |
| } |
| } else { |
| /* Ignore other errors, since we try IDE |
| and SCSI hard disks which may not be |
| installed on the system. */ |
| if (errno == EACCES) { |
| printf(_("Cannot open %s\n"), device); |
| return; |
| } |
| } |
| } |
| |
| /* for fdisk -l: try all things in /proc/partitions |
| that look like a partition name (do not end in a digit) */ |
| static void |
| tryprocpt(void) |
| { |
| FILE *procpt; |
| char line[100], ptname[100], devname[120], *s; |
| int ma, mi, sz; |
| |
| procpt = fopen_or_warn("/proc/partitions", "r"); |
| |
| while (fgets(line, sizeof(line), procpt)) { |
| if (sscanf(line, " %d %d %d %[^\n ]", |
| &ma, &mi, &sz, ptname) != 4) |
| continue; |
| for (s = ptname; *s; s++); |
| if (isdigit(s[-1])) |
| continue; |
| sprintf(devname, "/dev/%s", ptname); |
| try(devname, 0); |
| } |
| #if ENABLE_FEATURE_CLEAN_UP |
| fclose(procpt); |
| #endif |
| } |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| static void |
| unknown_command(int c) |
| { |
| printf(_("%c: unknown command\n"), c); |
| } |
| #endif |
| |
| int fdisk_main(int argc, char **argv) |
| { |
| char *str_b, *str_C, *str_H, *str_S; |
| unsigned opt; |
| int c; |
| /* |
| * fdisk -v |
| * fdisk -l [-b sectorsize] [-u] device ... |
| * fdisk -s [partition] ... |
| * fdisk [-b sectorsize] [-u] device |
| * |
| * Options -C, -H, -S set the geometry. |
| */ |
| enum { |
| OPT_b = 1 << 0, |
| OPT_C = 1 << 1, |
| OPT_H = 1 << 2, |
| OPT_l = 1 << 3, |
| OPT_S = 1 << 4, |
| OPT_u = 1 << 5, |
| OPT_s = (1 << 6) * ENABLE_FEATURE_FDISK_BLKSIZE, |
| }; |
| opt = getopt32(argc, argv, "b:C:H:lS:u" USE_FEATURE_FDISK_BLKSIZE("s"), |
| &str_b, &str_C, &str_H, &str_S); |
| argc -= optind; |
| argv += optind; |
| if (opt & OPT_b) { // -b |
| /* Ugly: this sector size is really per device, |
| so cannot be combined with multiple disks, |
| and the same goes for the C/H/S options. |
| */ |
| sector_size = xatoi_u(str_b); |
| if (sector_size != 512 && sector_size != 1024 && |
| sector_size != 2048) |
| bb_show_usage(); |
| sector_offset = 2; |
| user_set_sector_size = 1; |
| } |
| if (opt & OPT_C) user_cylinders = xatoi_u(str_C); // -C |
| if (opt & OPT_H) { // -H |
| user_heads = xatoi_u(str_H); |
| if (user_heads <= 0 || user_heads >= 256) |
| user_heads = 0; |
| } |
| //if (opt & OPT_l) // -l |
| if (opt & OPT_S) { // -S |
| user_sectors = xatoi_u(str_S); |
| if (user_sectors <= 0 || user_sectors >= 64) |
| user_sectors = 0; |
| } |
| if (opt & OPT_u) display_in_cyl_units = 0; // -u |
| //if (opt & OPT_s) // -s |
| |
| if (user_set_sector_size && argc != 1) |
| printf(_("Warning: the -b (set sector size) option should" |
| " be used with one specified device\n")); |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| if (opt & OPT_l) { |
| nowarn = 1; |
| #endif |
| type_open = O_RDONLY; |
| if (argc > 0) { |
| int k; |
| #if defined(__GNUC__) |
| /* avoid gcc warning: |
| variable `k' might be clobbered by `longjmp' */ |
| (void)&k; |
| #endif |
| listing = 1; |
| for (k = 0; k < argc; k++) |
| try(argv[k], 1); |
| } else { |
| /* we no longer have default device names */ |
| /* but, we can use /proc/partitions instead */ |
| tryprocpt(); |
| } |
| return 0; |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| } |
| #endif |
| |
| #if ENABLE_FEATURE_FDISK_BLKSIZE |
| if (opt & OPT_s) { |
| long size; |
| int j; |
| |
| nowarn = 1; |
| type_open = O_RDONLY; |
| |
| if (argc <= 0) |
| bb_show_usage(); |
| |
| for (j = 0; j < argc; j++) { |
| disk_device = argv[j]; |
| fd = open(disk_device, type_open); |
| if (fd < 0) |
| fdisk_fatal(unable_to_open); |
| if (ioctl(fd, BLKGETSIZE, &size)) |
| fdisk_fatal(ioctl_error); |
| close(fd); |
| if (argc == 1) |
| printf("%ld\n", size/2); |
| else |
| printf("%s: %ld\n", argv[j], size/2); |
| } |
| return 0; |
| } |
| #endif |
| |
| #if ENABLE_FEATURE_FDISK_WRITABLE |
| if (argc != 1) |
| bb_show_usage(); |
| |
| disk_device = argv[0]; |
| get_boot(fdisk); |
| |
| if (LABEL_IS_OSF) { |
| /* OSF label, and no DOS label */ |
| printf(_("Detected an OSF/1 disklabel on %s, entering " |
| "disklabel mode.\n"), disk_device); |
| bsd_select(); |
| /*Why do we do this? It seems to be counter-intuitive*/ |
| current_label_type = label_dos; |
| /* If we return we may want to make an empty DOS label? */ |
| } |
| |
| while (1) { |
| putchar('\n'); |
| c = tolower(read_nonempty(_("Command (m for help): "))); |
| switch (c) { |
| case 'a': |
| if (LABEL_IS_DOS) |
| toggle_active(get_partition(1, partitions)); |
| else if (LABEL_IS_SUN) |
| toggle_sunflags(get_partition(1, partitions), |
| 0x01); |
| else if (LABEL_IS_SGI) |
| sgi_set_bootpartition( |
| get_partition(1, partitions)); |
| else |
| unknown_command(c); |
| break; |
| case 'b': |
| if (LABEL_IS_SGI) { |
| printf(_("\nThe current boot file is: %s\n"), |
| sgi_get_bootfile()); |
| if (read_maybe_empty(_("Please enter the name of the " |
| "new boot file: ")) == '\n') |
| printf(_("Boot file unchanged\n")); |
| else |
| sgi_set_bootfile(line_ptr); |
| } |
| #if ENABLE_FEATURE_OSF_LABEL |
| else |
| bsd_select(); |
| #endif |
| break; |
| case 'c': |
| if (LABEL_IS_DOS) |
| toggle_dos_compatibility_flag(); |
| else if (LABEL_IS_SUN) |
| toggle_sunflags(get_partition(1, partitions), |
| 0x10); |
| else if (LABEL_IS_SGI) |
| sgi_set_swappartition( |
| get_partition(1, partitions)); |
| else |
| unknown_command(c); |
| break; |
| case 'd': |
| { |
| int j; |
| /* If sgi_label then don't use get_existing_partition, |
| let the user select a partition, since |
| get_existing_partition() only works for Linux-like |
| partition tables */ |
| if (!LABEL_IS_SGI) { |
| j = get_existing_partition(1, partitions); |
| } else { |
| j = get_partition(1, partitions); |
| } |
| if (j >= 0) |
| delete_partition(j); |
| } |
| break; |
| case 'i': |
| if (LABEL_IS_SGI) |
| create_sgiinfo(); |
| else |
| unknown_command(c); |
| case 'l': |
| list_types(get_sys_types()); |
| break; |
| case 'm': |
| menu(); |
| break; |
| case 'n': |
| new_partition(); |
| break; |
| case 'o': |
| create_doslabel(); |
| break; |
| case 'p': |
| list_table(0); |
| break; |
| case 'q': |
| close(fd); |
| puts(""); |
| return 0; |
| case 's': |
| #if ENABLE_FEATURE_SUN_LABEL |
| create_sunlabel(); |
| #endif |
| break; |
| case 't': |
| change_sysid(); |
| break; |
| case 'u': |
| change_units(); |
| break; |
| case 'v': |
| verify(); |
| break; |
| case 'w': |
| write_table(); /* does not return */ |
| break; |
| #if ENABLE_FEATURE_FDISK_ADVANCED |
| case 'x': |
| if (LABEL_IS_SGI) { |
| printf(_("\n\tSorry, no experts menu for SGI " |
| "partition tables available.\n\n")); |
| } else |
| xselect(); |
| break; |
| #endif |
| default: |
| unknown_command(c); |
| menu(); |
| } |
| } |
| return 0; |
| #endif /* CONFIG_FEATURE_FDISK_WRITABLE */ |
| } |