[0001]
[0002]
[0003]
[0004]
[0005]
[0006]
[0007]
[0008]
[0009]
[0010]
[0011]
[0012]
[0013]
[0014]
[0015]
[0016]
[0017]
[0018]
[0019]
[0020]
[0021]
[0022]
[0023]
[0024]
[0025]
[0026]
[0027]
[0028]
[0029]
[0030]
[0031]
[0032]
[0033]
[0034]
[0035]
[0036]
[0037]
[0038]
[0039]
[0040]
[0041]
[0042]
[0043]
[0044]
[0045]
[0046]
[0047]
[0048]
[0049]
[0050]
[0051]
[0052]
[0053]
[0054]
[0055]
[0056]
[0057]
[0058]
[0059]
[0060]
[0061]
[0062]
[0063]
[0064]
[0065]
[0066]
[0067]
[0068]
[0069]
[0070]
[0071]
[0072]
[0073]
[0074]
[0075]
[0076]
[0077]
[0078]
[0079]
[0080]
[0081]
[0082]
[0083]
[0084]
[0085]
[0086]
[0087]
[0088]
[0089]
[0090]
[0091]
[0092]
[0093]
[0094]
[0095]
[0096]
[0097]
[0098]
[0099]
[0100]
[0101]
[0102]
[0103]
[0104]
[0105]
[0106]
[0107]
[0108]
[0109]
[0110]
[0111]
[0112]
[0113]
[0114]
[0115]
[0116]
[0117]
[0118]
[0119]
[0120]
[0121]
[0122]
[0123]
[0124]
[0125]
[0126]
[0127]
[0128]
[0129]
[0130]
[0131]
[0132]
[0133]
[0134]
[0135]
[0136]
[0137]
[0138]
[0139]
[0140]
[0141]
[0142]
[0143]
[0144]
[0145]
[0146]
[0147]
[0148]
[0149]
[0150]
[0151]
[0152]
[0153]
[0154]
[0155]
[0156]
[0157]
[0158]
[0159]
[0160]
[0161]
[0162]
[0163]
[0164]
[0165]
[0166]
[0167]
[0168]
[0169]
[0170]
[0171]
[0172]
[0173]
[0174]
[0175]
[0176]
[0177]
[0178]
[0179]
[0180]
[0181]
[0182]
[0183]
[0184]
[0185]
[0186]
[0187]
[0188]
[0189]
[0190]
[0191]
[0192]
[0193]
[0194]
[0195]
[0196]
[0197]
[0198]
[0199]
[0200]
[0201]
[0202]
[0203]
[0204]
[0205]
[0206]
[0207]
[0208]
[0209]
[0210]
[0211]
/*****************************************************************************/
/*
ODSstruct.h
VERSION HISTORY
---------------
23-DEC-1999 MGD initial; provide support for ODS-2 and ODS-5
*/
/*****************************************************************************/
#ifndef ODSSTRUCT_H_LOADED
#define ODSSTRUCT_H_LOADED 1
/* VMS related header files */
#include <descrip.h>
#include <rms.h>
#include <rmsdef.h>
#include <atrdef.h>
#include <fibdef.h>
/* application header files */
#include "enamel.h"
#ifndef NO_ODS_EXTENDED
# define ODS_EXTENDED 1
/* this is smaller than the technical maximum, but still quite large! */
# define ODS_MAX_FILE_NAME_LENGTH 511
# define ODS_MAX_FILESYS_NAME_LENGTH 264
#endif
#define ODS2_MAX_FILE_NAME_LENGTH 255
#ifndef ODS_MAX_FILE_NAME_LENGTH
# define ODS_MAX_FILE_NAME_LENGTH ODS2_MAX_FILE_NAME_LENGTH
#endif
#ifndef ODS_MAX_FILESYS_NAME_LENGTH
# define ODS_MAX_FILESYS_NAME_LENGTH 39+39
#endif
#if ODS_MAX_FILE_NAME_LENGTH < ODS2_MAX_FILE_NAME_LENGTH
# define ODS_MAX_FILE_NAME_LENGTH ODS2_MAX_FILE_NAME_LENGTH
#endif
#pragma __member_alignment __save
#pragma nomember_alignment
/* I/O User's Reference Manual, ACP Subfunctions, "Read/Write Attributes" */
typedef struct AcpQioAscDates ACPQIO_ASC_DATES;
struct AcpQioAscDates
{
ushort RevisionCount;
uchar OfNoInterest [33];
};
/* I/O User's Reference Manual, ACP Subfunctions, "Read/Write Attributes" */
#define FAT$C_UNDEFINED 0
#define FAT$C_FIXED 1
#define FAT$C_VARIABLE 2
#define FAT$C_VFC 3
#define FAT$C_STREAM 4
#define FAT$C_STMLF 5
#define FAT$C_STMCR 6
#define FAT$M_NOSPAN 8
#define FAT$M_MSBRCW 16
typedef struct AcpQioRecordAttributes ACPQIO_RECORD_ATTRIBUTES;
struct AcpQioRecordAttributes
{
uchar fat$b_rtype;
uchar fat$b_rattrib;
ushort fat$w_rsize;
ulong fat$l_hiblk;
ulong fat$l_efblk;
ushort fat$w_ffbyte;
uchar fat$b_bktsize;
uchar fat$b_vfcsize;
ushort fat$w_maxrec;
ushort fat$w_defext;
ushort fat$w_gbc;
uchar fat$reserved [6];
ushort fat$w_unused;
ushort fat$w_versions;
};
typedef struct FileQioStruct FILE_QIO;
struct FileQioStruct
{
BOOL EndOfFile;
int AdjustBuffer,
AllocatedVbn,
BlockNumber,
BufferCount,
BufferSize,
EndOfFileVbn,
FirstFreeByte;
int64 CdtTime64,
ModTime64,
RdtTime64;
ushort AcpChannel,
AtrFpro,
QioChannel,
RecordCount,
RecordSize;
ulong AtrUchar,
AtrUic;
char *BufferPtr;
int64 SizeInBytes64;
ACPQIO_RECORD_ATTRIBUTES RecAttr;
ATRDEF FileAtr [8];
struct dsc$descriptor FibDsc,
FileNameDsc;
IO_SB IOsb;
#ifdef ODS_EXTENDED
/* only use the local ENAMEL.H FIB definition when necessary */
# ifdef ENAMEL_FIBDEF
struct enamel_fibdef Fib;
# else
FIBDEF Fib;
# endif
#else /* ODS_EXTENDED */
struct fibdef Fib;
#endif /* ODS_EXTENDED */
};
#pragma member_alignment
typedef struct OdsStruct ODS_STRUCT;
struct OdsStruct
{
BOOL DeleteOnClose,
NamlInUse;
int DataLength,
DataLineLength,
DataLineNumber,
DataLineSize,
ExpFileNameLength,
NamDeviceLength,
NamDirectoryLength,
NamFileSysNameLength,
NamNameLength,
NamNodeLength,
NamTypeLength,
NamVersionLength,
ParseInUse,
ResFileNameLength;
ulong Nam_fnb;
char *DataPtr,
*DataLinePtr,
*DataParsePtr,
*NamDevicePtr,
*NamDirectoryPtr,
*NamFileSysNamePtr,
*NamNamePtr,
*NamNodePtr,
*NamTypePtr,
*NamVersionPtr;
char ExpFileName [ODS_MAX_FILE_NAME_LENGTH+1],
ResFileName [ODS_MAX_FILE_NAME_LENGTH+1],
SysFileName [ODS_MAX_FILESYS_NAME_LENGTH+1];
/* FILES-11 directory parser */
BOOL DirectDotDir,
DirectRetry,
DirectVersion0,
DirectVersionHit0;
uint DirectCallCount,
DirectCurrentLength,
DirectSubRecord,
DirectSysFileNameLength,
DirectTheLength,
DirectTheRecord;
char DirectCurrent [256],
DirectWildcard [256];
GENERAL_AST AstFunction;
ulong AstParam;
struct FAB Fab;
# ifdef ODS_EXTENDED
variant_union {
struct NAM Nam;
struct NAML Naml;
} Overlay1;
# else /* ODS_EXTENDED */
struct NAM Nam;
# endif /* ODS_EXTENDED */
struct RAB Rab;
struct XABDAT XabDat;
struct XABFHC XabFhc;
struct XABPRO XabPro;
FILE_QIO FileQio;
};
#pragma __member_alignment __restore
#endif /* ODSSTRUCT_H_LOADED */
/****************************************************************************/