Google
 

Trailing-Edge - PDP-10 Archives - TOPS-20_V6.1_DECnetSrc_7-23-85 - mcb/vnp36/vnpdat.req
There are 2 other files named vnpdat.req in the archive. Click here to see a list.
!                    COPYRIGHT (c) 1980, 1981, 1982
!                    DIGITAL EQUIPMENT CORPORATION
!                        Maynard, Massachusetts
!
!     This software is furnished under a license and may  be  used
!     and copied only in accordance with the terms of such license
!     and with the inclusion of the above copyright notice.   This
!     software  or any other copies thereof may not be provided or
!     otherwise made available to any other person.  No  title  to
!     and ownership of the software is hereby transferred.
!
!     The information  in  this  software  is  subject  to  change
!     without  notice  and should not be construed as a commitment
!     by DIGITAL EQUIPMENT CORPORATION.
!
!     DIGITAL assumes no responsibility for the use or reliability
!     of  its  software  on  equipment  which  is  not supplied by
!     DIGITAL.

!
! This file, VNPDAT.REQ, defines the  DEV, CTL, UNT, SLT, TRB,
! and LLC blocks.
!
SBLOCK (DEV, 16)				!Header for DEV$DF
HEADER (DEV)					!
ABLOCK (DEV_NAME, CH$ALLOCATION(4)*%BPVAL, 2)	!Device Name
ABLOCK (DEV_CTL, %BPADDR, 1)			!Chain to CTL Blocks
ABLOCK (DEV_NUM_OF_CTLS, %BPVAL, 2)		!Number of CTLs Seen for this DEV
EBLOCK (DEV)					!
!
SBLOCK (CTL, 17)				!CTL$DF Block
HEADER (CTL)					!Header for CTL
ABLOCK (CTL_CONT, %BPVAL, 2)			!Controller Number
ABLOCK (CTL_UNT, %BPADDR, 1)			!Chain to UNT (Unit) Blocks
ABLOCK (CTL_DEV, %BPADDR, 1)			!Back Pointer to DEV Block
ABLOCK (CTL_NUM_OF_UNTS, %BPVAL, 2)		!Number of Units Seen for This CTL
ABLOCK (CTL_PAR_0, %BPVAL, 2)			!Controller Parameter 0
ABLOCK (CTL_PAR_1, %BPVAL, 2)			!Controller Parameter 1
ABLOCK (CTL_PAR_2, %BPVAL, 2)			!Controller Parameter 2
ABLOCK (CTL_PAR_3, %BPVAL, 2)			!Controller Parameter 3
ABLOCK (CTL_PAR_4, %BPVAL, 2)			!Controller Parameter 4
ABLOCK (CTL_PAR_5, %BPVAL, 2)			!Controller Parameter 5
ABLOCK (CTL_PAR_6, %BPVAL, 2)			!Controller Parameter 6
ABLOCK (CTL_PAR_7, %BPVAL, 2)			!Controller Parameter 7
EBLOCK (CTL)					!
!
SBLOCK (UNT, 18)				!UNT (UNIT) BLOCK
HEADER (UNT)					!
ABLOCK (UNT_UNIT, %BPVAL, 2)			!UNIT NUMBER
ABLOCK (UNT_CTL, %BPADDR, 1)			!BACK POINTER TO CTL BLOCK
ABLOCK (UNT_DEV, %BPADDR, 1)			!BACK POINTER TO DEV BLOCK
ABLOCK (UNT_NUM_OF_TRBS, %BPVAL, 2)		!Number of TRB$DFs seen
ABLOCK (UNT_TRB, %BPADDR, 1)			!CHAIN TO TRB BLOCKS
ABLOCK (UNT_PAR_0, %BPVAL, 2)			!Unit Parameter 0
ABLOCK (UNT_PAR_1, %BPVAL, 2)			!Unit Parameter 1
ABLOCK (UNT_PAR_2, %BPVAL, 2)			!Unit Parameter 2
ABLOCK (UNT_PAR_3, %BPVAL, 2)			!Unit Parameter 3
ABLOCK (UNT_PAR_4, %BPVAL, 2)			!Unit Parameter 4
ABLOCK (UNT_PAR_5, %BPVAL, 2)			!Unit Parameter 5
ABLOCK (UNT_PAR_6, %BPVAL, 2)			!Unit Parameter 6
ABLOCK (UNT_PAR_7, %BPVAL, 2)			!Unit Parameter 7
EBLOCK (UNT)					!
!
SBLOCK (SLT, 19)				!SLT (SYSTEM LINE TABLE) BLOCK
HEADER (SLT)					!
ABLOCK (SLT_DEV, CH$ALLOCATION(4)*%BPVAL, 2)	!NAME OF DDM
ABLOCK (SLT_DLC, CH$ALLOCATION(4)*%BPVAL, 2)	!NAME OF DLC
ABLOCK (SLT_LLC, CH$ALLOCATION(4)*%BPVAL, 2)	!NAME OF LLC (FIRST LLC FOR MULTIPOINT)
ABLOCK (SLT_CTL, %BPVAL, 2)			!CONTROLLER NUMBER ON DDM
ABLOCK (SLT_UNT, %BPVAL, 2)			!UNIT NUMBER ON CONTROLLER
ABLOCK (SLT_TRB, %BPVAL, 2)			!Tributary number on CTL/UNT
EBLOCK (SLT)					!
!
SBLOCK (TRB, 20)				!Tributary Blocks
HEADER (TRB)					!
ABLOCK (TRB_LADDR, %BPVAL, 2)			!Tributary Logical Address
ABLOCK (TRB_PAR_0, %BPVAL, 2)			!Tributary Parameter 0
ABLOCK (TRB_PAR_1, %BPVAL, 2)			!Tributary Parameter 1
ABLOCK (TRB_PAR_2, %BPVAL, 2)			!Tributary Parameter 2
ABLOCK (TRB_PAR_3, %BPVAL, 2)			!Tributary Parameter 3
ABLOCK (TRB_PAR_4, %BPVAL, 2)			!Tributary Parameter 4
ABLOCK (TRB_PAR_5, %BPVAL, 2)			!Tributary Parameter 5
ABLOCK (TRB_PAR_6, %BPVAL, 2)			!Tributary Parameter 6
ABLOCK (TRB_PAR_7, %BPVAL, 2)			!Tributary Parameter 7
EBLOCK (TRB)					!
!
LITERAL
    LEN_MCB_NAME = 3,
    LEN_MCB_DRV  = 2;
