$PAGE "Include File For I/O Structure Access"                  <<jb.dc>>00010000
                                                               <<jb.dc>>00015000
<<=======================================================>>    <<jb.dc>>00020000
<<                                                       >>    <<jb.dc>>00025000
<<                 inclio - a0                           >>    <<jb.dc>>00030000
<<                                                       >>    <<jb.dc>>00035000
<<=======================================================>>    <<jb.dc>>00040000
comment                                                        <<jb.dc>>00045000
                                                               <<jb.dc>>00050000
include file for disc related defines and equates              <<jb.dc>>00055000
and memory management - i/o system interfacing fields          <<jb.dc>>00060000
                                                               <<jb.dc>>00065000
;                                                              <<jb.dc>>00070000
                                                               <<jb.dc>>00075000
integer pointer s'discreq = %31,                               <<jb.dc>>00080000
                s'lpdt = %10,                                  <<jb.dc>>00085000
                s'dst = %2,                                    <<jb.dc>>00090000
                s'ditp = %0;   << sysbase relative >>          <<jb.dc>>00095000
                                                               <<jb.dc>>00100000
<<disc request entry flags definitions>>                       <<jb.dc>>00105000
                                                               <<jb.dc>>00110000
define                                                         <<jb.dc>>00115000
                                                                        00120000
       abortreqattmptflag=(0:1)#,                              <<jb.dc>>00125000
       mmdiscreqflag=(1:1)#,                                   <<jb.dc>>00130000
       reqsysbufr=(3:1)#,                                      <<jb.dc>>00135000
       reqqueuedflag=(9:1)#,                                   <<jb.dc>>00140000
       ditscurrreqflag=(12:1)#,                                <<jb.dc>>00145000
       defferedreqflag=(13:1)#,                                <<jb.dc>>00150000
       disabledreqflag=(13:1)#,  << for mpeiv compatibility >> <<jb.dc>>00155000
       logreqflag=(14:1)#;                                     <<jb.dc>>00160000
                                                               <<jb.dc>>00165000
<<disc req entry flag bit numbers>>                            <<jb.dc>>00170000
                                                               <<jb.dc>>00175000
equate abortreqattmptbit=0,                                    <<jb.dc>>00180000
       deferredreqbit=13,                                      <<jb.dc>>00185000
       reqqueuedbit=9,                                         <<jb.dc>>00190000
       ditscurrreqbit=12,                                      <<jb.dc>>00195000
       mmdiscreqbit=1;                                         <<jb.dc>>00200000
                                                               <<jb.dc>>00205000
<<function code equates>>                                      <<jb.dc>>00210000
                                                               <<jb.dc>>00215000
equate readreq=0,                                              <<jb.dc>>00220000
       writereq=1; <<function code>>                           <<jb.dc>>00225000
                                                               <<jb.dc>>00230000
<<xfer status definitions>>                                    <<jb.dc>>00235000
                                                               <<jb.dc>>00240000
equate                                                         <<jb.dc>>00245000
                                                               <<jb.dc>>00250000
   iostatusok = 1 ;                                            <<jb.dc>>00255000
                                                               <<jb.dc>>00260000
<<urgency class definition>>                                   <<jb.dc>>00265000
                                                               <<jb.dc>>00270000
equate requrgclassword=1,                                      <<jb.dc>>00275000
                                                               <<jb.dc>>00280000
       bkgrndreadpri=181,                                      <<jb.dc>>00285000
       forcedwritepri=10,                                      <<jb.dc>>00290000
       bkgrndpri=255;                                          <<jb.dc>>00295000
                                                               <<jb.dc>>00300000
<<=============>>                                              <<jb.dc>>00305000
<<dit structure>>                                              <<jb.dc>>00310000
<<=============>>                                              <<jb.dc>>00315000
                                                               <<jb.dc>>00320000
logical array dit00(*)=db+0,                                   <<jb.dc>>00325000
              dit01(*)=db+1,                                   <<jb.dc>>00330000
              dit02(*)=db+2,                                   <<jb.dc>>00335000
              dit04(*)=db+4;                                   <<jb.dc>>00340000
                                                               <<jb.dc>>00345000
define ditflags=dit00(x)#,                                     <<jb.dc>>00350000
       nextditsysbaseinx=dit01(x)#,                            <<jb.dc>>00355000
       ditioqp=dit02(x)#,                                      <<jb.dc>>00360000
       ditdltp=dit04(x)#;                                      <<jb.dc>>00365000
                                                               <<jb.dc>>00370000
integer array discdit00(*)=db+0,                               <<jb.dc>>00375000
              discdit01(*)=db+1,                               <<jb.dc>>00380000
              discdit02(*)=db+2,                               <<jb.dc>>00385000
              discdit03(*)=db+3,                               <<jb.dc>>00390000
              discdit04(*)=db+4,                               <<jb.dc>>00395000
              discdit05(*)=db+5,                               <<jb.dc>>00400000
              discdit06(*)=db+6,                               <<jb.dc>>00405000
              discdit07(*)=db+7,                               <<jb.dc>>00410000
              discdit08(*)=db+8,                               <<jb.dc>>00415000
              discdit09(*)=db+9;                               <<jb.dc>>00420000
                                                               <<jb.dc>>00425000
