!*** MODULE $ATRDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 !  ATTRIBUTE LIST DESCRIPTION. THE ATTRIBUTE CONTROL LIST IS USED TO READ AND
 !  WRITE FILE ATTRIBUTES. IT CONSISTS OF CONCATENATED ATTRIBUTE CONTROL BLOCKS
 !  TERMINATED BY A SINGLE ZERO LONGWORD.
 ! 
	PARAMETER ATR$C_UCHAR = '00000003'X	 !  4 BYTE USER FILE CHARACTERISTICS 
	PARAMETER ATR$C_RECATTR = '00000004'X	 !  32 BYTES RECORD ATTRIBUTES 
	PARAMETER ATR$C_FILNAM = '00000005'X	 !  6 BYTE RAD-50 FILE NAME 
	PARAMETER ATR$C_FILTYP = '00000006'X	 !  2 BYTE RAD-50 FILE TYPE 
	PARAMETER ATR$C_FILVER = '00000007'X	 !  2 BYTE BINARY FILE VERSION 
	PARAMETER ATR$C_EXPDAT = '00000008'X	 !  7 BYTE ASCII EXPIRATION DATE 
	PARAMETER ATR$C_STATBLK = '00000009'X	 !  32 BYTE STATISTICS BLOCK 
	PARAMETER ATR$C_HEADER = '0000000A'X	 !  512 BYTE FILE HEADER 
	PARAMETER ATR$C_BLOCKSIZE = '0000000B'X	 !  MAGTAPE BLOCK SIZE 
	PARAMETER ATR$C_USERLABEL = '0000000C'X	 !  USER FILE LABEL 
	PARAMETER ATR$C_ASCDATES = '0000000D'X	 !  REVISION COUNT THRU EXP DATE IN ASCII 
	PARAMETER ATR$C_ALCONTROL = '0000000E'X	 !  COMPATIBILITY MODE ALLOCATION DATA 
	PARAMETER ATR$C_ENDLBLAST = '0000000F'X	 !  END OF MAGTAPE LABEL PROCESSING AND SUPPLY AST CONTROL 
					!  END OF MAGTAPE LABEL PROCESSING AND SUPPLY AST CONTROL BLOC
	PARAMETER ATR$C_ASCNAME = '00000010'X	 !  FILE NAME, TYPE & VERSION IN ASCII 
	PARAMETER ATR$C_CREDATE = '00000011'X	 !  64 BIT CREATION DATE 
	PARAMETER ATR$C_REVDATE = '00000012'X	 !  64 BIT REVISION DATE 
	PARAMETER ATR$C_EXPDATE = '00000013'X	 !  64 BIT EXPIRATION DATE 
	PARAMETER ATR$C_BAKDATE = '00000014'X	 !  64 BIT BACKUP DATE 
	PARAMETER ATR$C_UIC = '00000015'X	 !  4 BYTE FILE OWNER UIC 
	PARAMETER ATR$C_FPRO = '00000016'X	 !  2 BYTE FILE PROTECTION 
	PARAMETER ATR$C_RPRO = '00000017'X	 !  2 BYTE RECORD PROTECTION 
	PARAMETER ATR$C_ACLEVEL = '00000018'X	 !  1 BYTE FILE ACCESS LEVEL 
	PARAMETER ATR$C_SEMASK = '00000019'X	 !  FILE SECURITY MASK AND LIMIT 
	PARAMETER ATR$C_UIC_RO = '0000001A'X	 !  READ ONLY UIC 
	PARAMETER ATR$C_DIRSEQ = '0000001B'X	 !  DIRECTORY UPDATE SEQUENCE COUNT 
	PARAMETER ATR$C_BACKLINK = '0000001C'X	 !  FILE BACK LINK POINTER 
	PARAMETER ATR$C_JOURNAL = '0000001D'X	 !  JOURNAL CONTROL FLAGS 
	PARAMETER ATR$C_HDR1_ACC = '0000001E'X	 !  ANSI TAPE HEADER 1 ACCESSIBILITY 
 !   CHARACTER
	PARAMETER ATR$C_ADDACLENT = '0000001F'X	 !  ADD AN ACCESS CONTROL ENTRY 
	PARAMETER ATR$C_DELACLENT = '00000020'X	 !  REMOVE AN ACCESS CONTROL ENTRY 
	PARAMETER ATR$C_MODACLENT = '00000021'X	 !  MODIFY AN ACL ENTRY 
	PARAMETER ATR$C_FNDACLENT = '00000022'X	 !  LOCATE AN ACL ENTRY 
	PARAMETER ATR$C_FNDACLTYP = '00000023'X	 !  FIND A SPECIFIC TYPE OF ACE 
	PARAMETER ATR$C_DELETEACL = '00000024'X	 !  DELETE ACL LEAVING PROTECTED
	PARAMETER ATR$C_READACL = '00000025'X	 !  READ THE ENTIRE ACL 
	PARAMETER ATR$C_ACLLENGTH = '00000026'X	 !  RETURN THE LENGTH OF THE ACL
	PARAMETER ATR$C_READACE = '00000027'X	 !  READ A SINGLE ACE
	PARAMETER ATR$C_RESERVED = '00000028'X	 !  MODIFY RESERVED AREA
	PARAMETER ATR$C_HIGHWATER = '00000029'X	 !  HIGHWATER MARK (USER READ ONLY)    
	PARAMETER ATR$C_DUMMY_0 = '0000002A'X	 !  *** AVAILABLE CODE
	PARAMETER ATR$C_PRIVS_USED = '0000002B'X  !  PRIVILEGES USED TO GAIN ACCESS
	PARAMETER ATR$C_MATCHING_ACE = '0000002C'X  !  ACE USED TO GAIN ACCESS (IF ANY)
	PARAMETER ATR$C_ACCESS_MODE = '0000002D'X  !  ACCESS MODE FOR FOLLOWING ATTRIBUTE DESCRIPTORS
	PARAMETER ATR$C_FILE_SPEC = '0000002E'X	 !  CONVERT FID TO FILE-SPEC
	PARAMETER ATR$C_CLASS_MASK = '0000002F'X  !  Non-discretionary classification mask
	PARAMETER ATR$C_BUFFER_OFFSET = '00000030'X  !  For magnetic tape only length of buffer offset of b
					!  For magnetic tape only length of buffer offset of block in 
	PARAMETER ATR$C_RU_ACTIVE = '00000031'X	 !  Recoverable facility id number (if non-zero, means file
 !  active recovery units managed by that facility)
	PARAMETER ATR$C_GRANT_ACE = '00000032'X	 !  ACE granting access
	PARAMETER ATR$C_NEXT_ACE = '00000033'X	 !  Increment ACE number
	PARAMETER ATR$C_DELETE_ALL = '00000034'X  !  Delete the entire ACL 
	PARAMETER ATR$C_BACKUP_DONE = '00000035'X  !  Alter backup info in RMS journaling ACEs	
 !  ISO 9660 Descriptors
	PARAMETER ATR$C_EFFDATE = '00000036'X	 !  ISO 9660 Backup Date
	PARAMETER ATR$C_RCDDATE = '00000037'X	 !  ISO 9660 Recorded Date
	PARAMETER ATR$C_VD = '00000038'X	 !  Volume Descriptor	
	PARAMETER ATR$C_PVD = '00000039'X	 !  Primary Volume Descriptor	
	PARAMETER ATR$C_SVD = '0000003A'X	 !  Supplementary Volume Descriptor	
	PARAMETER ATR$C_VPD = '0000003B'X	 !  Volume Partition Descriptor	
	PARAMETER ATR$C_VDST = '0000003C'X	 !  Volume Descriptor Set Terminator	
	PARAMETER ATR$C_BOOT = '0000003D'X	 !  Boot Record	
	PARAMETER ATR$C_PTR = '0000003E'X	 !  Path Table Record	
	PARAMETER ATR$C_DIR = '0000003F'X	 !  Directory Record	
	PARAMETER ATR$C_XAR = '00000040'X	 !  Extended Attribute Record	
 !  ISO 9660 Descriptors Fields
	PARAMETER ATR$C_VOLUME_ID = '00000041'X	 !  Volume Identifier
	PARAMETER ATR$C_VOLUME_FLAGS = '00000042'X  !  Volume Flags
	PARAMETER ATR$C_ESCAPE_SEQUENCES = '00000043'X  !  Escape Sequences
	PARAMETER ATR$C_VOLUME_SET_ID = '00000044'X  !  Volume Set Identifier
	PARAMETER ATR$C_COPYRIGHT_FID = '00000045'X  !  Copyright File Identifier
	PARAMETER ATR$C_ABSTRACT_FID = '00000046'X  !  Abstract File Identifier 
	PARAMETER ATR$C_BIBLIOGRAPHIC_FID = '00000047'X  !  Bibliographic File Identifier 
	PARAMETER ATR$C_CACHE_SEQ = '00000048'X	 !  Cache sequence number
	PARAMETER ATR$C_FILE_SYSTEM_INFO = '00000049'X  !  File system structure level
	PARAMETER ATR$C_FILE_ATTR_CACHING_POLICY = '0000004A'X  !  F64 caching only
	PARAMETER ATR$C_FILE_DATA_CACHING_POLICY = '0000004B'X  !  F64 caching only
	PARAMETER ATR$C_CACHING_OPTIONS = '0000004C'X  !  Spiralog/VDC caching options
	PARAMETER ATR$C_POSIX_DATA = '0000004D'X  !  POSIX private data area
	PARAMETER ATR$C_ACCDATE = '0000004E'X	 !  ODS-5 last access time
	PARAMETER ATR$C_ATTDATE = '0000004F'X	 !  ODS-5 last attribute mod time
	PARAMETER ATR$C_LENGTH_HINT = '00000050'X  !  ODS-5 file length hint area
	PARAMETER ATR$C_EX_RECATTR = '00000051'X  !  ODS-5 extended RMS attributes - Reserved
 !  to Digital for future use.  Must be zero.
	PARAMETER ATR$C_EXTFLAGS = '00000052'X	 !  PATHWORKS MS-DOS flags
	PARAMETER ATR$C_MODDATE = '00000053'X	 !  ODS-5 last data mod time
	PARAMETER ATR$C_LINKCOUNT = '00000054'X	 !  ODS-5 (hard) link count
	PARAMETER ATR$C_SYMLINK = '00000055'X	 !  ODS-5 symlink data
 !  All new attributes should be
 !   added here before MAX_PLUS1
	PARAMETER ATR$C_MAX_PLUS1 = '00000056'X	 !  Maximum code plus one 
	PARAMETER ATR$C_MAX_CODE = '00000055'X
	PARAMETER ATR$C_FNDACETYP = '00000023'X
 !  Valid values for ATR$C_CACHING_POLICY
	PARAMETER ATR$C_CACHE_POLICY_WRITETHRU = '00000001'X
	PARAMETER ATR$C_CACHE_POLICY_WRITEBACK = '00000002'X
	PARAMETER ATR$C_CACHE_POLICY_DEFAULT = '00000003'X
 !  ATTRIBUTE MAXIMUM LENGTHS 
	PARAMETER ATR$S_UCHAR = '00000004'X	 !  4 BYTE USER FILE CHARACTERISTICS 
	PARAMETER ATR$S_RECATTR = '00000020'X	 !  32 BYTES RECORD ATTRIBUTES 
	PARAMETER ATR$S_FILNAM = '00000006'X	 !  6 BYTE RAD-50 FILE NAME 
	PARAMETER ATR$S_FILTYP = '00000002'X	 !  2 BYTE RAD-50 FILE TYPE 
	PARAMETER ATR$S_FILVER = '00000002'X	 !  2 BYTE BINARY FILE VERSION 
	PARAMETER ATR$S_EXPDAT = '00000007'X	 !  7 BYTE ASCII EXPIRATION DATE 
	PARAMETER ATR$S_STATBLK = '00000020'X	 !  32 BYTE STATISTICS BLOCK 
	PARAMETER ATR$S_HEADER = '00000200'X	 !  512 BYTE FILE HEADER 
	PARAMETER ATR$S_BLOCKSIZE = '00000002'X	 !  MAGTAPE BLOCK SIZE 
	PARAMETER ATR$S_USERLABEL = '00000050'X	 !  USER FILE LABEL 
	PARAMETER ATR$S_ASCDATES = '00000023'X	 !  REVISION COUNT THRU EXP DATE IN ASCII 
	PARAMETER ATR$S_ALCONTROL = '0000000E'X	 !  COMPATIBILITY MODE ALLOCATION DATA 
	PARAMETER ATR$S_ENDLBLAST = '00000004'X	 !  END OF MAGTAPE LABEL PROCESSING AND SUPPLY AST CONTROL 
					!  END OF MAGTAPE LABEL PROCESSING AND SUPPLY AST CONTROL BLOC
	PARAMETER ATR$S_ASCNAME = '000000FC'X	 !  FILE NAME, TYPE & VERSION
	PARAMETER ATR$S_CREDATE = '00000008'X	 !  64 BIT CREATION DATE 
	PARAMETER ATR$S_REVDATE = '00000008'X	 !  64 BIT REVISION DATE 
	PARAMETER ATR$S_EXPDATE = '00000008'X	 !  64 BIT EXPIRATION DATE 
	PARAMETER ATR$S_BAKDATE = '00000008'X	 !  64 BIT BACKUP DATE 
	PARAMETER ATR$S_UIC = '00000004'X	 !  4 BYTE FILE OWNER UIC 
	PARAMETER ATR$S_FPRO = '00000002'X	 !  2 BYTE FILE PROTECTION 
	PARAMETER ATR$S_RPRO = '00000002'X	 !  2 BYTE RECORD PROTECTION 
	PARAMETER ATR$S_ACLEVEL = '00000001'X	 !  1 BYTE FILE ACCESS LEVEL 
	PARAMETER ATR$S_SEMASK = '00000008'X	 !  FILE SECURITY MASK AND LIMIT 
	PARAMETER ATR$S_UIC_RO = '00000004'X	 !  READ ONLY UIC 
	PARAMETER ATR$S_DIRSEQ = '00000002'X	 !  DIRECTORY UPDATE SEQUENCE COUNT 
	PARAMETER ATR$S_BACKLINK = '00000006'X	 !  FILE BACK LINK POINTER 
	PARAMETER ATR$S_JOURNAL = '00000001'X	 !  JOURNAL CONTROL FLAGS 
	PARAMETER ATR$S_HDR1_ACC = '00000001'X	 !  ANSI TAPE HEADER 1 ACCESSIBILITY 
 !   CHARACTER
	PARAMETER ATR$S_ADDACLENT = '000000FF'X	 !  ADD AN ACCESS CONTROL ENTRY 
	PARAMETER ATR$S_DELACLENT = '000000FF'X	 !  REMOVE AN ACCESS CONTROL ENTRY 
	PARAMETER ATR$S_MODACLENT = '000000FF'X	 !  MODIFY AN ACL ENTRY 
	PARAMETER ATR$S_FNDACLENT = '000000FF'X	 !  LOCATE AN ACL ENTRY 
	PARAMETER ATR$S_FNDACLTYP = '000000FF'X	 !  FIND A SPECIFIC TYPE OF ACE 
	PARAMETER ATR$S_FNDACETYP = '000000FF'X	 !  FIND A SPECIFIC TYPE OF ACE 
	PARAMETER ATR$S_DELETEACL = '000000FF'X	 !  DELETE ACL LEAVING PROTECTED
	PARAMETER ATR$S_READACL = '00000200'X	 !  READ THE ENTIRE ACL 
	PARAMETER ATR$S_ACLLENGTH = '00000004'X	 !  RETURN THE LENGTH OF THE ACL
	PARAMETER ATR$S_READACE = '000000FF'X	 !  READ A SINGLE ACE
	PARAMETER ATR$S_RESERVED = '0000017C'X	 !  MODIFY RESERVED AREA
	PARAMETER ATR$S_HIGHWATER = '00000004'X	 !  FILE HIGH WATER MARK (USER READ ONLY)    
	PARAMETER ATR$S_DUMMY_0 = '00000004'X	 !  *** AVAILABLE CODE
	PARAMETER ATR$S_PRIVS_USED = '00000004'X  !  PRIVS USED TO GAIN ACCESS
	PARAMETER ATR$S_MATCHING_ACE = '000000FF'X  !  ACE USED TO GAIN ACCESS
	PARAMETER ATR$S_ACCESS_MODE = '00000001'X  !  ACCESS MODE FOR FOLLOWING ATTRIBUTE DESCRIPTORS
	PARAMETER ATR$S_FILE_SPEC = '00001002'X	 !  CONVERT FID TO FILE-SPEC
	PARAMETER ATR$S_CLASS_MASK = '00000014'X  !  Non-discretionary classification mask
	PARAMETER ATR$S_BUFFER_OFFSET = '00000002'X  !  Buffer offset length field
	PARAMETER ATR$S_RU_ACTIVE = '00000001'X	 !  Recoverable facility id if RUs active
	PARAMETER ATR$S_GRANT_ACE = '000000FF'X	 !  ACE granting access
	PARAMETER ATR$S_NEXT_ACE = '00000004'X	 !  Increment ACE number
	PARAMETER ATR$S_DELETE_ALL = '000000FF'X  !  Delete the entire ACL 
	PARAMETER ATR$S_BACKUP_DONE = '00000001'X  !  Alter backup info in RMS journaling ACEs
 !  ISO 9660 Descriptors
	PARAMETER ATR$S_EFFDATE = '00000008'X	 !  64 BIT EFFECTIVE DATE
	PARAMETER ATR$S_RCDDATE = '00000008'X	 !  64 BIT RECORDED DATE 
	PARAMETER ATR$S_VD = '00000007'X	 !  Volume Descriptor	
	PARAMETER ATR$S_PVD = '00000573'X	 !  Primary Volume Descriptor	
	PARAMETER ATR$S_SVD = '00000573'X	 !  Supplementary Volume Descriptor	
	PARAMETER ATR$S_VPD = '00000058'X	 !  Volume Partition Descriptor	
	PARAMETER ATR$S_VDST = '00000007'X	 !  Volume Descriptor Set Terminator	
	PARAMETER ATR$S_BOOT = '00000047'X	 !  Boot Record	
	PARAMETER ATR$S_PTR = '0000002D'X	 !  Path Table Record	
	PARAMETER ATR$S_DIR = '00000200'X	 !  Directory Record	
	PARAMETER ATR$S_XAR = '00000200'X	 !  Extended Attribute Record	
 !  ISO 9660 Descriptors Fields
	PARAMETER ATR$S_VOLUME_ID = '00000020'X	 !  Volume Identifier
	PARAMETER ATR$S_VOLUME_FLAGS = '00000001'X  !  Volume Flags
	PARAMETER ATR$S_ESCAPE_SEQUENCES = '00000020'X  !  Escape Sequences
	PARAMETER ATR$S_VOLUME_SET_ID = '00000080'X  !  Volume Set Identifier
	PARAMETER ATR$S_COPYRIGHT_FID = '00000025'X  !  Copyright File Identifier
	PARAMETER ATR$S_ABSTRACT_FID = '00000025'X  !  Abstract File Identifier 
	PARAMETER ATR$S_BIBLIOGRAPHIC_FID = '00000025'X  !  Bibliographic File Identifier 
	PARAMETER ATR$S_CACHE_SEQ = '00000008'X	 !  Cache sequence number
	PARAMETER ATR$S_FILE_SYSTEM_INFO = '00000002'X  !  file system structure level
	PARAMETER ATR$S_FILE_ATTR_CACHING_POLICY = '00000001'X  !  F64 caching only
	PARAMETER ATR$S_FILE_DATA_CACHING_POLICY = '00000001'X  !  F64 caching only
	PARAMETER ATR$S_POSIX_DATA = '00000040'X  !  F64 caching only
	PARAMETER ATR$S_CACHING_OPTIONS = '00000004'X  !  Spiralog/VDC caching options
	PARAMETER ATR$S_ACCDATE = '00000008'X	 !  ODS-5 last access time
	PARAMETER ATR$S_ATTDATE = '00000008'X	 !  ODS-5 last attribute mod time
	PARAMETER ATR$S_LENGTH_HINT = '00000010'X  !  ODS-5 file length hint area
	PARAMETER ATR$S_EX_RECATTR = '00000008'X  !  ODS-5 extended RMS attributes
	PARAMETER ATR$S_EXTFLAGS = '00000002'X	 !  PATHWORKS MS-DOS flags
	PARAMETER ATR$S_LINKCOUNT = '00000002'X	 !  ODS-5 (hard) link count
	PARAMETER ATR$S_MODDATE = '00000008'X	 !  ODS-5 last data mod time
	PARAMETER ATR$S_SYMLINK = '00000400'X	 !  ODS-5 symlink data
	STRUCTURE /ATRDEF/
	    INTEGER*2 ATR$W_SIZE			 !  SIZE OF ATTRIBUTE IN BYTES 
	    INTEGER*2 ATR$W_TYPE			 !  ATTRIBUTE TYPE CODE 
	    INTEGER*4 ATR$L_ADDR			 !  ADDRESS OF ATTRIBUTE TEXT 
 !  ATTRIBUTE CODES 
	END STRUCTURE	! ATRDEF
 !  Define fields and constant values for ATR$_CACHING_OPTIONS longword.
 !  These must match [STARLET]FIBDEF.SDL exactly
	PARAMETER ATR$M_FILE_ATTRIBUTES = '0000000F'X
	PARAMETER ATR$M_FILE_CONTENTS = '000000F0'X
	PARAMETER ATR$C_DEFAULT = '00000000'X
	PARAMETER ATR$C_WRITETHROUGH = '00000001'X
	PARAMETER ATR$C_WRITEBEHIND = '00000002'X
	PARAMETER ATR$C_NOCACHING = '00000003'X
	PARAMETER ATR$M_FLUSH_ON_CLOSE = '00000F00'X
	PARAMETER ATR$C_FLUSH = '00000001'X
	PARAMETER ATR$C_NOFLUSH = '00000002'X
	PARAMETER ATR$M_CACHING_OPTIONS_MBZ = 'FFFFF000'X
	STRUCTURE /ATR_CACHING_OPTIONS_FLAGS/
	    PARAMETER ATR$S_FILE_ATTRIBUTES = 4
	    PARAMETER ATR$V_FILE_ATTRIBUTES = 0
	    PARAMETER ATR$S_FILE_CONTENTS = 4
	    PARAMETER ATR$V_FILE_CONTENTS = 4
	    PARAMETER ATR$S_FLUSH_ON_CLOSE = 4
	    PARAMETER ATR$V_FLUSH_ON_CLOSE = 8
	    PARAMETER ATR$S_CACHING_OPTIONS_MBZ = 20
	    PARAMETER ATR$V_CACHING_OPTIONS_MBZ = 12
	    BYTE %FILL (4)
	END STRUCTURE	! ATR_CACHING_OPTIONS_FLAGS
 !  Define fields and constant values for ATR$_FILESYSTEM_INFO word.
 !  These must match [LIB]F11DEF.SDL exactly
	PARAMETER ATR$C_ODS1 = '00000001'X
	PARAMETER ATR$C_ODS2 = '00000002'X
	PARAMETER ATR$C_ODS64 = '00000040'X
	STRUCTURE /ATR_FILESYSTEM_INFO_FIELDS/
	    BYTE      ATR$B_STRUCVER
	    BYTE      ATR$B_STRUCLEV
	END STRUCTURE	! ATR_FILESYSTEM_INFO_FIELDS
!DEC$ END OPTIONS