$save nolist
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; lddinfo.mac
;    Loadable Device-Driver Configuration Macro file.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; Define environment.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

data        segment    rw   public 
data        ends

code        segment    er   public 
code        ends

true         equ    0FFH
false        equ    000H

customtype			equ		0FFFFFFFFH
randomaccesstype	equ		0FFFFFFFEH
terminaltype		equ		0FFFFFFFDH

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;    Device Unit Information Block Definition Structure.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

define_duib    struc
        db    '              '    ; Name(14)
        dw    0            ; file$drivers
        db    0            ; functs
        db    0            ; flags
        dw    0            ; dev$gran
        dw    0            ; low(dev$size)
        dw    0            ; high(dev$size)
        db    0            ; Device
        db    0            ; Unit
        dw    0            ; dev$unit
        dd    0            ; init$io
        dd    0            ; finish$io
        dd    0            ; queue$io
        dd    0            ; cancel$io
        dp    0            ; device$info
        dp    0            ; unit$info
        dw    0FFFFH       ; update$timeout
        dw    0            ; num$buffers
        db    130          ; priority
        db    false        ; fixed update boolean
        db    0            ; max$buffers
        db    0            ; filler byte
define_duib    ends
;
; Define Random-Access Device Information Block.
;
radev_dev_info    struc
        dw    0        ; Interrupt level
        db    0        ; Interrupt Task Priority
        dd    0        ; Interrupt Procedure Stack Size
        dd    0        ; Device Local Data Size
        dw    0        ; Number of Device-Units
        dd    0        ; Initialization Procedure
        dd    0        ; Finish Procedure
        dd    0        ; Start I/O Procedure
        dd    0        ; Stop I/O Procedure
        dd    0        ; Interrupt Procedure
        dw    0        ; Interrupt Time Limit
		dw	  0		   ; Filler A
		dw	  0		   ; Filler B
        dp    0        ; FAR Initialization Procedure
        dp    0        ; FAR Finish Procedure
        dp    0        ; FAR Start Procedure
        dp    0        ; FAR Stop Procedure
        dp    0        ; FAR Interrupt Procedure
radev_dev_info    ends
;
; Define Message-based Random-Access Device Information Block.
;
mradev_dev_info    struc
        dw    0        ; Interrupt level
        db    0        ; Interrupt Task Priority
        dd    0        ; Interrupt Procedure Stack Size
        dd    0        ; Device Local Data Size
        dw    0        ; Number of Device-Units
        dd    0        ; Initialization Procedure
        dd    0        ; Finish Procedure
        dd    0        ; Start I/O Procedure
        dd    0        ; Stop I/O Procedure
        dd    0        ; Interrupt Procedure
        dw    0        ; Interrupt Time Limit
		dw	  0		   ; Filler A
		dw	  0		   ; Filler B
		dw	  0		   ; Queue$size
		db	  0		   ; Instance
        db    '          '    ;	board$id(10)
        dp    0        ; FAR Initialization Procedure
        dp    0        ; FAR Finish Procedure
        dp    0        ; FAR Start Procedure
        dp    0        ; FAR Stop Procedure
        dp    0        ; FAR Interrupt Procedure
mradev_dev_info    ends
;
; Define Random-Access Unit Information
;
radev_unit_info    struc
        dw    0        ; Track Size (bytes)
        dw    0        ; Max Number of Re-tries on Errors
        dw    0        ; Reserved
radev_unit_info    ends
;
; Define Terminal Support Device Information Block.
;
term_dev_info    struc
        dw    0        ; Number of Device-Units
        dw    0        ; Device Local Data Size
        dd    0        ; Interrupt Procedure Stack Size
        dd    0        ; Initialization Procedure
        dd    0        ; Finish Procedure
        dd    0        ; Setup Procedure
        dd    0        ; Output Procedure
        dd    0        ; Answer Procedure
        dd    0        ; Hangup Procedure
        dd    0        ; Utility Procedure
        dw    0        ; Number of Interrupts
        dw    0        ; Interrupt level
        dd    0        ; Interrupt Procedure
        dp    0        ; FAR Initialization Procedure
        dp    0        ; FAR Finish Procedure
        dp    0        ; FAR Setup Procedure
        dp    0        ; FAR Output Procedure
        dp    0        ; FAR Answer Procedure
        dp    0        ; FAR Hangup Procedure
        dp    0        ; FAR Utility Procedure
        dp    0        ; FAR Interrupt Procedure
term_dev_info    ends
;
; Define Message-based Terminal Support Device Information Block.
;
mterm_dev_info    struc
        dw    0        ; Number of Device-Units
        dw    0        ; Device Local Data Size
        dd    0        ; Interrupt Procedure Stack Size
        dd    0        ; Initialization Procedure
        dd    0        ; Finish Procedure
        dd    0        ; Setup Procedure
        dd    0        ; Output Procedure
        dd    0        ; Answer Procedure
        dd    0        ; Hangup Procedure
        dd    0        ; Utility Procedure
        dw    0        ; Number of Interrupts
        dd    0        ; Interrupt Procedure
        db    0        ; Message Task Priority
		dw	  0		   ; Filler A
		dw	  0		   ; Filler B
        dp    0        ; FAR Initialization Procedure
        dp    0        ; FAR Finish Procedure
        dp    0        ; FAR Setup Procedure
        dp    0        ; FAR Output Procedure
        dp    0        ; FAR Answer Procedure
        dp    0        ; FAR Hangup Procedure
        dp    0        ; FAR Utility Procedure
        dp    0        ; FAR Interrupt Procedure
mterm_dev_info    ends

$restore
$genonly