!
SBLOCK (LLC, 14)				!HEADER FOR LLC
HEADER (LLC)					!
ABLOCK (LLC_NAME, CH$ALLOCATION(LEN_MCB_NAME+1)*%BPVAL, 2) !Name of Process
EBLOCK (LLC)					!
!
SBLOCK (VNPMCB, 23)				!PRC$DF Block
HEADER (VNPMCB)
ABLOCK (PROCESS_NAME, CH$ALLOCATION(LEN_MCB_NAME+1)*%BPVAL,2)	!Process Name
ABLOCK (DEVICE_NAME, CH$ALLOCATION(LEN_MCB_DRV+1)*%BPVAL,2)	!Device Name
ABLOCK (PCB_ADDRESS,18,1) !Address of Partition Control Block in KERNEL_FILE
EBLOCK (VNPMCB)
!
LITERAL
    LEN_TSK_NAME = 6,
    LEN_DRV_NAME = 2,
    TSK_TASK_TYPE = 1,
    TSK_DRIVER_TYPE = 2;
!
SBLOCK (VNPTSK, 22)
HEADER (VNPTSK)
ABLOCK (TSK_TYPE, %BPVAL, 1)		!Indicates TSK or DRV in TSK_NAME
ABLOCK (TSK_NAME, CH$ALLOCATION(LEN_TSK_NAME)*%BPVAL,2) !Task or Driver Name
ABLOCK (TSK_TIME, %BPVAL, 1)		!For TSKs, time till run in seconds
EBLOCK (VNPTSK)