!QFLOCK.SDF [100] - QFLOCK.SYS record structures
!
![100] 02-Aug-16 14:33       Edited by Jack
!    Definitions moved here from qdef.bsi   


++ifndef ST_QBLOCK

defstruct ST_QBLOCK         ! qflock record
    map2 QNEXT,b,2          ! Pointer to next queue block
    map2 QTYPE,b,2          ! Queue block id type
    map2 QOWNER,b,2         ! Owner of queue block
    map2 QJUNK,b,2          ! (get back to 4x alignment)
    map2 QDATA              ! 32 bytes of data  (was 34)
    map2 QD'FLOCK,@QDATA  ! Format of FLOCK record
        map3 ACTION,b,2     ! Action
        map3 MODE,b,2       ! Mode
        map3 RECORD,b,4     !  Record number
        map3 CHANNEL,b,4    ! Channel number [12] was 2
    map2 QD'IFLOCK,@QDATA ! Format of inactive FLOCK record
    map2 QD'XLOCK,@QDATA  ! Format of XLOCK record
        map3 LOCK1,i,4      ! Primary lock code (INTEGER!)
        map3 LOCK2,i,4      ! Secondard lock code (INTEGER!)
        map3 LOCK3,b,2      ! New lock class (0=xlock,1=lock)
    
    
endstruct

defstruct ST_QHEADER            ! Queue header block
        map2 QFREE,b,2          ! Free queue pointer
        map2 QUSED,b,2          ! Used queue pointer
        map2 Q'HIGHWATER,b,2    ! Highest used record #
        map2 LOG'COUNT'NOMORE,b,2	! Logical users (instances) count [13]
        map2 Q'VERSION,s,4      ! version
        map2 Q'TOTOPS,i,4       ! total q adds & deletes
        map2 Q'TOTREADS,i,4     ! total q adds & deletes
        map2 Q'TOTWRITES,i,4    ! total q adds & deletes
        map2 DUMMY1,x,16		! Dummy filler was 24 [13] was 28 [34] was 24
endstruct

++endif

