! *** PREDECLARED TYPES %IF %DECLARED ( %BASIC$QUADWORD_DECLARED ) = 0 %THEN RECORD BASIC$QUADWORD LONG FILL ( 2 ) END RECORD %LET %BASIC$QUADWORD_DECLARED = 1 %END %IF %IF %DECLARED ( %BASIC$OCTAWORD_DECLARED ) = 0 %THEN RECORD BASIC$OCTAWORD LONG FILL ( 4 ) END RECORD %LET %BASIC$OCTAWORD_DECLARED = 1 %END %IF %IF %DECLARED ( %BASIC$HFLOAT_AXP_DECLARED ) = 0 %THEN RECORD BASIC$HFLOAT_AXP LONG FILL ( 4 ) END RECORD %LET %BASIC$HFLOAT_AXP_DECLARED = 1 %END %IF %IF %DECLARED ( %BASIC$F_FLOATING_COMPLEX_DECL ) = 0 %THEN RECORD BASIC$F_FLOATING_COMPLEX SINGLE REAL_PART SINGLE IMAGINARY_PART END RECORD %LET %BASIC$F_FLOATING_COMPLEX_DECL = 1 %END %IF %IF %DECLARED ( %BASIC$D_FLOATING_COMPLEX_DECL ) = 0 %THEN RECORD BASIC$D_FLOATING_COMPLEX DOUBLE REAL_PART DOUBLE IMAGINARY_PART END RECORD %LET %BASIC$D_FLOATING_COMPLEX_DECL = 1 %END %IF %IF %DECLARED ( %BASIC$G_FLOATING_COMPLEX_DECL ) = 0 %THEN RECORD BASIC$G_FLOATING_COMPLEX GFLOAT REAL_PART GFLOAT IMAGINARY_PART END RECORD %LET %BASIC$G_FLOATING_COMPLEX_DECL = 1 %END %IF %IF %DECLARED ( %BASIC$H_FLOAT_AXP_CMPLX_DCL ) = 0 %THEN RECORD BASIC$H_FLOATING_COMPLEX_AXP BASIC$HFLOAT_AXP REAL_PART BASIC$HFLOAT_AXP IMAGINARY_PART END RECORD %LET %BASIC$H_FLOAT_AXP_CMPLX_DCL = 1 %END %IF ! + ! ! FLAG BITS FOR THE $MOUNT SYSTEM SERVICE. ! ! - DECLARE LONG CONSTANT MNT$M_FOREIGN = x'00000001' DECLARE LONG CONSTANT MNT$M_GROUP = x'00000002' DECLARE LONG CONSTANT MNT$M_NOASSIST = x'00000004' DECLARE LONG CONSTANT MNT$M_NODISKQ = x'00000008' DECLARE LONG CONSTANT MNT$M_NOHDR3 = x'00000010' DECLARE LONG CONSTANT MNT$M_NOLABEL = x'00000020' DECLARE LONG CONSTANT MNT$M_NOWRITE = x'00000040' DECLARE LONG CONSTANT MNT$M_OVR_ACCESS = x'00000080' DECLARE LONG CONSTANT MNT$M_OVR_EXP = x'00000100' DECLARE LONG CONSTANT MNT$M_OVR_IDENT = x'00000200' DECLARE LONG CONSTANT MNT$M_OVR_SETID = x'00000400' DECLARE LONG CONSTANT MNT$M_READCHECK = x'00000800' DECLARE LONG CONSTANT MNT$M_SHARE = x'00001000' DECLARE LONG CONSTANT MNT$M_MESSAGE = x'00002000' DECLARE LONG CONSTANT MNT$M_SYSTEM = x'00004000' DECLARE LONG CONSTANT MNT$M_WRITECHECK = x'00008000' DECLARE LONG CONSTANT MNT$M_WRITETHRU = x'00010000' DECLARE LONG CONSTANT MNT$M_NOCACHE = x'00020000' DECLARE LONG CONSTANT MNT$M_OVR_LOCK = x'00040000' DECLARE LONG CONSTANT MNT$M_NOMNTVER = x'00080000' DECLARE LONG CONSTANT MNT$M_NOUNLOAD = x'00100000' DECLARE LONG CONSTANT MNT$M_TAPE_DATA_WRITE = x'00200000' DECLARE LONG CONSTANT MNT$M_NOCOPY = x'00400000' DECLARE LONG CONSTANT MNT$M_NOAUTO = x'00800000' DECLARE LONG CONSTANT MNT$M_INIT_ALL = x'01000000' DECLARE LONG CONSTANT MNT$M_INIT_CONT = x'02000000' DECLARE LONG CONSTANT MNT$M_OVR_VOLO = x'04000000' DECLARE LONG CONSTANT MNT$M_INTERCHG = x'08000000' DECLARE LONG CONSTANT MNT$M_CLUSTER = x'10000000' DECLARE LONG CONSTANT MNT$M_NOREBUILD = x'20000000' DECLARE LONG CONSTANT MNT$M_OVR_SHAMEM = x'40000000' DECLARE LONG CONSTANT MNT$M_MULTI_VOL = x'80000000' DECLARE LONG CONSTANT MNT2$M_DISKQ = x'00000001' DECLARE LONG CONSTANT MNT2$M_COMPACTION = x'00000002' DECLARE LONG CONSTANT MNT2$M_INCLUDE = x'00000004' DECLARE LONG CONSTANT MNT2$M_PASS2 = x'00000008' DECLARE LONG CONSTANT MNT2$M_OVR_NOFE = x'00000010' DECLARE LONG CONSTANT MNT2$M_SCRATCH = x'00000020' DECLARE LONG CONSTANT MNT2$M_CDROM = x'00000040' DECLARE LONG CONSTANT MNT2$M_XAR = x'00000080' DECLARE LONG CONSTANT MNT2$M_DSI = x'00000100' DECLARE LONG CONSTANT MNT2$M_SUBSYSTEM = x'00000200' DECLARE LONG CONSTANT MNT2$M_NOCOMPACTION = x'00000400' DECLARE LONG CONSTANT MNT2$M_OVR_SECURITY = x'00000800' DECLARE LONG CONSTANT MNT2$M_OVR_LIMITED_SEARCH = x'00001000' DECLARE LONG CONSTANT MNT2$M_POOL = x'00002000' DECLARE LONG CONSTANT MNT2$M_WLG_ENABLE = x'00004000' DECLARE LONG CONSTANT MNT2$M_WLG_DISABLE = x'00008000' DECLARE LONG CONSTANT MNT2$M_REQUIRE_MEMBERS = x'00010000' DECLARE LONG CONSTANT MNT2$M_VERIFY_LABEL = x'00020000' DECLARE LONG CONSTANT MNT2$M_FULL_MERGE = x'00040000' DECLARE LONG CONSTANT MNT2$M_WRITE_FIRST = x'00080000' DECLARE LONG CONSTANT MNT2$M_DCD = x'00100000' DECLARE LONG CONSTANT MNT2$M_NODCD = x'00200000' DECLARE LONG CONSTANT MNT2$M_LOCAL_HOST = x'00400000' DECLARE LONG CONSTANT MNT2$M_FACTOR = x'00800000' DECLARE LONG CONSTANT MNT2$M_PRIORITY = x'01000000' DECLARE LONG CONSTANT MNT$_DEVNAM = 1 ! DEVICE NAME DECLARE LONG CONSTANT MNT$_VOLNAM = 2 ! VOLUME NAME DECLARE LONG CONSTANT MNT$_LOGNAM = 3 ! LOGICAL NAME DECLARE LONG CONSTANT MNT$_FLAGS = 4 ! MOUNT FLAGS DECLARE LONG CONSTANT MNT$_ACCESSED = 5 ! ACCESSED VALUE DECLARE LONG CONSTANT MNT$_PROCESSOR = 6 ! PROCESSOR NAME DECLARE LONG CONSTANT MNT$_VOLSET = 7 ! VOLUME SET NAME DECLARE LONG CONSTANT MNT$_BLOCKSIZE = 8 ! BLOCKSIZE VALUE DECLARE LONG CONSTANT MNT$_DENSITY = 9 ! TAPE DENSITY VALUE DECLARE LONG CONSTANT MNT$_EXTENT = 10 ! NUMBER OF EXTENT CACHE ENTRIES DECLARE LONG CONSTANT MNT$_FILEID = 11 ! FILE ID CACHE SIZE DECLARE LONG CONSTANT MNT$_LIMIT = 12 ! EXTENT CACHE LIMIT DECLARE LONG CONSTANT MNT$_OWNER = 13 ! VOLUME OWNER UIC DECLARE LONG CONSTANT MNT$_VPROT = 14 ! VOLUME PROTECTION DECLARE LONG CONSTANT MNT$_QUOTA = 15 ! QUOTA CACHE SIZE DECLARE LONG CONSTANT MNT$_RECORDSIZ = 16 ! RECORD SIZE VALUE DECLARE LONG CONSTANT MNT$_WINDOW = 17 ! NUMBER OF WINDOWS DECLARE LONG CONSTANT MNT$_EXTENSION = 18 ! DEFAULT FILE EXTENSION DECLARE LONG CONSTANT MNT$_VISUAL_ID = 19 ! VISUAL IDENTIFICATION DECLARE LONG CONSTANT MNT$_COMMENT = 20 ! USER COMMENT DECLARE LONG CONSTANT MNT$_CLASS = 21 ! SECURITY CLASSFICATION DECLARE LONG CONSTANT MNT$_UNUSED2 = 22 ! SPARE (was used for now obsolete journaling-related items) DECLARE LONG CONSTANT MNT$_ACCPTNAM = 23 ! ACCESS POINT NAME (DECdfs) DECLARE LONG CONSTANT MNT$_SHACOPY_BUF = 24 ! SHADOW COPY BUFFER DECLARE LONG CONSTANT MNT$_SHANAM = 25 ! SHADOW SET VIRTUAL UNIT NAME DECLARE LONG CONSTANT MNT$_SHAMEM = 26 ! SHADOW SET MEMBER UNIT NAME DECLARE LONG CONSTANT MNT$_SHAMEM_MGCOPY = 27 ! SHADOW SET MEMBER UNIT NAME (MERGE COPY) DECLARE LONG CONSTANT MNT$_SHAMEM_COPY = 28 ! SHADOW SET MEMBER UNIT NAME (FULL COPY) DECLARE LONG CONSTANT MNT$_PRFD_PATH = 29 ! PREFERRED DSA PATH DECLARE LONG CONSTANT MNT$_ASSIGNMENT_UNIT = 30 ! Assignment unit (MME) DECLARE LONG CONSTANT MNT$_CART_MEDIA_NAME = 31 ! Cartridge Media Name (MME) DECLARE LONG CONSTANT MNT$_CARTRIDGE_NAME = 32 ! Cartridge Name (MME) DECLARE LONG CONSTANT MNT$_CARTRIDGE_SIDE = 33 ! Cartridge Side (MME) DECLARE LONG CONSTANT MNT$_COLLECTION = 34 ! Collection name (MME) DECLARE LONG CONSTANT MNT$_DEVICE_TYPE = 35 ! Device Selection criteria (MME) DECLARE LONG CONSTANT MNT$_DISPOSITION = 36 ! Dismount Disposition (MME) DECLARE LONG CONSTANT MNT$_LOCATION = 37 ! Cartridge Location (MME) DECLARE LONG CONSTANT MNT$_MEDIA_NAME = 38 ! Media Name (MME) DECLARE LONG CONSTANT MNT$_UNUSED4 = 39 ! SPARE DECLARE LONG CONSTANT MNT$_UNDEFINED_FAT = 40 ! Undefined File Attributes DECLARE LONG CONSTANT MNT$_UCS = 41 ! Universal Character Set string DECLARE LONG CONSTANT MNT$_TAPE_EXPIRATION = 42 ! Date Tape Expires (MME) DECLARE LONG CONSTANT MNT$_PRIORITY = 43 ! SHDRIVER merge priority DECLARE LONG CONSTANT MNT$_FACTOR = 44 ! SHDRIVER IO completion factor for merges DECLARE LONG CONSTANT MNT$_WBM_SIZE = 45 ! MINICOPY size DECLARE LONG CONSTANT MNT$_DATA = 46 ! Enable data (XFC) cache DECLARE LONG CONSTANT MNT$_NODATA = 47 ! Disable data (XFC) cache ! ! Add new item codes before this line ! DECLARE LONG CONSTANT MNT$_LAST_ITEM_CODE = 48 ! last item code plus 1 DECLARE LONG CONSTANT MNT$C_BASE_CARTRIDGE = 1 ! Assign a whole cartridge DECLARE LONG CONSTANT MNT$C_COMPOUND_CARTRIDGE = 2 ! Assign a magazine DECLARE LONG CONSTANT MNT$C_PREASSIGNED_SIDE = 3 ! Assign a pre-assigned cartridge side DECLARE LONG CONSTANT MNT$C_SIDE = 4 ! Assign a single cartridge side DECLARE LONG CONSTANT MNT$C_KEEP = 1 ! Keep the media assigned DECLARE LONG CONSTANT MNT$C_RELEASE = 2 ! Release the media DECLARE LONG CONSTANT MNT$S_MNTDEF = 8 record MNTDEF variant case group MNT$R_MNTDEF_BITS ! FOREIGN OPTION SELECTED ! GROUP OPTION SELECTED ! NOASSIST OPTION SELECTED ! NODISKQ OPTION SELECTED ! NOHDR3 OPTION SELECTED ! NOLABEL OPTION SELECTED ! NOWRITE OPTION SELECTED ! OVERRIDE ACCESSIBLITY OPTION SELECTED ! OVERRIDE EXPIRATON OPTION SELECTED ! OVERRIDE VOLUME LABEL ! OVERRIDE VOLUME SET IDENT OPTION SELECTIED ! READCHECK OPTION SELECTED ! SHARE OPTION SELECTED ! ALLOW $MOUNT TO PRINT MESSAGES ! SYSTEM OPTION SELECTED ! WRITECHECK OPTION SELECTED ! WRITETHRU OPTION SELECTED ! TURN OFF ALL CACHING ! OVERRIDE AUTOMATIC WRITE-LOCK ! DISABLE MOUNT VERIFICATION ! DO NOT UNLOAD VOLUME AT DISMOUNT ! ENABLE WRITE-BACK CACHE ON TAPE ! DO NOT ALLOW SHADOW COPY OPERATION ! DO NOT SET THE MTAACP INTO AVR AND AVL MODE ! INITIALIZE ALL VOLUMES IN SET BEFORE WRITING ! INITIALIZE CONTINUATION VOLUMES BEFORE WRITING ! OVERRIDE VOL1 VOLUME IDENTIFIER FIELD ! VOL FOR INTERCHG NO VMS SPECIFIC INFO WRITTEN TO TAPE ! CLUSTER-WIDE MOUNT OPTION SELECTED ! DO NOT REBUILD VOLUME ! OVERRIDE SHADOW MEMBERSHIP RESTRICTION ! MULTI_VOLUME TAPE SET ! QUOTA EXPLICITLY SELECTED ! MAGTAPE DATA COMPACTION ON ! INCLUDE PREVIOUS SHADOWSET MEMBERS ! PASS2 of /INCLUDE/CONFIRM PROCESSING ! /OVERRIDE=NO_FORCED_ERROR ! Scratch tape requested flag ! Force mounting of a Files-11 C/D Volume ! Enable protection based on XARs ! Enable protection based on Digital System Id in XARs ! /SUBSYSTEM ! MAGTAPE DATA COMPACTION OFF ! /OVERRIDE=SECURITY ! /OVERRIDE=LIMITIED_SEARCH ! /POOL operation for snapshot pool member ! /POLICY=ENABLE_WLG ! /POLICY=DISABLE_WLG ! /POLICY=REQUIRE_MEMBERS ! /VERIFY_LABEL ! /POLICY=MERGE ! /POLCIY=WRITE_FIRST ! /POLICY=DCD ! /POLICY=NODCD ! /POLICY=LOCAL_HOST ! /POLICY=FACTOR ! /POLICY=PRIORITY ! /POLICY=MINICOPY=REQ ! /POLICY=MINICOPY=OPT ! /POLICY=NOMINICOPY BYTE FOREIGN_bits ( 8 ) ! COMMENT ADDED BY SDL - FOREIGN_bits contains bits FOREIGN through FILL_0 end group MNT$R_MNTDEF_BITS case group MNT$R_MNT2DEF_BITS ! QUOTA EXPLICITLY SELECTED ! MAGTAPE DATA COMPACTION ON ! INCLUDE PREVIOUS SHADOWSET MEMBERS ! PASS2 of /INCLUDE/CONFIRM PROCESSING ! /OVERRIDE=NO_FORCED_ERROR ! Scratch tape requested flag ! Force mounting of a Files-11 C/D Volume ! Enable protection based on XARs ! Enable protection based on Digital System Id in XARs ! /SUBSYSTEM ! MAGTAPE DATA COMPACTION OFF ! /OVERRIDE=SECURITY ! /OVERRIDE=LIMITIED_SEARCH ! /POOL operation for snapshot pool member ! /POLICY=ENABLE_WLG ! /POLICY=DISABLE_WLG ! /POLICY=REQUIRE_MEMBERS ! /VERIFY_LABEL ! /POLICY=MERGE ! /POLCIY=WRITE_FIRST ! /POLICY=DCD ! /POLICY=NODCD ! /POLICY=LOCAL_HOST ! /POLICY=FACTOR ! /POLICY=PRIORITY ! /POLICY=MINICOPY ! /POLICY=MINICOPY=OPT ! /POLICY=NOMINICOPY LONG DISKQ_bits ! COMMENT ADDED BY SDL - DISKQ_bits contains bits DISKQ through FILL_1 end group MNT$R_MNT2DEF_BITS ! ! Item codes for mount parameters. ! ! DEFINE CODES AS CONSTANTS end variant end record MNTDEF ! ! Define format of the /UNDEFINED_FAT block ! DECLARE LONG CONSTANT UNFAT$S_UNDEFINED_FAT = 4 record UNDEFINED_FAT WORD UNFAT$W_MRS ! FAT Maximum Record Size BYTE UNFAT$B_RAT ! FAT Record Attributes BYTE UNFAT$B_RFM ! FAT Record Format end record UNDEFINED_FAT