MZ is back!HEADmain

1 files changed, 38 insertions, 0 deletions

diff --git a/v4.0/src/INC/DPB.C b/v4.0/src/INC/DPB.C
new file mode 100644
index 0000000..e6ce8b9
--- /dev/null
+++ b/v4.0/src/INC/DPB.C
@@ -0,0 +1,38 @@
+/* dpb.c - retrieve DPB for physical drive */
+
+#include "types.h"
+#include "sysvar.h"
+#include "dpb.h"
+#include "cds.h"
+
+extern char NoMem[], ParmNum[], BadParm[] ;
+extern struct sysVarsType SysVars ;
+
+
+/* Walk the DPB list trying to find the appropriate DPB */
+
+long GetDPB(i)
+int i ;
+{
+        struct DPBType DPB ;
+        struct DPBType *pd = &DPB ;
+        struct DPBType far *dptr ;
+        int j ;
+
+        *(long *)(&dptr) = DPB.nextDPB = SysVars.pDPB ;
+        DPB.drive = -1 ;
+
+        while (DPB.drive != i) {
+                if ((int)DPB.nextDPB == -1)
+                        return -1L ;
+
+                *(long *)(&dptr) = DPB.nextDPB ;
+
+                for (j=0 ; j < sizeof(DPB) ; j++)
+                         *((char *)pd+j) = *((char far *)dptr+j) ;
+
+        } ;
+        return (long)dptr ;
+}
+
+
\ No newline at end of file