Update DskFDC.HC

FDCWriteBlks now checks if the disk is write-protected before attempting a write, throwing an exception if it is. I also reworked the retry check for both it and FDCReadBlks.

1 files changed, 5 insertions, 2 deletions

diff --git a/Kernel/BlkDev/DskFDC.HC b/Kernel/BlkDev/DskFDC.HC
index 08dc470..ba4c007 100644
--- a/Kernel/BlkDev/DskFDC.HC
+++ b/Kernel/BlkDev/DskFDC.HC
@@ -309,7 +309,7 @@ U0 FDCReadBlks(CBlkDev *bd,U8 *buf,I64 blk,I64 cnt)
   Bool unlock=BlkDevLock(bd);
 
   retry:
-  if (retries==0) throw('BlkDev');
+  if (retries) throw('BlkDev');
 
   FDCSelDrv(bd);
 
@@ -352,8 +352,11 @@ U0 FDCWriteBlks(CBlkDev *bd,U8 *buf,I64 blk,I64 cnt)
   U8 c,h,s,st0;
   Bool unlock=BlkDevLock(bd);
 
+  if (Bt(InU8(bd->base0+FDC_STAT_A),2))
+    throw('BlkDev');
+
   retry:
-  if (retries==0) throw('BlkDev');
+  if (!retries) throw('BlkDev');
 
   MemCpy(&FDC_DMA,buf,cnt);