12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106 |
- /*
- * fdisk - edit dos disk partition table
- */
- #include <u.h>
- #include <libc.h>
- #include <bio.h>
- #include <ctype.h>
- #include <disk.h>
- #include "edit.h"
- typedef struct Dospart Dospart;
- enum {
- NTentry = 4,
- Mpart = 64,
- };
- static void rdpart(Edit*, ulong, ulong);
- static void findmbr(Edit*);
- static void autopart(Edit*);
- static void wrpart(Edit*);
- static void blankpart(Edit*);
- static void cmdnamectl(Edit*);
- static void recover(Edit*);
- static int Dfmt(Fmt*);
- static int blank;
- static int dowrite;
- static int file;
- static int rdonly;
- static int doauto;
- static vlong mbroffset;
- static int printflag;
- static int printchs;
- static int sec2cyl;
- static int written;
- static void cmdsum(Edit*, Part*, vlong, vlong);
- static char *cmdadd(Edit*, char*, vlong, vlong);
- static char *cmddel(Edit*, Part*);
- static char *cmdext(Edit*, int, char**);
- static char *cmdhelp(Edit*);
- static char *cmdokname(Edit*, char*);
- static char *cmdwrite(Edit*);
- static void cmdprintctl(Edit*, int);
- #pragma varargck type "D" uchar*
- Edit edit = {
- .add= cmdadd,
- .del= cmddel,
- .ext= cmdext,
- .help= cmdhelp,
- .okname= cmdokname,
- .sum= cmdsum,
- .write= cmdwrite,
- .printctl= cmdprintctl,
- .unit= "cylinder",
- };
- /*
- * Catch the obvious error routines to fix up the disk.
- */
- void
- sysfatal(char *fmt, ...)
- {
- char buf[1024];
- va_list arg;
- va_start(arg, fmt);
- vseprint(buf, buf+sizeof(buf), fmt, arg);
- va_end(arg);
- if(argv0)
- fprint(2, "%s: %s\n", argv0, buf);
- else
- fprint(2, "%s\n", buf);
- if(written)
- recover(&edit);
- exits(buf);
- }
- void
- abort(void)
- {
- fprint(2, "abort\n");
- recover(&edit);
- }
- void
- usage(void)
- {
- fprint(2, "usage: disk/fdisk [-abfprvw] [-s sectorsize] /dev/sdC0/data\n");
- exits("usage");
- }
- void
- main(int argc, char **argv)
- {
- vlong secsize;
- secsize = 0;
- ARGBEGIN{
- case 'a':
- doauto++;
- break;
- case 'b':
- blank++;
- break;
- case 'f':
- file++;
- break;
- case 'p':
- printflag++;
- break;
- case 'r':
- rdonly++;
- break;
- case 's':
- secsize = atoi(ARGF());
- break;
- case 'v':
- printchs++;
- break;
- case 'w':
- dowrite++;
- break;
- }ARGEND;
- fmtinstall('D', Dfmt);
- if(argc != 1)
- usage();
- edit.disk = opendisk(argv[0], rdonly, file);
- if(edit.disk == nil) {
- fprint(2, "cannot open disk: %r\n");
- exits("opendisk");
- }
- if(secsize != 0) {
- edit.disk->secsize = secsize;
- edit.disk->secs = edit.disk->size / secsize;
- }
- sec2cyl = edit.disk->h * edit.disk->s;
- edit.end = edit.disk->secs / sec2cyl;
- findmbr(&edit);
- if(blank)
- blankpart(&edit);
- else
- rdpart(&edit, 0, 0);
- if(doauto)
- autopart(&edit);
- if(dowrite)
- runcmd(&edit, "w");
- if(printflag)
- runcmd(&edit, "P");
- if(dowrite || printflag)
- exits(0);
- fprint(2, "cylinder = %lld bytes\n", sec2cyl*edit.disk->secsize);
- runcmd(&edit, "p");
- for(;;) {
- fprint(2, ">>> ");
- runcmd(&edit, getline(&edit));
- }
- }
- typedef struct Tentry Tentry;
- typedef struct Table Table;
- typedef struct Type Type;
- typedef struct Tab Tab;
- typedef struct Recover Recover;
- struct Tentry {
- uchar active; /* active flag */
- uchar starth; /* starting head */
- uchar starts; /* starting sector */
- uchar startc; /* starting cylinder */
- uchar type; /* partition type */
- uchar endh; /* ending head */
- uchar ends; /* ending sector */
- uchar endc; /* ending cylinder */
- uchar xlba[4]; /* starting LBA from beginning of disc or ext. partition */
- uchar xsize[4]; /* size in sectors */
- };
- enum {
- Active = 0x80, /* partition is active */
- Primary = 0x01, /* internal flag */
- TypeBB = 0xFF,
- TypeEMPTY = 0x00,
- TypeFAT12 = 0x01,
- TypeXENIX = 0x02, /* root */
- TypeXENIXUSR = 0x03, /* usr */
- TypeFAT16 = 0x04,
- TypeEXTENDED = 0x05,
- TypeFATHUGE = 0x06,
- TypeHPFS = 0x07,
- TypeAIXBOOT = 0x08,
- TypeAIXDATA = 0x09,
- TypeOS2BOOT = 0x0A, /* OS/2 Boot Manager */
- TypeFAT32 = 0x0B, /* FAT 32 */
- TypeFAT32LBA = 0x0C, /* FAT 32 needing LBA support */
- TypeFAT16X = 0x0E, /* FAT 16 needing LBA support */
- TypeEXTHUGE = 0x0F, /* FAT 32 extended partition */
- TypeUNFORMATTED = 0x16, /* unformatted primary partition (OS/2 FDISK)? */
- TypeHPFS2 = 0x17,
- TypeIBMRecovery = 0x1C, /* really hidden fat */
- TypeCPM0 = 0x52,
- TypeDMDDO = 0x54, /* Disk Manager Dynamic Disk Overlay */
- TypeGB = 0x56, /* ???? */
- TypeSPEEDSTOR = 0x61,
- TypeSYSV386 = 0x63, /* also HURD? */
- TypeNETWARE = 0x64,
- TypePCIX = 0x75,
- TypeMINIX13 = 0x80, /* Minix v1.3 and below */
- TypeMINIX = 0x81, /* Minix v1.5+ */
- TypeLINUXSWAP = 0x82,
- TypeLINUX = 0x83,
- TypeLINUXEXT = 0x85,
- TypeAMOEBA = 0x93,
- TypeAMOEBABB = 0x94,
- TypeBSD386 = 0xA5,
- TypeBSDI = 0xB7,
- TypeBSDISWAP = 0xB8,
- TypeOTHER = 0xDA,
- TypeCPM = 0xDB,
- TypeDellRecovery= 0xDE,
- TypeSPEEDSTOR12 = 0xE1,
- TypeSPEEDSTOR16 = 0xE4,
- TypeLANSTEP = 0xFE,
- Type9 = 0x39,
- Toffset = 446, /* offset of partition table in sector */
- Magic0 = 0x55,
- Magic1 = 0xAA,
- };
- struct Table {
- Tentry entry[NTentry];
- uchar magic[2];
- };
- struct Type {
- char *desc;
- char *name;
- };
- struct Dospart {
- Part;
- Tentry;
- u32int lba;
- u32int size;
- int primary;
- };
- struct Recover {
- Table table;
- ulong lba;
- };
- static Type types[256] = {
- [TypeEMPTY] { "EMPTY", "" },
- [TypeFAT12] { "FAT12", "dos" },
- [TypeFAT16] { "FAT16", "dos" },
- [TypeFAT32] { "FAT32", "dos" },
- [TypeFAT32LBA] { "FAT32LBA", "dos" },
- [TypeFAT16X] { "FAT16X", "dos" },
- [TypeEXTHUGE] { "EXTHUGE", "" },
- [TypeIBMRecovery] { "IBMRECOVERY", "ibm" },
- [TypeEXTENDED] { "EXTENDED", "" },
- [TypeFATHUGE] { "FATHUGE", "dos" },
- [TypeBB] { "BB", "bb" },
- [TypeXENIX] { "XENIX", "xenix" },
- [TypeXENIXUSR] { "XENIX USR", "xenixusr" },
- [TypeHPFS] { "HPFS", "ntfs" },
- [TypeAIXBOOT] { "AIXBOOT", "aixboot" },
- [TypeAIXDATA] { "AIXDATA", "aixdata" },
- [TypeOS2BOOT] { "OS/2BOOT", "os2boot" },
- [TypeUNFORMATTED] { "UNFORMATTED", "" },
- [TypeHPFS2] { "HPFS2", "hpfs2" },
- [TypeCPM0] { "CPM0", "cpm0" },
- [TypeDMDDO] { "DMDDO", "dmdd0" },
- [TypeGB] { "GB", "gb" },
- [TypeSPEEDSTOR] { "SPEEDSTOR", "speedstor" },
- [TypeSYSV386] { "SYSV386", "sysv386" },
- [TypeNETWARE] { "NETWARE", "netware" },
- [TypePCIX] { "PCIX", "pcix" },
- [TypeMINIX13] { "MINIXV1.3", "minix13" },
- [TypeMINIX] { "MINIXV1.5", "minix15" },
- [TypeLINUXSWAP] { "LINUXSWAP", "linuxswap" },
- [TypeLINUX] { "LINUX", "linux" },
- [TypeLINUXEXT] { "LINUXEXTENDED", "" },
- [TypeAMOEBA] { "AMOEBA", "amoeba" },
- [TypeAMOEBABB] { "AMOEBABB", "amoebaboot" },
- [TypeBSD386] { "BSD386", "bsd386" },
- [TypeBSDI] { "BSDI", "bsdi" },
- [TypeBSDISWAP] { "BSDISWAP", "bsdiswap" },
- [TypeOTHER] { "OTHER", "other" },
- [TypeCPM] { "CPM", "cpm" },
- [TypeDellRecovery] { "DELLRECOVERY", "dell" },
- [TypeSPEEDSTOR12] { "SPEEDSTOR12", "speedstor" },
- [TypeSPEEDSTOR16] { "SPEEDSTOR16", "speedstor" },
- [TypeLANSTEP] { "LANSTEP", "lanstep" },
- [Type9] { "PLAN9", "plan9" },
- };
- static Dospart part[Mpart];
- static int npart;
- static char*
- typestr0(int type)
- {
- static char buf[100];
- sprint(buf, "type %d", type);
- if(type < 0 || type >= 256)
- return buf;
- if(types[type].desc == nil)
- return buf;
- return types[type].desc;
- }
- static u32int
- getle32(void* v)
- {
- uchar *p;
- p = v;
- return (p[3]<<24)|(p[2]<<16)|(p[1]<<8)|p[0];
- }
- static void
- putle32(void* v, u32int i)
- {
- uchar *p;
- p = v;
- p[0] = i;
- p[1] = i>>8;
- p[2] = i>>16;
- p[3] = i>>24;
- }
- static void
- diskread(Disk *disk, void *data, int ndata, u32int sec, u32int off)
- {
- if(seek(disk->fd, (vlong)sec*disk->secsize+off, 0) != (vlong)sec*disk->secsize+off)
- sysfatal("diskread seek %lud.%lud: %r", (ulong)sec, (ulong)off);
- if(readn(disk->fd, data, ndata) != ndata)
- sysfatal("diskread %lud at %lud.%lud: %r", (ulong)ndata, (ulong)sec, (ulong)off);
- }
- static int
- diskwrite(Disk *disk, void *data, int ndata, u32int sec, u32int off)
- {
- written = 1;
- if(seek(disk->wfd, (vlong)sec*disk->secsize+off, 0) != (vlong)sec*disk->secsize+off)
- goto Error;
- if(write(disk->wfd, data, ndata) != ndata)
- goto Error;
- return 0;
- Error:
- fprint(2, "write %d bytes at %lud.%lud failed: %r\n", ndata, (ulong)sec, (ulong)off);
- return -1;
- }
- static Dospart*
- mkpart(char *name, int primary, u32int lba, u32int size, Tentry *t)
- {
- static int n;
- Dospart *p;
- p = emalloc(sizeof(*p));
- if(name)
- p->name = estrdup(name);
- else{
- p->name = emalloc(20);
- sprint(p->name, "%c%d", primary ? 'p' : 's', ++n);
- }
- if(t)
- p->Tentry = *t;
- else
- memset(&p->Tentry, 0, sizeof(Tentry));
- p->changed = 0;
- p->start = lba/sec2cyl;
- p->end = (lba+size)/sec2cyl;
- p->ctlstart = lba;
- p->ctlend = lba+size;
- p->lba = lba;
- p->size = size;
- p->primary = primary;
- return p;
- }
- /*
- * Recovery takes care of remembering what the various tables
- * looked like when we started, attempting to restore them when
- * we are finished.
- */
- static Recover *rtab;
- static int nrtab;
- static void
- addrecover(Table t, ulong lba)
- {
- if((nrtab%8) == 0) {
- rtab = realloc(rtab, (nrtab+8)*sizeof(rtab[0]));
- if(rtab == nil)
- sysfatal("out of memory");
- }
- rtab[nrtab] = (Recover){t, lba};
- nrtab++;
- }
- static void
- recover(Edit *edit)
- {
- int err, i, ctlfd;
- vlong offset;
- err = 0;
- for(i=0; i<nrtab; i++)
- if(diskwrite(edit->disk, &rtab[i].table, sizeof(Table), rtab[i].lba, Toffset) < 0)
- err = 1;
- if(err) {
- fprint(2, "warning: some writes failed during restoration of old partition tables\n");
- exits("inconsistent");
- } else {
- fprint(2, "restored old partition tables\n");
- }
- ctlfd = edit->disk->ctlfd;
- offset = edit->disk->offset;
- if(ctlfd >= 0){
- for(i=0; i<edit->npart; i++)
- if(edit->part[i]->ctlname && fprint(ctlfd, "delpart %s", edit->part[i]->ctlname)<0)
- fprint(2, "delpart failed: %s: %r", edit->part[i]->ctlname);
- for(i=0; i<edit->nctlpart; i++)
- if(edit->part[i]->name && fprint(ctlfd, "delpart %s", edit->ctlpart[i]->name)<0)
- fprint(2, "delpart failed: %s: %r", edit->ctlpart[i]->name);
- for(i=0; i<edit->nctlpart; i++){
- if(fprint(ctlfd, "part %s %lld %lld", edit->ctlpart[i]->name,
- edit->ctlpart[i]->start+offset, edit->ctlpart[i]->end+offset) < 0){
- fprint(2, "restored disk partition table but not kernel; reboot\n");
- exits("inconsistent");
- }
- }
- }
- exits("restored");
- }
- /*
- * Read the partition table (including extended partition tables)
- * from the disk into the part array.
- */
- static void
- rdpart(Edit *edit, ulong lba, ulong xbase)
- {
- char *err;
- Table table;
- Tentry *tp, *ep;
- Dospart *p;
- if(xbase == 0)
- xbase = lba;
- diskread(edit->disk, &table, sizeof table, mbroffset+lba, Toffset);
- addrecover(table, mbroffset+lba);
- if(table.magic[0] != Magic0 || table.magic[1] != Magic1) {
- assert(lba != 0);
- return;
- }
- for(tp=table.entry, ep=tp+NTentry; tp<ep && npart < Mpart; tp++) {
- switch(tp->type) {
- case TypeEMPTY:
- break;
- case TypeEXTENDED:
- case TypeEXTHUGE:
- case TypeLINUXEXT:
- rdpart(edit, xbase+getle32(tp->xlba), xbase);
- break;
- default:
- p = mkpart(nil, lba==0, lba+getle32(tp->xlba), getle32(tp->xsize), tp);
- if(err = addpart(edit, p))
- fprint(2, "adding partition: %s\n", err);
- break;
- }
- }
- }
- static void
- blankpart(Edit *edit)
- {
- edit->changed = 1;
- }
- static void
- findmbr(Edit *edit)
- {
- Table table;
- Tentry *tp;
- diskread(edit->disk, &table, sizeof(Table), 0, Toffset);
- if(table.magic[0] != Magic0 || table.magic[1] != Magic1)
- sysfatal("did not find master boot record");
- for(tp = table.entry; tp < &table.entry[NTentry]; tp++)
- if(tp->type == TypeDMDDO)
- mbroffset = edit->disk->s;
- }
- static int
- haveroom(Edit *edit, int primary, vlong start)
- {
- int i, lastsec, n;
- Dospart *p, *q;
- ulong pend, qstart;
- if(primary) {
- /*
- * must be open primary slot.
- * primary slots are taken by primary partitions
- * and runs of secondary partitions.
- */
- n = 0;
- lastsec = 0;
- for(i=0; i<edit->npart; i++) {
- p = (Dospart*)edit->part[i];
- if(p->primary)
- n++, lastsec=0;
- else if(!lastsec)
- n++, lastsec=1;
- }
- return n<4;
- }
- /*
- * secondary partitions can be inserted between two primary
- * partitions only if there is an empty primary slot.
- * otherwise, we can put a new secondary partition next
- * to a secondary partition no problem.
- */
- n = 0;
- for(i=0; i<edit->npart; i++){
- p = (Dospart*)edit->part[i];
- if(p->primary)
- n++;
- pend = p->end;
- if(i+1<edit->npart){
- q = (Dospart*)edit->part[i+1];
- qstart = q->start;
- }else{
- qstart = edit->end;
- q = nil;
- }
- if(start < pend || start >= qstart)
- continue;
- /* we go between these two */
- if(p->primary==0 || (q && q->primary==0))
- return 1;
- }
- /* not next to a secondary, need a new primary */
- return n<4;
- }
- static void
- autopart(Edit *edit)
- {
- char *err;
- int active, i;
- vlong bigstart, bigsize, start;
- Dospart *p;
- for(i=0; i<edit->npart; i++)
- if(((Dospart*)edit->part[i])->type == Type9)
- return;
- /* look for the biggest gap in which we can put a primary partition */
- start = 0;
- bigsize = 0;
- SET(bigstart);
- for(i=0; i<edit->npart; i++) {
- p = (Dospart*)edit->part[i];
- if(p->start > start && p->start - start > bigsize && haveroom(edit, 1, start)) {
- bigsize = p->start - start;
- bigstart = start;
- }
- start = p->end;
- }
- if(edit->end - start > bigsize && haveroom(edit, 1, start)) {
- bigsize = edit->end - start;
- bigstart = start;
- }
- if(bigsize < 1) {
- fprint(2, "couldn't find space or partition slot for plan 9 partition\n");
- return;
- }
- /* set new partition active only if no others are */
- active = Active;
- for(i=0; i<edit->npart; i++)
- if(((Dospart*)edit->part[i])->primary && (((Dospart*)edit->part[i])->active & Active))
- active = 0;
- /* add new plan 9 partition */
- bigsize *= sec2cyl;
- bigstart *= sec2cyl;
- if(bigstart == 0) {
- bigstart += edit->disk->s;
- bigsize -= edit->disk->s;
- }
- p = mkpart(nil, 1, bigstart, bigsize, nil);
- p->active = active;
- p->changed = 1;
- p->type = Type9;
- edit->changed = 1;
- if(err = addpart(edit, p)) {
- fprint(2, "error adding plan9 partition: %s\n", err);
- return;
- }
- }
- typedef struct Name Name;
- struct Name {
- char *name;
- Name *link;
- };
- Name *namelist;
- static void
- plan9print(Dospart *part, int fd)
- {
- int i, ok;
- char *name, *vname;
- Name *n;
- vlong start, end;
- char *sep;
- vname = types[part->type].name;
- if(vname==nil || strcmp(vname, "")==0) {
- part->ctlname = "";
- return;
- }
- start = mbroffset+part->lba;
- end = start+part->size;
- /* avoid names like plan90 */
- i = strlen(vname) - 1;
- if(vname[i] >= '0' && vname[i] <= '9')
- sep = ".";
- else
- sep = "";
- i = 0;
- name = emalloc(strlen(vname)+10);
- sprint(name, "%s", vname);
- do {
- ok = 1;
- for(n=namelist; n; n=n->link) {
- if(strcmp(name, n->name) == 0) {
- i++;
- sprint(name, "%s%s%d", vname, sep, i);
- ok = 0;
- }
- }
- } while(ok == 0);
- n = emalloc(sizeof(*n));
- n->name = name;
- n->link = namelist;
- namelist = n;
- part->ctlname = name;
- if(fd >= 0)
- print("part %s %lld %lld\n", name, start, end);
- }
- static void
- freenamelist(void)
- {
- Name *n, *next;
- for(n=namelist; n; n=next) {
- next = n->link;
- free(n);
- }
- namelist = nil;
- }
- static void
- cmdprintctl(Edit *edit, int ctlfd)
- {
- int i;
- freenamelist();
- for(i=0; i<edit->npart; i++)
- plan9print((Dospart*)edit->part[i], -1);
- ctldiff(edit, ctlfd);
- }
- static char*
- cmdokname(Edit*, char *name)
- {
- char *q;
- if(name[0] != 'p' && name[0] != 's')
- return "name must be pN or sN";
- strtol(name+1, &q, 10);
- if(*q != '\0')
- return "name must be pN or sN";
- return nil;
- }
- #define GB (1024*1024*1024)
- #define MB (1024*1024)
- #define KB (1024)
- static void
- cmdsum(Edit *edit, Part *vp, vlong a, vlong b)
- {
- char *name, *ty;
- char buf[3];
- char *suf;
- Dospart *p;
- vlong sz, div;
- p = (Dospart*)vp;
- buf[0] = p && p->changed ? '\'' : ' ';
- buf[1] = p && (p->active & Active) ? '*' : ' ';
- buf[2] = '\0';
- name = p ? p->name : "empty";
- ty = p ? typestr0(p->type) : "";
- sz = (b-a)*edit->disk->secsize*sec2cyl;
- if(sz >= 1*GB){
- suf = "GB";
- div = GB;
- }else if(sz >= 1*MB){
- suf = "MB";
- div = MB;
- }else if(sz >= 1*KB){
- suf = "KB";
- div = KB;
- }else{
- suf = "B ";
- div = 1;
- }
- if(div == 1)
- print("%s %-12s %*lld %-*lld (%lld cylinders, %lld %s) %s\n", buf, name,
- edit->disk->width, a, edit->disk->width, b, b-a, sz, suf, ty);
- else
- print("%s %-12s %*lld %-*lld (%lld cylinders, %lld.%.2d %s) %s\n", buf, name,
- edit->disk->width, a, edit->disk->width, b, b-a,
- sz/div, (int)(((sz%div)*100)/div), suf, ty);
- }
- static char*
- cmdadd(Edit *edit, char *name, vlong start, vlong end)
- {
- Dospart *p;
- if(!haveroom(edit, name[0]=='p', start))
- return "no room for partition";
- start *= sec2cyl;
- end *= sec2cyl;
- if(start == 0 || name[0] != 'p')
- start += edit->disk->s;
- p = mkpart(name, name[0]=='p', start, end-start, nil);
- p->changed = 1;
- p->type = Type9;
- return addpart(edit, p);
- }
- static char*
- cmddel(Edit *edit, Part *p)
- {
- return delpart(edit, p);
- }
- static char*
- cmdwrite(Edit *edit)
- {
- wrpart(edit);
- return nil;
- }
- static char *help =
- "A name - set partition active\n"
- "P - print table in ctl format\n"
- "R - restore disk back to initial configuration and exit\n"
- "e - show empty dos partitions\n"
- "t name [type] - set partition type\n";
- static char*
- cmdhelp(Edit*)
- {
- print("%s\n", help);
- return nil;
- }
- static char*
- cmdactive(Edit *edit, int nf, char **f)
- {
- int i;
- Dospart *p, *ip;
- if(nf != 2)
- return "args";
- if(f[1][0] != 'p')
- return "cannot set secondary partition active";
- if((p = (Dospart*)findpart(edit, f[1])) == nil)
- return "unknown partition";
- for(i=0; i<edit->npart; i++) {
- ip = (Dospart*)edit->part[i];
- if(ip->active & Active) {
- ip->active &= ~Active;
- ip->changed = 1;
- edit->changed = 1;
- }
- }
- if((p->active & Active) == 0) {
- p->active |= Active;
- p->changed = 1;
- edit->changed = 1;
- }
- return nil;
- }
- static char*
- strupr(char *s)
- {
- char *p;
- for(p=s; *p; p++)
- *p = toupper(*p);
- return s;
- }
- static void
- dumplist(void)
- {
- int i, n;
- n = 0;
- for(i=0; i<256; i++) {
- if(types[i].desc) {
- print("%-16s", types[i].desc);
- if(n++%4 == 3)
- print("\n");
- }
- }
- if(n%4)
- print("\n");
- }
- static char*
- cmdtype(Edit *edit, int nf, char **f)
- {
- char *q;
- Dospart *p;
- int i;
- if(nf < 2)
- return "args";
- if((p = (Dospart*)findpart(edit, f[1])) == nil)
- return "unknown partition";
- if(nf == 2) {
- for(;;) {
- fprint(2, "new partition type [? for list]: ");
- q = getline(edit);
- if(q[0] == '?')
- dumplist();
- else
- break;
- }
- } else
- q = f[2];
- strupr(q);
- for(i=0; i<256; i++)
- if(types[i].desc && strcmp(types[i].desc, q) == 0)
- break;
- if(i < 256 && p->type != i) {
- p->type = i;
- p->changed = 1;
- edit->changed = 1;
- }
- return nil;
- }
- static char*
- cmdext(Edit *edit, int nf, char **f)
- {
- switch(f[0][0]) {
- case 'A':
- return cmdactive(edit, nf, f);
- case 't':
- return cmdtype(edit, nf, f);
- case 'R':
- recover(edit);
- return nil;
- default:
- return "unknown command";
- }
- }
- static int
- Dfmt(Fmt *f)
- {
- char buf[60];
- uchar *p;
- int c, h, s;
- p = va_arg(f->args, uchar*);
- h = p[0];
- c = p[2];
- c |= (p[1]&0xC0)<<2;
- s = (p[1] & 0x3F);
- sprint(buf, "%d/%d/%d", c, h, s);
- return fmtstrcpy(f, buf);
- }
- static void
- writechs(Disk *disk, uchar *p, vlong lba)
- {
- int c, h, s;
- s = lba % disk->s;
- h = (lba / disk->s) % disk->h;
- c = lba / (disk->s * disk->h);
- if(c >= 1024) {
- c = 1023;
- h = disk->h - 1;
- s = disk->s - 1;
- }
- p[0] = h;
- p[1] = ((s+1) & 0x3F) | ((c>>2) & 0xC0);
- p[2] = c;
- }
- static void
- wrtentry(Disk *disk, Tentry *tp, int type, u32int xbase, u32int lba, u32int end)
- {
- tp->type = type;
- writechs(disk, &tp->starth, lba);
- writechs(disk, &tp->endh, end-1);
- putle32(tp->xlba, lba-xbase);
- putle32(tp->xsize, end-lba);
- }
- static int
- wrextend(Edit *edit, int i, vlong xbase, vlong startlba, vlong *endlba)
- {
- int ni;
- Table table;
- Tentry *tp, *ep;
- Dospart *p;
- Disk *disk;
- if(i == edit->npart){
- *endlba = edit->disk->secs;
- Finish:
- if(startlba < *endlba){
- disk = edit->disk;
- diskread(disk, &table, sizeof table, mbroffset+startlba, Toffset);
- tp = table.entry;
- ep = tp+NTentry;
- for(; tp<ep; tp++)
- memset(tp, 0, sizeof *tp);
- table.magic[0] = Magic0;
- table.magic[1] = Magic1;
- if(diskwrite(edit->disk, &table, sizeof table, mbroffset+startlba, Toffset) < 0)
- recover(edit);
- }
- return i;
- }
- p = (Dospart*)edit->part[i];
- if(p->primary){
- *endlba = (vlong)p->start*sec2cyl;
- goto Finish;
- }
- disk = edit->disk;
- diskread(disk, &table, sizeof table, mbroffset+startlba, Toffset);
- tp = table.entry;
- ep = tp+NTentry;
- ni = wrextend(edit, i+1, xbase, p->end*sec2cyl, endlba);
- *tp = p->Tentry;
- wrtentry(disk, tp, p->type, startlba, startlba+disk->s, p->end*sec2cyl);
- tp++;
- if(p->end*sec2cyl != *endlba){
- memset(tp, 0, sizeof *tp);
- wrtentry(disk, tp, TypeEXTENDED, xbase, p->end*sec2cyl, *endlba);
- tp++;
- }
- for(; tp<ep; tp++)
- memset(tp, 0, sizeof *tp);
- table.magic[0] = Magic0;
- table.magic[1] = Magic1;
- if(diskwrite(edit->disk, &table, sizeof table, mbroffset+startlba, Toffset) < 0)
- recover(edit);
- return ni;
- }
- static void
- wrpart(Edit *edit)
- {
- int i, ni, t;
- Table table;
- Tentry *tp, *ep;
- Disk *disk;
- vlong s, endlba;
- Dospart *p;
- disk = edit->disk;
- diskread(disk, &table, sizeof table, mbroffset, Toffset);
- tp = table.entry;
- ep = tp+NTentry;
- for(i=0; i<edit->npart && tp<ep; ) {
- p = (Dospart*)edit->part[i];
- if(p->start == 0)
- s = disk->s;
- else
- s = p->start*sec2cyl;
- if(p->primary) {
- *tp = p->Tentry;
- wrtentry(disk, tp, p->type, 0, s, p->end*sec2cyl);
- tp++;
- i++;
- } else {
- ni = wrextend(edit, i, p->start*sec2cyl, p->start*sec2cyl, &endlba);
- memset(tp, 0, sizeof *tp);
- if(endlba >= 1024*sec2cyl)
- t = TypeEXTHUGE;
- else
- t = TypeEXTENDED;
- wrtentry(disk, tp, t, 0, s, endlba);
- tp++;
- i = ni;
- }
- }
- for(; tp<ep; tp++)
- memset(tp, 0, sizeof(*tp));
-
- if(i != edit->npart)
- sysfatal("cannot happen #1");
- if(diskwrite(disk, &table, sizeof table, mbroffset, Toffset) < 0)
- recover(edit);
- /* bring parts up to date */
- freenamelist();
- for(i=0; i<edit->npart; i++)
- plan9print((Dospart*)edit->part[i], -1);
- if(ctldiff(edit, disk->ctlfd) < 0)
- fprint(2, "?warning: partitions could not be updated in devsd\n");
- }
|