define ditactiveflag=(2:1)#,                                   <<jb.dc>>00430000
       dit'cache'enabled = (4:1)#;                             <<jb.dc>>00435000
                                                               <<jb.dc>>00440000
define ditqheadp=discdit08(x)#,                                <<jb.dc>>00445000
       ditqtailp=discdit09(x)#,                                <<jb.dc>>00450000
       ditcurrentreqp=discdit02(x)#;                           <<jb.dc>>00455000
                                                               <<jb.dc>>00460000
define conf'disc'req'cnt=(0:8)#;                               <<jb.dc>>00465000
                                                               <<jb.dc>>00470000
equate                                                         <<jb.dc>>00475000
                                                               <<jb.dc>>00480000
   deferredqheadword = 8 ; <<pts to pnding q from entry 0 of>> <<jb.dc>>00485000
                          <<discreqtab>>                       <<jb.dc>>00490000
                                                               <<jb.dc>>00495000
<< parameter equates for queue/dequeue disc req >>             <<jb.dc>>00500000
                                                               <<jb.dc>>00505000
equate                                                         <<jb.dc>>00510000
                                                               <<jb.dc>>00515000
   <<qtype parameter>>                                         <<jb.dc>>00520000
                                                               <<jb.dc>>00525000
   deferredreqq = 0,                                           <<jb.dc>>00530000
   cdtreqq = 1,                                                <<jb.dc>>00535000
   ditreqq = 2;                                                <<jb.dc>>00540000
equate serwq = 4; <<temp-get rid of this in mpev>>             <<dc.dc>>00545000
<< serialwriteqmgr's controlcode parameter specification>>     <<dc.dc>>00550000
                                                               <<dc.dc>>00555000
equate serwqqueuecode=0,                                       <<dc.dc>>00560000
       serwqdequeuecode = 1,                                   <<dc.dc>>00565000
       serwqbumppricode= 2;                                    <<dc.dc>>00570000
                                                               <<dc.dc>>00575000
<< serialwriteqmgr's return parameter specification.>>         <<dc.dc>>00580000
                                                               <<dc.dc>>00585000
equate serwqerrallok = 0,                                      <<dc.dc>>00590000
       serwqerrnothead =1;                                     <<dc.dc>>00595000
                                                               <<jb.dc>>00600000
<<parameter descriptions for discqmanager>>                    <<jb.dc>>00605000
                                                               <<jb.dc>>00610000
define abortdiscreqflag=(0:1)#, <<discqmanager's requesttype pa<<jb.dc>>00615000
       disablediscreqflag=(15:1)#;                             <<jb.dc>>00620000
equate                                                         <<jb.dc>>00625000
       queuereqcode=0,                                         <<jb.dc>>00630000
       defereqcode=1,                                          <<jb.dc>>00635000
       abortreqcode=%100000;                                   <<jb.dc>>00640000
                                                                        00645000
<<================================>>                           <<jb.dc>>00650000
<<dlt mm/driver communication bits>>                           <<jb.dc>>00655000
<<================================>>                           <<jb.dc>>00660000
                                                               <<jb.dc>>00665000
integer array dlt(*)=db+0;                                     <<jb.dc>>00670000
                                                               <<jb.dc>>00675000
define dltflags=dlt(x)#,                                       <<jb.dc>>00680000
       dltdrvrfrznflag=(8:1)#,                                 <<jb.dc>>00685000
       dltmmerrorcflag=(9:1)#;                                 <<jb.dc>>00690000
                                                               <<jb.dc>>00695000
<<===========>>                                                <<jb.dc>>00700000
<<general ioq>>                                                <<jb.dc>>00705000
<<===========>>                                                <<jb.dc>>00710000
                                                               <<jb.dc>>00715000
integer array ioq00(*)=db+0,                                   <<jb.dc>>00720000
              ioq02(*)=db+2;                                   <<jb.dc>>00725000
                                                               <<jb.dc>>00730000
define ioqflags=ioq00(x)#,                                     <<jb.dc>>00735000
       ioqldevnumber=ioq02(x).(8:8)#,                          <<jb.dc>>00740000
       ioqdatafznflag=(7:1)#,                                  <<jb.dc>>00745000
       ioqmmerrordflag=(8:1)#;                                 <<jb.dc>>00750000
                                                               <<jb.dc>>00755000
equate sectorsizeinwords=128;                                  <<jb.dc>>00760000
                                                               <<jb.dc>>00765000
                                                               <<jb.dc>>00770000
<<=======================================================>>    <<jb.dc>>00775000
<<                                                       >>    <<jb.dc>>00780000
<<                 end inclio                            >>    <<jb.dc>>00785000
<<                                                       >>    <<jb.dc>>00790000
<<=======================================================>>    <<jb.dc>>00795000
