add Version 2.0 of sa.verify
This commit is contained in:
Oliver Lehmann
parent
1c10300e31
commit
376a18b43e
|
|
@ -0,0 +1,179 @@
|
||||||
|
/* Verify mit BTT-Beruecksichtigung */
|
||||||
|
|
||||||
|
#define CUR_UP '\013'
|
||||||
|
|
||||||
|
char ebuf[10],dbuf[512];
|
||||||
|
int btr[40],btr_h[40];
|
||||||
|
char *ep0,*dp;
|
||||||
|
char c;
|
||||||
|
int p_cnt,z_cnt;
|
||||||
|
int rg7,rg6,rg5,rg4;
|
||||||
|
int c_c;
|
||||||
|
int kc,drv,cyl,head,sec;
|
||||||
|
int drs,cyls,heads,secs,lg,wadd,wlen;
|
||||||
|
int cyl_b,cyl_e,entrs;
|
||||||
|
long int zl,zw0,zw1,block,blocks;
|
||||||
|
int i,i1,j,k;
|
||||||
|
long int atol();
|
||||||
|
|
||||||
|
main()
|
||||||
|
{
|
||||||
|
/* Ausgabe Ueberschrift und Setzen der Anfangswerte */
|
||||||
|
printf("**** Verify V. 2.0 ****\n");
|
||||||
|
dp = &dbuf[0];
|
||||||
|
/* Uebernahme der WDC-PROM-Parameter */
|
||||||
|
rg7 = 0x2800;
|
||||||
|
rg4 = 0x0002;
|
||||||
|
c_c = wdc(rg7,rg6,rg5,rg4,dp);
|
||||||
|
if (c_c !=0 ) c_c = wdc(rg7,rg6,rg5,rg4,dp);
|
||||||
|
if (c_c !=0 ) goto err_h;
|
||||||
|
/* Umladen und Ausgabe der wesentlichen Parameter */
|
||||||
|
drs = dbuf[12] & 0xff;
|
||||||
|
dbuf[12] = 0x00; /* Endekennung fuer printf */
|
||||||
|
cyls = ((dbuf[14] & 0xff) << 8) | (dbuf[13] & 0xff);
|
||||||
|
heads = dbuf[15] & 0xff;
|
||||||
|
secs = dbuf[16] & 0xff;
|
||||||
|
lg = ((dbuf[18] & 0xff) << 8) | (dbuf[17] & 0xff);
|
||||||
|
zw0 = ((dbuf[24] & 0xff) << 8) | (dbuf[23] & 0xff);
|
||||||
|
zw1 = ((dbuf[22] & 0xff) << 8) | (dbuf[21] & 0xff);
|
||||||
|
blocks = ((zw0 & 0xffff) * 65536) + (zw1 & 0xffff) + 1;
|
||||||
|
printf(" WDC-Firmware-Version: '%s'\n Drives: %d Cylinders: %d Heads: %d\n Sectors: %d Bytes/Sector: %d\n Blocks/Drive: ",dbuf,drs,cyls,heads,secs,lg);
|
||||||
|
prt(blocks,10);
|
||||||
|
printf("\n\n");
|
||||||
|
|
||||||
|
/* Abfrage des Laufwerks */
|
||||||
|
driv:
|
||||||
|
ep0 = &ebuf[0];
|
||||||
|
printf(" Drive: ");
|
||||||
|
gets(ebuf,10);
|
||||||
|
drv = atoi(ep0);
|
||||||
|
if (drv >= drs) {printf(" ?\n"); goto driv;}
|
||||||
|
|
||||||
|
/* Lesen der BTT aus dem WDC-RAM in den Host */
|
||||||
|
/* kc = 0x58; */
|
||||||
|
kc = 0x08;
|
||||||
|
rg7 = 0x0800;
|
||||||
|
rg6 = 0x3600;
|
||||||
|
dp = &dbuf[0];
|
||||||
|
lg = 40*3+2;
|
||||||
|
rg4 = 0x7a00;
|
||||||
|
/* rg_um1(); */
|
||||||
|
c_c = wdc(rg7,rg6,rg5,rg4,dp);
|
||||||
|
if (c_c != 0) goto err_h;
|
||||||
|
|
||||||
|
/* Umwandlung und Ausgabe der BTT */
|
||||||
|
entrs = ((dbuf[0] & 0xff) | ((dbuf[1] & 0xff) << 8)) / 3;
|
||||||
|
printf(" %d Entries in BTT of Drive %d\n",entrs,drv);
|
||||||
|
for (i=2,k=0;entrs>0 && k<entrs;i=i+3,k++)
|
||||||
|
{
|
||||||
|
btr[k] = ((dbuf[i] & 0xff) << 8) | (dbuf[i+1] & 0xff);
|
||||||
|
btr_h[k] = dbuf[i+2] & 0xff;
|
||||||
|
printf(" Cyl %d Head %d\n",btr[k],btr_h[k]);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Abfrage der Spur-Parameter */
|
||||||
|
b_abfr:
|
||||||
|
cyl_b = 0;
|
||||||
|
cyl_e = cyls-1;
|
||||||
|
printf(" Begin: Cylinder ");
|
||||||
|
gets(ebuf,10);
|
||||||
|
if (ebuf[0] != 'a' && ebuf[0] != 'A')
|
||||||
|
{ cyl_b = atoi(ep0);
|
||||||
|
if (cyl_b >= cyls)
|
||||||
|
{ printf(" ?\n");
|
||||||
|
goto b_abfr;
|
||||||
|
}
|
||||||
|
|
||||||
|
printf(" End: Cylinder ");
|
||||||
|
gets(ebuf,10);
|
||||||
|
cyl_e = atoi(ep0);
|
||||||
|
if (cyl_e >= cyls || cyl_e < cyl_b)
|
||||||
|
{ printf(" ?\n");
|
||||||
|
goto b_abfr;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Ausfuehrung des Ruecklesens mit Beruecksichtigung der defekten Spuren */
|
||||||
|
for (cyl = cyl_b;cyl <= cyl_e;cyl++)
|
||||||
|
{
|
||||||
|
printf(" Cylinder %d \r",cyl);
|
||||||
|
kc = 0x44;
|
||||||
|
for (head=0;head<heads;head++)
|
||||||
|
{
|
||||||
|
for (i=0;i<entrs;i++)
|
||||||
|
{
|
||||||
|
if (cyl == btr[i] && head == btr_h[i]) goto sl_hd;
|
||||||
|
}
|
||||||
|
rg_um1();
|
||||||
|
c_c = wdc(rg7,rg6,rg5,rg4,dp);
|
||||||
|
if (c_c != 0)
|
||||||
|
{
|
||||||
|
printf("\nError %x --- Kc %x Dr %d Cy %d Hd %d continue ?",c_c,kc,drv,cyl,head);
|
||||||
|
gets(ebuf,10);
|
||||||
|
if (ebuf[0] != 'y' && ebuf[0] != 'Y') goto ende;
|
||||||
|
}
|
||||||
|
sl_hd: continue;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
goto ende;
|
||||||
|
|
||||||
|
|
||||||
|
/* Fehlerauswertung */
|
||||||
|
err_h:
|
||||||
|
printf("\nError %x --- Kc %x\n",c_c,kc);
|
||||||
|
|
||||||
|
ende:
|
||||||
|
printf("Verify complete\n");
|
||||||
|
exit();
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
/* UP rg_um1 */
|
||||||
|
rg_um1()
|
||||||
|
{
|
||||||
|
rg7 = ((kc & 0x00ff) << 8) | (drv & 0x00ff);
|
||||||
|
rg6 = ((cyl & 0x00ff) << 8) | ((cyl & 0xff00) >> 8);
|
||||||
|
rg5 = ((head & 0x00ff) << 8) | (sec & 0x00ff);
|
||||||
|
rg4 = ((lg & 0x00ff) << 8) | ((lg & 0xff00) >> 8);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* UP rg_um2 */
|
||||||
|
rg_um2()
|
||||||
|
{
|
||||||
|
rg7 = ((kc & 0x00ff) << 8) | (drv & 0x00ff);
|
||||||
|
rg6 = ((cyl & 0x00ff) << 8) | ((cyl & 0xff00) >> 8);
|
||||||
|
rg5 = ((head & 0x00ff) << 8) | (sec & 0x00ff);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* UP rg_um_bl */
|
||||||
|
rg_um_bl()
|
||||||
|
{
|
||||||
|
rg7 = ((kc & 0x00ff) << 8) | (drv & 0x00ff);
|
||||||
|
rg6 = ((block & 0x000000ff) << 8) | ((block & 0x0000ff00) >> 8);
|
||||||
|
rg5 = ((block & 0x00ff0000) >> 8) | ((block & 0xff000000) >> 24);
|
||||||
|
rg4 = ((lg & 0x00ff) << 8) | ((lg & 0xff00) >> 8);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* UP atox */
|
||||||
|
atox(s)
|
||||||
|
char *s;
|
||||||
|
{
|
||||||
|
unsigned int n;
|
||||||
|
for (n = 0;(*s >= '0' && *s <= '9') || (*s >= 'a' && *s <='f');s++)
|
||||||
|
{
|
||||||
|
n = 16 * n + *s - '0';
|
||||||
|
if (*s >= 'a') n = n - 0x27;
|
||||||
|
}
|
||||||
|
return(n);
|
||||||
|
}
|
||||||
|
|
||||||
|
prt(lo,b)
|
||||||
|
register long lo;
|
||||||
|
register b;
|
||||||
|
{
|
||||||
|
register long a;
|
||||||
|
if (a = lo/b) prt(a,b);
|
||||||
|
putchar("0123456789ABCDEF"[(int)(lo%b)]);
|
||||||
|
}
|
||||||
|
|
||||||
Loading…
Reference in New Issue