add Version 1.4 of sa.format
This commit is contained in:
Oliver Lehmann
parent
4966463c10
commit
1c10300e31
|
|
@ -0,0 +1,264 @@
|
|||
/*----------------------------------------------------*/
|
||||
/* Standalone-Programm sa.format */
|
||||
/*----------------------------------------------------*/
|
||||
/* Programm zum Formatieren eines Hard-Disk-Laufwerks */
|
||||
/*----------------------------------------------------*/
|
||||
|
||||
char buf[10] ;
|
||||
char dat_buf[512] ;
|
||||
main()
|
||||
{ unsigned int kc;
|
||||
unsigned int drs,cyls,hds,secs,lg;
|
||||
unsigned int cyl_b,cyl_e,hd_b,hd_e,b_hd,e_hd;
|
||||
unsigned int cyl,head;
|
||||
unsigned int i,k;
|
||||
unsigned int az,cs,cl,he;
|
||||
unsigned int drive;
|
||||
long int blks;
|
||||
unsigned int c_c;
|
||||
unsigned int rg7,rg6,rg5,rg4;
|
||||
char *db;
|
||||
char *pb;
|
||||
|
||||
printf("\n*** Format Hard-Disk V. 1.4 ***\n");
|
||||
rg7 = 0x2800;
|
||||
rg4 = 0x0002;
|
||||
db = &dat_buf[0];
|
||||
pb = &buf[0];
|
||||
c_c = wdc(rg7,rg6,rg5,rg4,db);
|
||||
if (c_c != 0) c_c = wdc(rg7,rg6,rg5,rg4,db);
|
||||
if (c_c != 0) goto error;
|
||||
|
||||
/* Umladen der wesentlichen Parameter */
|
||||
drs = dat_buf[12] & 0xff;
|
||||
dat_buf[12] = 0x00;
|
||||
cyls = ((dat_buf[14] & 0xff) << 8) | (dat_buf[13] & 0xff);
|
||||
hds = dat_buf[15] & 0xff;
|
||||
secs = dat_buf[16] & 0xff;
|
||||
lg = ((dat_buf[18] & 0xff) << 8) | (dat_buf[17] & 0xff);
|
||||
cs = dat_buf[24] & 0xff;
|
||||
blks = cs * 256;
|
||||
cs = dat_buf[23];
|
||||
cs = cs & 0x00ff;
|
||||
blks = blks + cs;
|
||||
blks = blks * 256;
|
||||
cs = dat_buf[22];
|
||||
cs = cs & 0x00ff;
|
||||
blks = blks + cs;
|
||||
blks = blks * 256;
|
||||
cs = dat_buf[21];
|
||||
cs = cs & 0x00ff;
|
||||
blks = blks + cs;
|
||||
blks = blks + 1;
|
||||
|
||||
/* Ausgabe der Parameter */
|
||||
printf(" WDC-Firmware-Version: '%s'\n Drives: %d Cylinders: %d Heads: %d\n Sectors: %d Bytes/Sector: %d\n Blocks/Drive: %D\n\n",dat_buf,drs,cyls,hds,secs,lg,blks);
|
||||
|
||||
/* Abfrage des Laufwerks */
|
||||
/*
|
||||
do
|
||||
{ printf(" Drive: ");
|
||||
gets(buf,10);
|
||||
drive = atoi(pb);
|
||||
} while (drive >= drs);
|
||||
*/
|
||||
drive = 0;
|
||||
|
||||
/* Abfrage, ob die BTT vom Laufwerk eingelesen werden soll */
|
||||
ft1:
|
||||
printf(" Read BTT from HD in WDC-RAM ? ");
|
||||
gets(buf,10);
|
||||
if (buf[0] != 'y' && buf[0] != 'Y') goto ft8;
|
||||
/* Einlesen der BTT vom Laufwerk */
|
||||
rg7 = 0x4100;
|
||||
c_c = wdc(rg7,rg6,rg5,rg4,db);
|
||||
if (c_c == 0) goto ft9;
|
||||
if (c_c == 6)
|
||||
{ printf(" BTT not ok.\n");
|
||||
goto ft8;
|
||||
}
|
||||
printf(" Read Error Cylinder 0, Head 0\n");
|
||||
printf(" Format Cylinder 0, Head 0 ? ");
|
||||
gets(buf,10);
|
||||
if (buf[0] != 'y' && buf[0] != 'Y') goto ft1;
|
||||
/* Formatieren Zylinder 0, Kopf 0 */
|
||||
rg7 = 0x2400;
|
||||
rg6 = 0x0000;
|
||||
rg5 = 0x0001;
|
||||
rg4 = 0x0300;
|
||||
c_c = wdc(rg7,rg6,rg5,rg4,db);
|
||||
if (c_c != 0) goto error;
|
||||
|
||||
ft8:
|
||||
/* Loeschen der Defektspurtabelle im WDC-RAM */
|
||||
rg7 = 0x4800;
|
||||
c_c = wdc(rg7,rg6,rg5,rg4,db);
|
||||
if (c_c != 0) goto error;
|
||||
|
||||
ft9:
|
||||
/* Lesen der WDC-RAM-Defektspurtabelle und Ausgabe */
|
||||
rg7 = 0x0800; /*WDC-RAM-Lesen & Laufwerk*/
|
||||
rg6 = 0x3600; /*WDC-RAM-Adresse der BTT*/
|
||||
rg5 = 0x0000;
|
||||
rg4 = 0x8000; /*Anzahl der Bytes*/
|
||||
c_c = wdc(rg7,rg6,rg5,rg4,db); /*Ausfuehrung*/
|
||||
if (c_c != 0) goto error;
|
||||
if (dat_buf[0] == 0 && dat_buf[1] == 0)
|
||||
printf(" No Entries in Bad Track Table (BTT)\n");
|
||||
else
|
||||
{ printf(" Entries in Bad Track Table:\n");
|
||||
for(i = 2;dat_buf[i] != 0xff;i = i+3)
|
||||
{
|
||||
cs = ((dat_buf[i] & 0xff) << 8) | (dat_buf[i+1] & 0xff);
|
||||
printf(" Cyl %d Hd %d\n",cs,dat_buf[i+2] & 0xff);
|
||||
}
|
||||
}
|
||||
|
||||
/* Abfrage der Handeingabe von Defektspuren */
|
||||
printf("\n Manual Input of Bad Track ? ");
|
||||
gets(buf,10);
|
||||
if (buf[0] != 'y' && buf[0] != 'Y') goto ft2;
|
||||
/* Handeingabe von Defektspuren */
|
||||
ft3:
|
||||
do
|
||||
{ printf(" Bad Track: Cylinder ");
|
||||
gets(buf,10);
|
||||
if (buf[0] == '\0') goto ft2;
|
||||
cl = atoi(pb);
|
||||
} while (cl >= cyls);
|
||||
do
|
||||
{ printf(" Head ");
|
||||
gets(buf,10);
|
||||
he = atoi(pb);
|
||||
} while (he >= hds);
|
||||
/* Einordnen der Defektspur in die vorhandene BTT */
|
||||
az = ((dat_buf[1]&0xff)<<8) | (dat_buf[0]&0xff);
|
||||
for (i=2;;i=i+3)
|
||||
{
|
||||
cs = ((dat_buf[i] & 0xff) << 8) | (dat_buf[i+1] & 0xff);
|
||||
if ( cs==cl && (dat_buf[i+2]&0xff)==(he&0xff) ) break;
|
||||
if ( cs>cl || ((cs==cl) && ((dat_buf[i+2]&0xff)>(he&0xff))) )
|
||||
{
|
||||
for (k = az+4; k >= i; k--)
|
||||
dat_buf[k+3] = dat_buf[k];
|
||||
dat_buf[i] = (((cl & 0xff00) >> 8) & 0xff);
|
||||
dat_buf[i+1] = cl & 0x00ff;
|
||||
dat_buf[i+2] = he;
|
||||
az = az + 3;
|
||||
dat_buf[0] = az & 0x00ff;
|
||||
dat_buf[1] = (((az & 0xff00) >> 8) & 0xff);
|
||||
break;
|
||||
}
|
||||
}
|
||||
goto ft3;
|
||||
|
||||
/* Uebertragen der durch Handeingabe erzeugten Defektspurtabelle in den WDC-RAM */
|
||||
ft2:
|
||||
printf("\n");
|
||||
rg7 = 0x1800; /*WDC-RAM-Schreiben*/
|
||||
rg6 = 0x3600; /*WDC-RAM-Adresse der BTT*/
|
||||
rg5 = 0x0000;
|
||||
rg4 = 0x8000; /*Anzahl der Bytes*/
|
||||
c_c = wdc(rg7,rg6,rg5,rg4,db); /*Ausfuehrung*/
|
||||
if (c_c != 0) goto error;
|
||||
|
||||
/* Abfrage der Spur-Parameter */
|
||||
ft5:
|
||||
cyl_b = 0;
|
||||
cyl_e = cyls-1;
|
||||
b_hd = 0;
|
||||
e_hd = hds-1;
|
||||
/* Abfrage des Start-Zylinders */
|
||||
printf(" Format Begin: Cylinder ");
|
||||
gets(buf,10);
|
||||
if (buf[0] != 'a' && buf[0] != 'A')
|
||||
{ cyl_b = atoi(pb);
|
||||
if (cyl_b >= cyls) goto ft5;
|
||||
/* Abfrage des Beginn-Kopfs */
|
||||
do
|
||||
{ printf(" Head ");
|
||||
gets(buf,10);
|
||||
b_hd = atoi(pb);
|
||||
} while (b_hd >= hds);
|
||||
|
||||
/* Abfrage des End-Zylinders */
|
||||
do
|
||||
{ printf(" Format End: Cylinder ");
|
||||
gets(buf,10);
|
||||
cyl_e = atoi(pb);
|
||||
} while (cyl_e >= cyls || cyl_e < cyl_b);
|
||||
|
||||
/* Abfrage des End-Kopfes */
|
||||
do
|
||||
{ printf(" Head ");
|
||||
gets(buf,10);
|
||||
e_hd = atoi(pb);
|
||||
} while ((e_hd >= hds) || (cyl_e == cyl_b && e_hd < b_hd));
|
||||
}
|
||||
|
||||
/* Ready-Abfrage */
|
||||
printf(" Ready for format from Cyl %d Hd %d to Cyl %d Hd %d : ",cyl_b,b_hd,cyl_e,e_hd);
|
||||
gets(buf,10);
|
||||
if (buf[0] != 'y' && buf[0] != 'Y') exit();
|
||||
|
||||
/* Parameter vorbereiten */
|
||||
rg7 = 0x2400; /*Kommandocode & Laufwerk*/
|
||||
rg4 = 0x0300; /*Laenge einer ev. Ausgabe = 3*/
|
||||
for (cyl = cyl_b;cyl <= cyl_e;cyl++)
|
||||
{ hd_b = 0;
|
||||
hd_e = hds - 1;
|
||||
if (cyl == cyl_b) hd_b = b_hd;
|
||||
if (cyl == cyl_e) hd_e = e_hd;
|
||||
for (head = hd_b;head <= hd_e;head++)
|
||||
{ printf(" Format Cyl %d Hd %d\r",cyl,head);
|
||||
rg6 = cyl & 0x00ff;
|
||||
rg6 = rg6 << 8;
|
||||
rg5 = cyl & 0xff00;
|
||||
rg5 = rg5 >> 8;
|
||||
rg5 = rg5 & 0x00ff;
|
||||
rg6 = rg6 | rg5;
|
||||
rg5 = head & 0x00ff;
|
||||
rg5 = rg5 << 8;
|
||||
c_c = wdc(rg7,rg6,rg5,rg4,pb);
|
||||
if (c_c == 0x21)
|
||||
{ cs = ((buf[1] & 0xff) << 8) | (buf[0] & 0xff);
|
||||
printf(" New Entry in BTT: Cyl %d Hd %d\n",cs,buf[2]&0xff);
|
||||
continue;
|
||||
}
|
||||
if (c_c != 0) goto error;
|
||||
}
|
||||
}
|
||||
|
||||
/* Lesen und Ausgabe der Defektspurtabelle aus dem WC-RAM */
|
||||
rg7 = 0x0800; /*WDC-RAM-Lesen & Laufwerk*/
|
||||
rg6 = 0x3600; /*WDC-RAM-Adresse der BTT*/
|
||||
rg5 = 0x0000;
|
||||
rg4 = 0x8000; /*Anzahl der Bytes*/
|
||||
c_c = wdc(rg7,rg6,rg5,rg4,db); /*Ausfuehrung*/
|
||||
if (c_c != 0) goto error;
|
||||
if (dat_buf[0] == 0 && dat_buf[1] == 0)
|
||||
printf(" No Entries in Bad Track Table (BTT)\n");
|
||||
else
|
||||
{ printf("\n Entries in Bad Track Table:\n");
|
||||
for(i = 2;dat_buf[i] != 0xff;i = i+3)
|
||||
{
|
||||
cs = ((dat_buf[i] & 0xff) << 8) | (dat_buf[i+1] & 0xff);
|
||||
printf(" Cyl %d Hd %d\n",cs,dat_buf[i+2] & 0xff);
|
||||
}
|
||||
}
|
||||
|
||||
/* Schreiben der BTT aus dem WDC-RAM auf das Laufwerk ? */
|
||||
printf(" Rewrite BTT from WDC-RAM to HD ? ");
|
||||
gets(buf,10);
|
||||
if (buf[0] != 'y' && buf[0] != 'Y') exit();
|
||||
rg7 = 0xc200; /*Kommandocode & Laufwerk*/
|
||||
c_c = wdc(rg7,rg6,rg5,rg4,db);
|
||||
if (c_c != 0) goto error;
|
||||
exit();
|
||||
|
||||
/* Fehlerbehandlung */
|
||||
error:
|
||||
printf(" Error %x\n",c_c);
|
||||
exit();
|
||||
}
|
||||
|
||||
Loading…
Reference in New Issue