home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / dos / netz / netware / nwvar.pa1 < prev    next >
Text File  |  1992-03-02  |  62KB  |  1,260 lines
  1. {!R! FONT 15; FTMD 15; EXIT;}
  2.  
  3.  
  4. {***************************************************************************}
  5. {** Program : NWVAR                                                       **}
  6. {***************************************************************************}
  7. {** Version : 1.2             ** Started : 11/11/91  ** Ended :   /  /    **}
  8. {***************************************************************************}
  9. {******************************** Description ******************************}
  10. {***************************************************************************}
  11. {** Variable / constant definition for Netware API library                **}
  12. {**                                                                       **}
  13. {**                                                                       **}
  14. {**                                                                       **}
  15. {**                                                                       **}
  16. {***************************************************************************}
  17. {******************************** Information ******************************}
  18. {***************************************************************************}
  19. {**                                                                       **}
  20. {**                                                                       **}
  21. {**                                                                       **}
  22. {**                                                                       **}
  23. {**                                                                       **}
  24. {***************************************************************************}
  25.  
  26. {$I NETWARE.INC}
  27.  
  28. UNIT NWVAR;
  29.  
  30. INTERFACE
  31.  
  32. TYPE
  33.  
  34.   Byte2ArrayType          = ARRAY [0 .. 1] OF BYTE;
  35.   Byte3ArrayType          = ARRAY [0 .. 2] OF BYTE;
  36.   Byte4ArrayType          = ARRAY [0 .. 3] OF BYTE;
  37.   Byte5ArrayType          = ARRAY [0 .. 4] OF BYTE;
  38.   Byte6ArrayType          = ARRAY [0 .. 5] OF BYTE;
  39.   Byte7ArrayType          = ARRAY [0 .. 6] OF BYTE;
  40.   Byte8ArrayType          = ARRAY [0 .. 7] OF BYTE;
  41.   Byte10ArrayType         = ARRAY [0 .. 9] OF BYTE;
  42.   Byte12ArrayType         = ARRAY [0 .. 11] OF BYTE;
  43.   Byte13ArrayType         = ARRAY [0 .. 12] OF BYTE;
  44.   Byte14ArrayType         = ARRAY [0 .. 13] OF BYTE;
  45.   Byte16ArrayType         = ARRAY [0 .. 15] OF BYTE;
  46.   Byte17ArrayType         = ARRAY [0 .. 16] OF BYTE;
  47.   Byte18ArrayType         = ARRAY [0 .. 17] OF BYTE;
  48.   Byte20ArrayType         = ARRAY [0 .. 19] OF BYTE;
  49.   Byte21ArrayType         = ARRAY [0 .. 20] OF BYTE;
  50.   Byte22ArrayType         = ARRAY [0 .. 21] OF BYTE;
  51.   Byte24ArrayType         = ARRAY [0 .. 23] OF BYTE;
  52.   Byte26ArrayType         = ARRAY [0 .. 25] OF BYTE;
  53.   Byte28ArrayType         = ARRAY [0 .. 27] OF BYTE;
  54.   Byte30ArrayType         = ARRAY [0 .. 29] OF BYTE;
  55.   Byte32ArrayType         = ARRAY [0 .. 31] OF BYTE;
  56.   Byte38ArrayType         = ARRAY [0 .. 37] OF BYTE;
  57.   Byte42ArrayType         = ARRAY [0 .. 41] OF BYTE;
  58.   Byte44ArrayType         = ARRAY [0 .. 43] OF BYTE;
  59.   Byte45ArrayType         = ARRAY [0 .. 44] OF BYTE;
  60.   Byte47ArrayType         = ARRAY [0 .. 46] OF BYTE;
  61.   Byte48ArrayType         = ARRAY [0 .. 47] OF BYTE;
  62.   Byte50ArrayType         = ARRAY [0 .. 49] OF BYTE;
  63.   Byte51ArrayType         = ARRAY [0 .. 50] OF BYTE;
  64.   Byte54ArrayType         = ARRAY [0 .. 53] OF BYTE;
  65.   Byte56ArrayType         = ARRAY [0 .. 55] OF BYTE;
  66.   Byte58ArrayType         = ARRAY [0 .. 57] OF BYTE;
  67.   Byte59ArrayType         = ARRAY [0 .. 58] OF BYTE;
  68.   Byte60ArrayType         = ARRAY [0 .. 59] OF BYTE;
  69.   Byte63ArrayType         = ARRAY [0 .. 62] OF BYTE;
  70.   Byte64ArrayType         = ARRAY [0 .. 63] OF BYTE;
  71.   Byte65ArrayType         = ARRAY [0 .. 64] OF BYTE;
  72.   Byte69ArrayType         = ARRAY [0 .. 68] OF BYTE;
  73.   Byte96ArrayType         = ARRAY [0 .. 95] OF BYTE;
  74.   Byte103ArrayType        = ARRAY [0 .. 102] OF BYTE;
  75.   Byte128ArrayType        = ARRAY [0 .. 127] OF BYTE;
  76.   Byte130ArrayType        = ARRAY [0 .. 129] OF BYTE;
  77.   Byte132ArrayType        = ARRAY [0 .. 131] OF BYTE;
  78.   Byte134ArrayType        = ARRAY [0 .. 133] OF BYTE;
  79.   Byte142ArrayType        = ARRAY [0 .. 141] OF BYTE;
  80.   Byte152ArrayType        = ARRAY [0 .. 151] OF BYTE;
  81.   Byte253ArrayType        = ARRAY [0 .. 252] OF BYTE;
  82.   Byte255ArrayType        = ARRAY [0 .. 254] OF BYTE;
  83.   Byte258ArrayType        = ARRAY [0 .. 257] OF BYTE;
  84.   Byte265ArrayType        = ARRAY [0 .. 264] OF BYTE;
  85.   Byte504ArrayType        = ARRAY [0 .. 503] OF BYTE;
  86.   Byte514ArrayType        = ARRAY [0 .. 513] OF BYTE;
  87.  
  88.   Char13ArrayType         = ARRAY [0 .. 12] OF CHAR;
  89.  
  90.   Word25ArrayType         = ARRAY [0 .. 25] OF WORD;
  91.   Word60ArrayType         = ARRAY [0 .. 59] OF WORD;
  92.   Word250ArrayType        = ARRAY [0 .. 249] OF WORD;
  93.  
  94.   Longint5ArrayType       = ARRAY [0 .. 4] OF LONGINT;
  95.   Longint25ArrayType      = ARRAY [0 .. 31] OF LONGINT;
  96.   Longint32ArrayType      = ARRAY [0 .. 31] OF LONGINT;
  97.  
  98.   String8Type             = STRING [8];
  99.   String10Type            = STRING [10];
  100.   String12Type            = STRING [12];
  101.   String13Type            = STRING [13];
  102.   String14Type            = STRING [14];
  103.   String16Type            = STRING [16];
  104.   String24Type            = STRING [24];
  105.   String33Type            = STRING [33];
  106.   String40Type            = STRING [40];
  107.   String48Type            = STRING [48];
  108.   String50Type            = STRING [50];
  109.   String64Type            = STRING [64];
  110.   String65Type            = STRING [65];
  111.   String70Type            = STRING [70];
  112.   String80Type            = STRING [80];
  113.   String102Type           = STRING [102];
  114.   String127Type           = STRING [127];
  115.   String128Type           = STRING [128];
  116.   String255Type           = STRING [255];
  117.  
  118.   FileNameType            = String14Type;
  119.   ObjectNameType          = String48Type;
  120.   FullNameType            = String128Type;
  121.   PasswordType            = String128Type;
  122.   QueuePathNameType       = STRING [118];
  123.   PathNameType            = STRING [255];
  124.   PropertyNameType        = STRING [15];
  125.   LogicalRecordNameType   = STRING [100];
  126.   LogicalLockNameType     = String102Type;
  127.   SemaphoreNameType       = STRING [127];
  128.   BannerUserNameType      = Char13ArrayType;
  129.   FormNameType            = Char13ArrayType;
  130.   ConsoleMessageType      = STRING [60];
  131.   BroadcastMessageType    = STRING [55];
  132.   PersonalMessageType     = STRING [127];
  133.   VolumeNameType          = STRING [16];
  134.   DirectoryNameType       = STRING [16];
  135.   PropertyValueType       = Byte128ArrayType;
  136.   BannerTextType          = Char13ArrayType;
  137.  
  138.   NameSpaceNameType       = String12Type;
  139.  
  140.   ConnectionListType      = ARRAY [1 .. 250] OF BYTE;
  141.  
  142.   OT_BinderyID            = LONGINT;
  143.   OT_BinderyType          = WORD;
  144.  
  145.  
  146.   {**********************************************}
  147.   {*** NO ACCOUNTING SERVICES FOR DOS CLIENTS ***}
  148.   {**********************************************}
  149.  
  150.  
  151.   {************************************}
  152.   {*** AFP SERVICES FOR DOS CLIENTS ***}
  153.   {************************************}
  154.  
  155. CONST
  156.  
  157.   AFP_SFI_SetAttributes   = $0001;
  158.   AFP_SFI_CreationDate    = $0002;
  159.   AFP_SFI_AccessDate      = $0004;
  160.   AFP_SFI_ModifyDateTime  = $0008;
  161.   AFP_SFI_BackupDateTime  = $0010;
  162.   AFP_SFI_FinderInfo      = $0020;
  163.   AFP_GFI_Attributes      = $0001;
  164.   AFP_GFI_ParentDirID     = $0002;
  165.   AFP_GFI_CreationDate    = $0004;
  166.   AFP_GFI_AccessDate      = $0008;
  167.   AFP_GFI_ModifyDateTime  = $0010;
  168.   AFP_GFI_BackupDateTime  = $0020;
  169.   AFP_GFI_FinderInfo      = $0040;
  170.   AFP_GFI_LongName        = $0080;
  171.   AFP_GFI_EntryID         = $0100;
  172.   AFP_GFI_DataForkLen     = $0200;
  173.   AFP_GFI_ResrcForkLen    = $0400;
  174.   AFP_GFI_NumOffSpring    = $0800;
  175.   AFP_GFI_OwnerID         = $1000;
  176.   AFP_GFI_ShortName       = $2000;
  177.  
  178. TYPE
  179.  
  180.   AFPFileInfo = RECORD
  181.  
  182.                   EntryID            : LONGINT;
  183.                   ParentID           : LONGINT;
  184.                   Attributes         : WORD;
  185.                   DataForkLength     : LONGINT;
  186.                   ResourceForkLength : LONGINT;
  187.                   NumOffSpring       : WORD;
  188.                   CreationDate       : WORD;
  189.                   AccessDate         : WORD;
  190.                   ModifyDate         : WORD;
  191.                   ModifyTime         : WORD;
  192.                   BackupDate         : WORD;
  193.                   BackupTime         : WORD;
  194.                   FinderInfo         : Byte32ArrayType;
  195.                   LongName           : String33Type;
  196.                   Pad1               : CHAR;
  197.                   OwnerID            : OT_BinderyID;
  198.                   ShortName          : String13Type;
  199.                   pad2               : CHAR;
  200.                   AccessPrivileges   : WORD;
  201.  
  202.                 END;
  203.  
  204.   AFPSetInfo  = RECORD
  205.  
  206.                   Attributes         : WORD;
  207.                   CreationDate       : WORD;
  208.                   AccessDate         : WORD;
  209.                   ModifyDate         : WORD;
  210.                   ModifyTime         : WORD;
  211.                   BackupDate         : WORD;
  212.                   BackupTime         : WORD;
  213.                   FinderInfo         : Byte32ArrayType;
  214.  
  215.                 END;
  216.  
  217.   {*******************************************}
  218.   {*** END OF AFP SERVICES FOR DOS CLIENTS ***}
  219.   {*******************************************}
  220.  
  221.  
  222.   {****************************************}
  223.   {*** BINDERY SERVICES FOR DOS CLIENTS ***}
  224.   {****************************************}
  225.  
  226. CONST
  227.  
  228.   {** Bindery security access byte definitions **}
  229.  
  230.   BS_AnyRead              = $00;       {byte; Readable by anyone}
  231.   BS_LoggedRead           = $01;       {byte; Must be logged in to read}
  232.   BS_ObjectRead           = $02;       {byte; Readable by the object only}
  233.   BS_SuperRead            = $03;       {byte; Readable by Supervisor only}
  234.   BS_BinderyRead          = $04;       {byte; Readable by Bindery only}
  235.   BS_AnyWrite             = $00;       {byte; Writeable by anyone}
  236.   BS_LoggedWrite          = $10;       {byte; Must be logged in to write}
  237.   BS_ObjectWrite          = $20;       {byte; Writeable by the object only}
  238.   BS_SuperWrite           = $30;       {byte; Writeable by Supervisor only}
  239.   BS_BinderyWrite         = $40;       {byte; Writeable by Bindery only}
  240.  
  241.   {** Bindery object type definitions **}
  242.  
  243.   OT_Wild                      = $FFFF;       {Wildcard}
  244.   OT_Unknown                   = $00;         {Unknown}
  245.   OT_User                      = $01;         {Object is a user}
  246.   OT_UserGroup                 = $02;         {Object is a group}
  247.   OT_PrintQueue                = $03;         {Object is a print queue}
  248.   OT_FileServer                = $04;         {Object is a file server}
  249.   OT_JobServer                 = $05;
  250.   OT_Gateway                   = $06;
  251.   OT_PrintServer               = $07;
  252.   OT_ArchiveQueue              = $08;
  253.   OT_ArchiveServer             = $09;         {Object is an archive server}
  254.   OT_JobQueue                  = $0A;
  255.   OT_Administration            = $0B;
  256.   OT_NasSnaGateway             = $21;
  257.   OT_RemoteBridgeServer        = $24;
  258.   OT_TimeSynchronizationServer = $2D;
  259.   OT_ArchiveServerDynamicSap   = $2E;
  260.   OT_AdvertisingPrintServer    = $47;
  261.   OT_BtrieveVap                = $4B;
  262.   OT_PrintQueueUser            = $53;
  263.  
  264.   (*
  265.   OT_RemoteBridgeServer        = $26;
  266.   OT_TCPIPGateWay              = $27;
  267.   *)
  268.  
  269.   {** Access rights definitions for 286-based Netware **}
  270.  
  271.   TA_None                 = $00;       {byte; Trustee has no rights in directory}
  272.   TA_Read                 = $01;       {byte; Trustee can read from file that is open}
  273.   TA_Write                = $02;       {byte; Trustee can write to a file that is open}
  274.   TA_Open                 = $04;       {byte; Trustee can open an existing file}
  275.   TA_Create               = $08;       {byte; Trustee can create a new file}
  276.   TA_Delete               = $10;       {byte; Trustee can delete files}
  277.   TA_Ownership            = $20;       {byte; Trustee can create subdirectories and modify trustee rights}
  278.   TA_Search               = $40;       {byte; Trustee can view the names of non-hidden files}
  279.   TA_Modify               = $80;       {byte; Trustee can modify the file attributes}
  280.   TA_All                  = $FF;       {byte; Trustee has all of the above rights}
  281.  
  282.   {** Access rights definitions for 386-based Netware **}
  283.  
  284.   TR_None                 = $0000;     {word; Trustee has no rights in directory}
  285.   TR_Read                 = $0001;     {word; For a directory, the trustee can open and read existing
  286.                                         files in this directory unless blocked by mask or trustee rights
  287.                                         assignments.  For a file the trustee can open and read this file}
  288.   TR_Write                = $0002;     {word; For a directory, the trustee can open and write existing
  289.                                         files in this directory unless blocked by mask or trustee rights
  290.                                         assignments.  For a file the trustee can open and write this file}
  291.   TR_Undefined            = $0004;     {word}
  292.   TR_Create               = $0008;     {word; For a directory, the trustee can create files and subdirectories
  293.                                         in this directory.  For a file, the trustee can salvage this file if
  294.                                         deleted.}
  295.   TR_Erase                = $0010;     {word; For a directory, the trustee can delete this directory if the
  296.                                         trustee has rights to delete everything inside it.  For a file, the
  297.                                         trustee can delete this file.}
  298.   TR_Access               = $0020;     {word; For a directory, the trustee can modify the trustee list and
  299.                                         inherited rights mask of this directory.  For a file, the trustee can
  300.                                         modify the trustee list and inherited rights mask of this file.}
  301.   TR_File                 = $0040;     {word; For a directory, the trustee can see the names of files in this
  302.                                         directory when scanning it (unless blocked by mask or trustee rights
  303.                                         assignments).  For a file, the trustee can see the name of this file
  304.                                         when scanning the directory.}
  305.   TR_Modify               = $0080;     {word; For a directory, the trustee can rename this directory and change
  306.                                         its attributes.  For a file, the trustee can rename this file and change
  307.                                         its attributes.}
  308.   TR_Normal               = $00FF;     {word; This attribute grants all rights except TR_Supervisor}
  309.   TR_Supervisor           = $0100;     {word; For a directory, the trustee has all rights to this directory and
  310.                                         all subdirectories and files.  The trustee can grant supervisor rights to
  311.                                         other users in this directory and it subdirectories and files.  User's rights
  312.                                         override all inherited rights masks in subdirectoriesand files.  The trustee
  313.                                         can assign space limitations to subdirectories.  For a file, the trustee has
  314.                                         all rights to this file.}
  315.   TR_All                  = $01FF;     {word; This attribute is a combination of the preceding two attributes.}
  316.  
  317.   {** Attributes of objects and properties in the bindery **}
  318.  
  319.   BF_Static               = $00;       {byte; Object/property is permanent}
  320.   BF_Dynamic              = $01;       {byte; Object/property is temporary}
  321.   BF_Item                 = $00;       {byte; An item property}
  322.   BF_Set                  = $01;       {byte; A set property}
  323.  
  324. TYPE
  325.  
  326.   AccountRestrictionsType = RECORD
  327.  
  328.                               AccountExpirationDate         : Byte3ArrayType;
  329.                               AccountDisabledFlag           : BYTE;
  330.                               PasswordExpirationDate        : Byte3ArrayType;
  331.                               GraceLoginsRemaining          : BYTE;
  332.                               PasswordExpirationInterval    : WORD;
  333.                               GraceLoginResetValue          : BYTE;
  334.                               MinimumPasswordLength         : BYTE;
  335.                               MaximumConcurrentConnections  : WORD;
  336.                               AllowedLoginTimeBitmap        : Byte42ArrayType;
  337.                               LastLoginDateAndTime          : Byte6ArrayType;
  338.                               RestrictionFlags              : BYTE;
  339.                               Unused                        : BYTE;
  340.                               MaximumDiskUsageInBlocks      : LONGINT;
  341.                               BadLoginCount                 : WORD;
  342.                               NextResetTime                 : LONGINT;
  343.                               BadLoginAddress               : Byte12ArrayType;
  344.  
  345.                            END;
  346.  
  347.   {***********************************************}
  348.   {*** END OF BINDERY SERVICES FOR DOS CLIENTS ***}
  349.   {***********************************************}
  350.  
  351.  
  352.   {***********************************************}
  353.   {*** COMMUNICATIONS SERVICES FOR DOS CLIENTS ***}
  354.   {***********************************************}
  355.  
  356. CONST
  357.  
  358.   Short_Lived             = $00;
  359.   Long_Lived              = $FF;
  360.   Enable_Watchdog         = $FF;
  361.   Disable_WatchDog        = $00;
  362.  
  363.   SPX_Is_Installed           = $FF;
  364.   SPX_Not_Installed          = $00;
  365.   SPX_Connection_Ok          = $00;
  366.   SPX_Connection_Started     = $00;
  367.   SPX_Connection_Established = $00;
  368.   SPX_Packet_Successful      = $00;
  369.   SPX_Socket_Not_Opened      = $FF;
  370.   SPX_Malformed_Packet       = $FD;
  371.   SPX_Packet_Overflow        = $FD;
  372.   SPX_Listen_Canceled        = $FC;
  373.   SPX_Connection_Table_Full  = $EF;
  374.   SPX_Invalid_Connection     = $EE;
  375.   SPX_No_Answer_From_Target  = $ED;
  376.   SPX_Connection_Failed      = $ED;
  377.   SPX_Connection_Terminated  = $ED;
  378.   SPX_Terminate_Poorly       = $EC;
  379.  
  380. TYPE
  381.  
  382.   IPXAddress                   = RECORD
  383.  
  384.                                    Network                   : Byte4ArrayType;
  385.                                    Node                      : Byte6ArrayType;
  386.                                    Socket                    : WORD;
  387.  
  388.                                  END;
  389.  
  390.   IPXHeader                    = RECORD
  391.  
  392.                                    CheckSum                  : WORD;
  393.                                    HLength                   : WORD;
  394.                                    TransportControl          : BYTE;
  395.                                    PacketType                : BYTE;
  396.                                    Destination               : IPXAddress;
  397.                                    Source                    : IPXAddress;
  398.  
  399.                                  END;
  400.  
  401.   SPXHeader                    = RECORD
  402.  
  403.                                    CheckSum                  : WORD;
  404.                                    HLength                   : WORD;
  405.                                    TransportControl          : BYTE;
  406.                                    PacketType                : BYTE;
  407.                                    Destination               : IPXAddress;
  408.                                    Source                    : IPXAddress;
  409.                                    ConnectionControl         : BYTE;
  410.                                    DataStreamType            : BYTE;
  411.                                    SourceConnectionID        : WORD;
  412.                                    DestConnectionID          : WORD;
  413.                                    SequenceNumber            : WORD;
  414.                                    AcknowledgeNumber         : WORD;
  415.                                    AllocationNumber          : WORD;
  416.  
  417.                                  END;
  418.  
  419.   ECBFragmentType              = RECORD
  420.  
  421.                                    Address : POINTER;
  422.                                    Size    : WORD;
  423.  
  424.                                  END;
  425.  
  426.   ECB                          = RECORD
  427.  
  428.                                    LinkAddress               : POINTER;
  429.                                    ESRAddress                : POINTER;
  430.                                    InUseFlag                 : BYTE;
  431.                                    CompletionCode            : BYTE;
  432.                                    SocketNumber              : WORD;
  433.                                    IPXWorkSpace              : Byte4ArrayType;
  434.                                    DriverWorkSpace           : Byte12ArrayType;
  435.                                    ImmediateAddress          : Byte6ArrayType;
  436.                                    FragmentCount             : WORD;
  437.                                    FragmentDescriptor        : ECBFragmentType;
  438.  
  439.                                  END;
  440.  
  441.   Connection_Info              = RECORD
  442.  
  443.                                    ConnectionState           : BYTE;
  444.                                    ConnectionFlags           : BYTE;
  445.                                    SourceConnectionID        : WORD;
  446.                                    DestinationConnectionID   : WORD;
  447.                                    SequenceNumber            : WORD;
  448.                                    AcknowledgeNumber         : WORD;
  449.                                    AllocationNumber          : WORD;
  450.                                    RemoteAcknowledgeNumber   : WORD;
  451.                                    RemoteAllocationNumber    : WORD;
  452.                                    ConnectionSocket          : WORD;
  453.                                    ImmediateAddress          : Byte6ArrayType;
  454.                                    Destination               : IPXAddress;
  455.                                    RetransmissionCount       : WORD;
  456.                                    EstimatedRoundTripDelay   : WORD;
  457.                                    RetransmittedPackets      : WORD;
  458.                                    SuppressedPackets         : WORD;
  459.  
  460.                                  END;
  461.  
  462.   {******************************************************}
  463.   {*** END OF COMMUNICATIONS SERVICES FOR DOS CLIENTS ***}
  464.   {******************************************************}
  465.  
  466.  
  467.   {******************************************}
  468.   {*** DIRECTORY SERVICES FOR DOS CLIENTS ***}
  469.   {******************************************}
  470.  
  471. CONST
  472.  
  473.   NoRestrictionValue      = $40000000;
  474.   SectorSize386           = 512;
  475.   MaxNetwareSearchDrives  = 16;
  476.  
  477.   {** Drive constant definitions **}
  478.  
  479.   NoBaseDrive             = $FF;
  480.   TemporaryDrive          = $00;
  481.   PermanentDrive          = $01;
  482.   TempDrive               = $1A;
  483.   TempDrive1              = $1B;
  484.   TempDrive2              = $1C;
  485.   TempDrive3              = $1D;
  486.  
  487.   {** Drive status definitions **}
  488.  
  489.   DrivePermanent          = $01;       {byte; Permanently mapped to network}
  490.   DriveTemporary          = $02;       {byte; Temporary mapped to network}
  491.   DriveNetwork            = $03;       {byte; Mapped to network}
  492.   DriveLocal              = $80;       {byte; Local drive, if network bit set - mapped to network}
  493.   DriveAdd                = $01;
  494.   DriveInsert             = $02;
  495.   DriveDelete             = $03;
  496.  
  497.   {** Name Spaces **}
  498.  
  499.   Dos_Name_Space          = 0;
  500.   Mac_Name_Space          = 1;
  501.  
  502.   {** Extended file attributes **}
  503.  
  504.   TF_Normal               = $0000;
  505.   TF_ReadOnly             = $0001;
  506.   TF_Hidden               = $0002;
  507.   TF_System               = $0004;
  508.   TF_Execute_Only         = $0008;
  509.   TF_Directory            = $0010;
  510.   TF_Needs_Archived       = $0020;
  511.   TF_Execute_Confirm      = $0040;
  512.   TF_Shareable            = $0080;
  513.   TF_Low_Search           = $0100;
  514.   TF_Mid_Search           = $0200;
  515.   TF_Hi_Search            = $0400;
  516.   TF_Private              = $0800;
  517.   TF_Transactional        = $1000;
  518.   TF_Indexed              = $2000;
  519.   TF_Read_Audit           = $4000;
  520.   TF_Write_Audit          = $8000;
  521.   TF_Purge                = $10000;
  522.   TF_Rename_Inhibit       = $20000;
  523.   TF_Delete_Inhibit       = $40000;
  524.   TF_Copy_Inhibit         = $80000;
  525.  
  526.   {** Modify bits to be used with SETENTRY **}
  527.  
  528.   M_Modify_Name           = $0001;
  529.   M_File_Attributes       = $0002;
  530.   M_Create_Date           = $0004;
  531.   M_Create_Time           = $0008;
  532.   M_Owner_ID              = $0010;
  533.   M_Last_Archived_Date    = $0020;
  534.   M_Last_Archived_Time    = $0040;
  535.   M_Last_Archived_ID      = $0080;
  536.   M_Last_Updated_Date     = $0100;
  537.   M_Last_Updated_Time     = $0200;
  538.   M_Last_Updated_ID       = $0400;
  539.   M_Last_Accessed_Date    = $0800;
  540.   M_Inherited_Rights_Mask = $1000;
  541.   M_Maximum_Space         = $2000;
  542.   M_Mac_Modify_Name       = 1;
  543.   M_Mac_Finder_Info       = 2;
  544.   M_Mac_ProDos_Info       = 4;
  545.  
  546. TYPE
  547.  
  548.   Volume_Stats                 = RECORD
  549.  
  550.                                    SystemElapsedTime         : LONGINT;
  551.                                    VolumeNumber              : BYTE;
  552.                                    LogicalDriveNumber        : BYTE;
  553.                                    SectorsPerBlock           : WORD;
  554.                                    StartingBlock             : WORD;
  555.                                    TotalBlocks               : WORD;
  556.                                    AvailableBlocks           : WORD;
  557.                                    TotalDirectorySlots       : WORD;
  558.                                    AvailableDirectorySlots   : WORD;
  559.                                    MaxDirectorySlotsUsed     : WORD;
  560.                                    IsHashing                 : BYTE;
  561.                                    IsCaching                 : BYTE;
  562.                                    IsRemovable               : BYTE;
  563.                                    IsMounted                 : BYTE;
  564.                                    VolumeName                : VolumeNameType;
  565.  
  566.                                  END;
  567.  
  568.   NWSalv_Entry                 = RECORD
  569.  
  570.                                    EntryID                   : LONGINT;
  571.                                    Attributes                : LONGINT;
  572.                                    NameSpaceType             : BYTE;
  573.                                    Name                      : NameSpaceNameType;
  574.                                    LastArchiveDateAndTime    : LONGINT;
  575.                                    LastArchiverID            : OT_BinderyID;
  576.                                    ModifyDateAndTime         : LONGINT;
  577.                                    LastModifierID            : OT_BinderyID;
  578.                                    DataForkSize              : LONGINT;
  579.                                    LastAccessedDate          : WORD;
  580.                                    DeletedFileTime           : LONGINT;
  581.                                    DeletedDateAndTime        : LONGINT;
  582.                                    DeletorID                 : LONGINT;
  583.  
  584.                                  END;
  585.  
  586.   NWFile_Entry                 = RECORD
  587.  
  588.                                    Sequence                  : LONGINT;
  589.                                    Reserved1                 : LONGINT;
  590.                                    Attributes                : LONGINT;
  591.                                    Reserved2                 : Byte2ArrayType;
  592.                                    NSType                    : BYTE;
  593.                                    Name                      : NameSpaceNameType;
  594.                                    CreationDate              : WORD;
  595.                                    CreationTime              : WORD;
  596.                                    OwnerID                   : OT_BinderyID;
  597.                                    LastArchivedDate          : WORD;
  598.                                    LastArchivedTime          : WORD;
  599.                                    LastArchiverID            : OT_BinderyID;
  600.                                    ModifyDate                : WORD;
  601.                                    ModifyTime                : WORD;
  602.                                    lastModifierID            : OT_BinderyID;
  603.                                    DataForkSize              : LONGINT;
  604.                                    Reserved3                 : Byte44ArrayType;
  605.                                    InheritedRightsMask       : WORD;
  606.                                    LastAccessDate            : WORD;
  607.                                    Reserved4                 : Byte28ArrayType;
  608.  
  609.                                  END;
  610.  
  611.   NWDir_Entry                  = RECORD
  612.  
  613.                                    Sequence                  : LONGINT;
  614.                                    Reserved1                 : LONGINT;
  615.                                    Attributes                : LONGINT;
  616.                                    Reserved2                 : Byte2ArrayType;
  617.                                    NSType                    : BYTE;
  618.                                    Name                      : NameSpaceNameType;
  619.                                    CreationDate              : WORD;
  620.                                    CreationTime              : WORD;
  621.                                    OwnerID                   : OT_BinderyID;
  622.                                    LastArchivedDate          : WORD;
  623.                                    LastArchivedTime          : WORD;
  624.                                    LastArchiverID            : OT_BinderyID;
  625.                                    ModifyDate                : WORD;
  626.                                    ModifyTime                : WORD;
  627.                                    Reserved3                 : Byte56ArrayType;
  628.                                    InheritedRightsMask       : WORD;
  629.                                    Reserved4                 : Byte26ArrayType;
  630.  
  631.                                  END;
  632.  
  633.   NWPhys_Entry                 = RECORD
  634.  
  635.                                    Sequence                  : LONGINT;
  636.                                    Reserved1                 : LONGINT;
  637.                                    Attributes                : LONGINT;
  638.                                    Reserved2                 : Byte2ArrayType;
  639.                                    NSType                    : BYTE;
  640.                                    Name                      : NameSpaceNameType;
  641.                                    CreationDate              : WORD;
  642.                                    CreationTime              : WORD;
  643.                                    OwnerID                   : OT_BinderyID;
  644.                                    LastArchivedDate          : WORD;
  645.                                    LastArchivedTime          : WORD;
  646.                                    LastArchiverID            : OT_BinderyID;
  647.                                    ModifyDate                : WORD;
  648.                                    ModifyTime                : WORD;
  649.                                    LastModifierID            : OT_BinderyID;
  650.                                    DataForkSize              : LONGINT;
  651.                                    Reserved3                 : Byte44ArrayType;
  652.                                    InheritedRightsMask       : WORD;
  653.                                    LastAccessDate            : WORD;
  654.                                    Reserved4                 : Byte28ArrayType;
  655.                                    ForkSize                  : Byte10ArrayType;
  656.  
  657.                                  END;
  658.  
  659.   NWMacEntry                   = RECORD
  660.  
  661.                                    Sequence                  : LONGINT;
  662.                                    Reserved1                 : LONGINT;
  663.                                    Attributes                : LONGINT;
  664.                                    Reserved2                 : Byte2ArrayType;
  665.                                    NSType                    : BYTE;
  666.                                    Name                      : NameSpaceNameType;
  667.                                    ResourceFork              : LONGINT;
  668.                                    ResourceForkSize          : LONGINT;
  669.                                    FinderInfo                : Byte32ArrayType;
  670.                                    ProDosInfo                : Byte6ArrayType;
  671.                                    Reserved3                 : Byte38ArrayType;
  672.  
  673.                                  END;
  674.  
  675.   NWDir_Info                   = RECORD
  676.  
  677.                                    TotalBlocks               : LONGINT;
  678.                                    FreeBlocks                : LONGINT;
  679.                                    TotalDirEntries           : LONGINT;
  680.                                    AvailDirEntries           : LONGINT;
  681.                                    Flags                     : LONGINT;
  682.                                    SectorsPerBlock           : BYTE;
  683.                                    VolumeName                : ObjectNameType;
  684.  
  685.                                  END;
  686.  
  687.   NWVol_Usage                  = RECORD
  688.  
  689.                                    TotalBlocks               : LONGINT;
  690.                                    FreeBlocks                : LONGINT;
  691.                                    PurgableBlocks            : LONGINT;
  692.                                    NotYetPurgableBlocks      : LONGINT;
  693.                                    TotalDirEntries           : LONGINT;
  694.                                    AvailDirEntries           : LONGINT;
  695.                                    MaxDirEntriesUsed         : LONGINT;
  696.                                    Flags                     : Byte4ArrayType;
  697.                                    BlockSize                 : WORD;
  698.                                    IsHashing                 : BYTE;
  699.                                    IsRemovable               : BYTE;
  700.                                    VolName                   : ObjectNameType;
  701.  
  702.                                  END;
  703.  
  704.   NWDir_Rest                   = RECORD
  705.  
  706.                                    Level                     : BYTE;
  707.                                    MAXAVAIL                  : LONGINT;
  708.                                    CurrentUsed               : LONGINT;
  709.  
  710.                                  END;
  711.  
  712.   {*************************************************}
  713.   {*** END OF DIRECTORY SERVICES FOR DOS CLIENTS ***}
  714.   {*************************************************}
  715.  
  716.  
  717.   {********************************************************}
  718.   {*** FILE SERVER ENVIRONMENT SERVICES FOR DOS CLIENTS ***}
  719.   {********************************************************}
  720.  
  721. TYPE
  722.  
  723.  
  724.   Conn_Semaphore               = RECORD
  725.  
  726.                                    OpenCount                 : WORD;
  727.                                    SempahoreValue            : BYTE;
  728.                                    TaskNumber                : BYTE;
  729.                                    SemaphoreName             : SemaphoreNameType;
  730.  
  731.                                  END;
  732.  
  733.   Conn_Task_Info               = RECORD
  734.  
  735.                                    LockStatus                : BYTE;
  736.                                    WaitingTaskNumber         : BYTE;
  737.                                    BeginAddress              : LONGINT;
  738.                                    EndAddress                : LONGINT;
  739.                                    VolumeNumber              : BYTE;
  740.                                    NumberOfTasks             : BYTE;
  741.                                    DirectoryEntry            : WORD;
  742.                                    LockedName                : String50Type;
  743.                                    TaskNumber                : BYTE;
  744.                                    TaskState                 : BYTE;
  745.  
  746.                                  END;
  747.  
  748.   Conn_Usage                   = RECORD
  749.  
  750.                                    SystemElapsedTime         : LONGINT;
  751.                                    BytesRead                 : Byte6ArrayType;
  752.                                    BytesWritten              : Byte6ArrayType;
  753.                                    TotalRequestPackets       : LONGINT;
  754.  
  755.                                  END;
  756.  
  757.   Conn_Using_File              = RECORD
  758.  
  759.                                    UseCount                  : WORD;
  760.                                    OpenCount                 : WORD;
  761.                                    OpenForReadCount          : WORD;
  762.                                    OpenForWriteCount         : WORD;
  763.                                    DenyReadCount             : WORD;
  764.                                    DenyWriteCount            : WORD;
  765.                                    Reserved1                 : WORD;
  766.                                    Locked                    : BYTE;
  767.                                    Reserved2                 : BYTE;
  768.                                    LogicalConnNumber         : WORD;
  769.                                    TaskNumber                : BYTE;
  770.                                    LockType                  : BYTE;
  771.                                    AccessFlags               : BYTE;
  772.                                    LockStatus                : BYTE;
  773.  
  774.                                  END;
  775.  
  776.   Disk_Cache_Stats             = RECORD
  777.  
  778.                                    SystemElapsedTime         : LONGINT;
  779.                                    CacheBufferCount          : WORD;
  780.                                    CacheBufferSize           : WORD;
  781.                                    DirtyCacheBuffers         : WORD;
  782.                                    CacheReadRequests         : LONGINT;
  783.                                    CacheWriteRequests        : LONGINT;
  784.                                    CacheHits                 : LONGINT;
  785.                                    CacheMIsses               : LONGINT;
  786.                                    PhysicalReadRequests      : LONGINT;
  787.                                    PhysicalWriteRequests     : LONGINT;
  788.                                    PhysicalReadErrors        : WORD;
  789.                                    PhysicalWriteErrros       : WORD;
  790.                                    CacheGetRequests          : LONGINT;
  791.                                    CacheFullWriteRequests    : LONGINT;
  792.                                    CachePartialWriteRequests : LONGINT;
  793.                                    BackgroundDirtyWrites     : LONGINT;
  794.                                    BackgroundAgedWrites      : LONGINT;
  795.                                    TotalCacheWrites          : LONGINT;
  796.                                    CacheAllocations          : LONGINT;
  797.                                    ThrashingCount            : WORD;
  798.                                    LRUBlockWasDirtyCount     : WORD;
  799.                                    ReadBeyondWriteCount      : WORD;
  800.                                    FragmentedWriteCount      : WORD;
  801.                                    CacheHitOnUnavailCount    : WORD;
  802.                                    CacheBlockScrappedCount   : WORD;
  803.  
  804.                                  END;
  805.  
  806.  
  807.   Disk_Channel_Stats           = RECORD
  808.  
  809.                                    SystemElapsedTime         : LONGINT;
  810.                                    ChannelState              : WORD;
  811.                                    ChannelSyncState          : WORD;
  812.                                    DriverType                : BYTE;
  813.                                    DriverMajorVersion        : BYTE;
  814.                                    DriverMinorVersion        : BYTE;
  815.                                    DriverDescriptionVersion  : String65Type;
  816.                                    IOAddr1                   : WORD;
  817.                                    IOAddr1Size               : WORD;
  818.                                    IOAddr2                   : WORD;
  819.                                    IOAddr2Size               : WORD;
  820.                                    SharedMem1Seg             : Byte3ArrayType;
  821.                                    SharedMem1Ofs             : WORD;
  822.                                    SharedMem2Seg             : Byte3ArrayType;
  823.                                    SharedMem2Ofs             : WORD;
  824.                                    Interupt1Used             : BYTE;
  825.                                    Interupt1                 : BYTE;
  826.                                    Interupt2Used             : BYTE;
  827.                                    Interupt2                 : BYTE;
  828.                                    DMAChannel1Used           : BYTE;
  829.                                    DMAChannel1               : BYTE;
  830.                                    DMAChannel2Used           : BYTE;
  831.                                    DMAChannel2               : BYTE;
  832.                                    Reserved2                 : WORD;
  833.                                    ConfigDescription         : String80Type;
  834.  
  835.                                  END;
  836.  
  837.   Drive_Map_Table              = RECORD
  838.  
  839.                                    SystemElapsedTime         : LONGINT;
  840.                                    SFTLevel                  : BYTE;
  841.                                    LogicalDriveCount         : BYTE;
  842.                                    PhysicalDriveCount        : BYTE;
  843.                                    DiskChannelTable          : Byte5ArrayType;
  844.                                    PendingIOCommands         : WORD;
  845.                                    MappingTable              : Byte32ArrayType;
  846.                                    DriveMirrorTable          : Byte32ArrayType;
  847.                                    DeadMirrorTable           : Byte32ArrayType;
  848.                                    RemirroredDrive           : BYTE;
  849.                                    Reserved                  : BYTE;
  850.                                    RemirroredBlock           : LONGINT;
  851.                                    SFTErrorTable             : Word60ArrayType;
  852.  
  853.                                  END;
  854.  
  855.   File_Sys_Stats               = RECORD
  856.  
  857.                                    SystemElapsedTime         : LONGINT;
  858.                                    MaxOpenFiles              : WORD;
  859.                                    MaxFilesOpened            : WORD;
  860.                                    CurrOpenFiles             : WORD;
  861.                                    TotalFilesOpened          : LONGINT;
  862.                                    TotalReadRequests         : LONGINT;
  863.                                    TotalWriteRequests        : LONGINT;
  864.                                    CurrChangedFATSectors     : WORD;
  865.                                    TotalChangedFATSectors    : LONGINT;
  866.                                    FATWriteErrors            : WORD;
  867.                                    FatalFATWriteErrors       : WORD;
  868.                                    FATScanErrors             : WORD;
  869.                                    MaxIndexFilesOpened       : WORD;
  870.                                    CurrOpenIndexedFiles      : WORD;
  871.                                    AttachedIndexFiles        : WORD;
  872.                                    AvailableIndexFiles       : WORD;
  873.  
  874.                                  END;
  875.  
  876.   Lan_Config                   = RECORD
  877.  
  878.                                    NetworkAddress            : Byte4ArrayType;
  879.                                    HostAddress               : Byte6ArrayType;
  880.                                    LANDriverInstalled        : BYTE;
  881.                                    OptionNumber              : BYTE;
  882.                                    ConfigurationText1        : String80Type;
  883.                                    ConfigurationText2        : String80Type;
  884.  
  885.                                  END;
  886.  
  887.   Logical_Rec_Info             = RECORD
  888.  
  889.                                    CurrentUseCount           : WORD;
  890.                                    ShareableLockCount        : WORD;
  891.                                    Reserved1                 : WORD;
  892.                                    Locked                    : BYTE;
  893.                                    Reserved2                 : BYTE;
  894.                                    LogicalConnectionNumber   : WORD;
  895.                                    TaskNumber                : BYTE;
  896.                                    LockStatus                : BYTE;
  897.  
  898.                                  END;
  899.  
  900.   Logical_Record               = RECORD
  901.  
  902.                                    TaskNumber                : BYTE;
  903.                                    LockStatus                : BYTE;
  904.                                    LogicalLockName           : LogicalLockNameType;
  905.  
  906.                                  END;
  907.  
  908.   Conn_Open_Files              = RECORD
  909.  
  910.                                    TaskNumber                : BYTE;
  911.                                    LockStatus                : BYTE;
  912.                                    AccessFlag                : BYTE;
  913.                                    LockType                  : BYTE;
  914.                                    VolumeNumber              : BYTE;
  915.                                    Reserved                  : BYTE;
  916.                                    DirectoryEntry            : WORD;
  917.                                    FileName                  : FileNameType;
  918.  
  919.                                  END;
  920.  
  921.   Phys_Disk_Stats              = RECORD
  922.  
  923.                                    SystemElapsedTime         : LONGINT;
  924.                                    DiskChannel               : BYTE;
  925.                                    DiskRemovable             : BYTE;
  926.                                    DriveType                 : BYTE;
  927.                                    ControllerDriveNumber     : BYTE;
  928.                                    ControllerNumber          : BYTE;
  929.                                    ControllerType            : BYTE;
  930.                                    DriveSize                 : LONGINT;
  931.                                    DriveCylinders            : WORD;
  932.                                    DriveHeads                : BYTE;
  933.                                    SectorsPerTrack           : BYTE;
  934.                                    IOErrorCount              : WORD;
  935.                                    HotFixStart               : LONGINT;
  936.                                    HotFixSize                : WORD;
  937.                                    HotFixBlockAvailable      : WORD;
  938.                                    HotFixDisabled            : BYTE;
  939.  
  940.                                  END;
  941.  
  942.   Phys_Rec_Lock                = RECORD
  943.  
  944.                                    PhysicalRecordLockCount   : BYTE;
  945.                                    Reserved                  : BYTE;
  946.                                    LoggedCount               : WORD;
  947.                                    ShareLockCount            : WORD;
  948.                                    RecordStart               : LONGINT;
  949.                                    RecordEnd                 : LONGINT;
  950.                                    ConnectionNumber          : WORD;
  951.                                    TaskNumber                : BYTE;
  952.                                    LockType                  : BYTE;
  953.  
  954.                                  END;
  955.  
  956.   Server_Lan_IO                = RECORD
  957.  
  958.                                    SystemElapsedTime         : LONGINT;
  959.                                    MaxRoutingBuffersAvail    : WORD;
  960.                                    MaxRoutingBuffersUsed     : WORD;
  961.                                    RoutingBuffersInUse       : WORD;
  962.                                    TotalFileServicePackets   : LONGINT;
  963.                                    FileServicePacketsBuffered : WORD;
  964.                                    InvalidConnPacketCount    : WORD;
  965.                                    BadLogicalConnCount       : WORD;
  966.                                    PacketsRcvdDuringProcCount : WORD;
  967.                                    ReprocessedRequestCount   : WORD;
  968.                                    BadSequenceNumberPacketCount : WORD;
  969.                                    DuplicateReplyCount       : WORD;
  970.                                    AcknowledgementsSent      : WORD;
  971.                                    BadRequestTypeCount       : WORD;
  972.                                    AttachDuringProcCount     : WORD;
  973.                                    AttachWhileAttachingCount : WORD;
  974.                                    ForgedDetachRequestCount  : WORD;
  975.                                    BadConnNumberOnDetachCount : WORD;
  976.                                    DetachDuringProcCount     : WORD;
  977.                                    RepliesCanceledCount      : WORD;
  978.                                    HopCountDiscardCount      : WORD;
  979.                                    UnknownNetDiscardCount    : WORD;
  980.                                    NoDGroupBufferDiscardCount : WORD;
  981.                                    OutPacketNoBufferDiscardCount : WORD;
  982.                                    IPXNotMyNetworkCount      : WORD;
  983.                                    NetBiosPropagationCount   : LONGINT;
  984.                                    TotalOtherPackets         : LONGINT;
  985.                                    TotalRoutedPackets        : LONGINT;
  986.  
  987.                                  END;
  988.  
  989.   Server_Misc_Info             = RECORD
  990.  
  991.                                    SystemElapsedTime         : LONGINT;
  992.                                    ProcessorType             : BYTE;
  993.                                    Reserved                  : BYTE;
  994.                                    ServiceProcessCount       : BYTE;
  995.                                    ServerUtilizationCount    : BYTE;
  996.                                    MaxBinderyObjectsAvail    : WORD;
  997.                                    MaxBinderyObjectsUsed     : WORD;
  998.                                    BinderyObjectsInUse       : WORD;
  999.                                    ServerMemoryInK           : WORD;
  1000.                                    ServerWastedMemoryInK     : WORD;
  1001.                                    DynamicAreaCount          : WORD;
  1002.                                    DynamicSpace1             : LONGINT;
  1003.                                    MaxUsedDynamicSpace1      : LONGINT;
  1004.                                    DynamicSpaceInUse1        : LONGINT;
  1005.                                    DynamicSpace2             : LONGINT;
  1006.                                    MaxUsedDynamicSpace2      : LONGINT;
  1007.                                    DynamicSpaceInUse2        : LONGINT;
  1008.                                    DynamicSpace3             : LONGINT;
  1009.                                    MaxUsedDynamicSpace3      : LONGINT;
  1010.                                    DynamicSpaceInUse3        : LONGINT;
  1011.  
  1012.                                  END;
  1013.  
  1014.   File_Serv_Info               = RECORD
  1015.  
  1016.                                    ServerName                : ObjectNameType;
  1017.                                    NetwareVersion            : BYTE;
  1018.                                    NetwareSubVersion         : BYTE;
  1019.                                    MaxConnectionsSupported   : WORD;
  1020.                                    ConnectionsInUse          : WORD;
  1021.                                    MaxVolumesSupported       : WORD;
  1022.                                    RevisionLevel             : BYTE;
  1023.                                    SFTLevel                  : BYTE;
  1024.                                    TTSLevel                  : BYTE;
  1025.                                    PeakConnectionsUsed       : WORD;
  1026.                                    AccountingVersion         : BYTE;
  1027.                                    VAPVersion                : BYTE;
  1028.                                    QueingVersion             : BYTE;
  1029.                                    PrintServerVersion        : BYTE;
  1030.                                    VirtualConsoleVersion     : BYTE;
  1031.                                    SecurityRestrictionsLevel : BYTE;
  1032.                                    InternetBridgeSupport     : BYTE;
  1033.  
  1034.                                  END;
  1035.  
  1036.   Short_Phys_Rec_Lock          = RECORD
  1037.  
  1038.                                    TaskNumber                : BYTE;
  1039.                                    LockFlag                  : BYTE;
  1040.                                    RecordStart               : LONGINT;
  1041.                                    RecordEnd                 : LONGINT;
  1042.  
  1043.                                  END;
  1044.  
  1045.   TTS_Stats                    = RECORD
  1046.  
  1047.                                    SystemElapsedTime         : LONGINT;
  1048.                                    TTS_Supported             : BYTE;
  1049.                                    TTS_Enabled               : BYTE;
  1050.                                    TTS_VolumeNumber          : WORD;
  1051.                                    TTS_MaxOpenTransactions   : WORD;
  1052.                                    TTS_MaxTransactionsOpened : WORD;
  1053.                                    TTS_CurrTransactionsOpened : WORD;
  1054.                                    TTS_TotalTransactions     : LONGINT;
  1055.                                    TTS_TotalWrites           : LONGINT;
  1056.                                    TTS_TotalBackouts         : LONGINT;
  1057.                                    TTS_UnfilledBackouts      : WORD;
  1058.                                    TTS_DiskBlocksInUse       : WORD;
  1059.                                    TTS_FATAllocations        : LONGINT;
  1060.                                    TTS_FileSizeChanges       : LONGINT;
  1061.                                    TTS_FilesTruncated        : LONGINT;
  1062.                                    NumberOfTransactions      : BYTE;
  1063.                                    ConnectionNumber          : BYTE;
  1064.                                    TaskNumber                : BYTE;
  1065.  
  1066.                                  END;
  1067.  
  1068.   {***********************************************}
  1069.   {*** END OF FILE SERVER ENVIRONMENT SERVICES ***}
  1070.   {***********************************************}
  1071.  
  1072.   {**************************************}
  1073.   {*** PRINT SERVICES FOR DOS CLIENTS ***}
  1074.   {**************************************}
  1075.  
  1076. TYPE
  1077.  
  1078.   Capture_Flags                = RECORD
  1079.  
  1080.                                    Status                    : BYTE;
  1081.                                    Flags                     : BYTE;
  1082.                                    TabSize                   : BYTE;
  1083.                                    ServerPrinter             : BYTE;
  1084.                                    NumberOfCopies            : BYTE;
  1085.                                    FormType                  : BYTE;
  1086.                                    Reserved                  : BYTE;
  1087.                                    BannerText                : BannerTextType;
  1088.                                    Reserve                   : BYTE;
  1089.                                    LocalLPTDevice            : BYTE;
  1090.                                    FlushCaptureTimeoutCount  : WORD;
  1091.                                    FlushCaptureOnDeviceClose : BYTE;
  1092.                                    MaxLines                  : WORD;
  1093.                                    MaxChars                  : WORD;
  1094.                                    FormName                  : FormNameType;
  1095.                                    LPTCaptureFlag            : BYTE;
  1096.                                    FileCaptureFlag           : BYTE;
  1097.                                    TimingOutFlag             : BYTE;
  1098.                                    PrinterSetupBuffer        : LONGINT;
  1099.                                    PrinterResetBuffer        : LONGINT;
  1100.                                    ConnectionIDQueuePrintJob : BYTE;
  1101.                                    CaptureInProgress         : BYTE;
  1102.                                    PrintQueueFlag            : BYTE;
  1103.                                    PrintJobValid             : BYTE;
  1104.                                    PrintQueueID              : OT_BinderyID;
  1105.                                    PrintJobNumber            : WORD;
  1106.  
  1107.                                  END;
  1108.  
  1109.   Set_Capture_Flags            = RECORD
  1110.  
  1111.                                    Status                    : BYTE;
  1112.                                    Flags                     : BYTE;
  1113.                                    TabSize                   : BYTE;
  1114.                                    ServerPrinter             : BYTE;
  1115.                                    NumberOfCopies            : BYTE;
  1116.                                    FormType                  : BYTE;
  1117.                                    Reserved                  : BYTE;
  1118.                                    BannerText                : BannerTextType;
  1119.                                    Reserve                   : BYTE;
  1120.                                    LocalLPTDevice            : BYTE;
  1121.                                    FlushCaptureTimeoutCount  : WORD;
  1122.                                    FlushCaptureOnDeviceClose : BYTE;
  1123.                                    MaxLines                  : WORD;
  1124.                                    MaxChars                  : WORD;
  1125.                                    FormName                  : FormNameType;
  1126.                                    Pad                       : Byte21ArrayType;
  1127.  
  1128.                                  END;
  1129.  
  1130.   {*********************************************}
  1131.   {*** END OF PRINT SERVICES FOR DOS CLIENTS ***}
  1132.   {*********************************************}
  1133.  
  1134.  
  1135.   {**************************************}
  1136.   {*** QUEUE SERVICES FOR DOS CLIENTS ***}
  1137.   {**************************************}
  1138.  
  1139. CONST
  1140.  
  1141.   {JOB CONTROL FLAGS}
  1142.  
  1143.   QF_Operator_Hold        = $80;
  1144.   QF_User_Hold            = $40;
  1145.   QF_Entry_Open           = $20;
  1146.   QF_Service_Restart      = $10;
  1147.   QF_Auto_Start           = $08;
  1148.  
  1149.   {QUEUE STATUS FLAGS}
  1150.  
  1151.   QS_Cant_Add_Jobs        = $01;
  1152.   QS_Servers_Cant_Attach  = $02;
  1153.   QS_Cant_Service_Jobs    = $04;
  1154.  
  1155. TYPE
  1156.  
  1157.   FileOfByte              = FILE OF BYTE;
  1158.  
  1159.   JobStruct               = RECORD
  1160.  
  1161.                               ClientStation        : BYTE;
  1162.                               ClientTaskNumber     : BYTE;
  1163.                               ClientIDNumber       : OT_BinderyID;
  1164.                               TargetServerIDNumber : OT_BinderyID;
  1165.                               TargetExecutionTime  : Byte6ArrayType;
  1166.                               JobEntryTime         : Byte6ArrayType;
  1167.                               JobNumber            : WORD;
  1168.                               JobType              : WORD;
  1169.                               JobPosition          : BYTE;
  1170.                               JobControlFlags      : BYTE;
  1171.                               JobFileName          : Byte14ArrayType; {FileNameType;}
  1172.                               JobFileHandle        : Byte6ArrayType;
  1173.                               ServerStation        : BYTE;
  1174.                               ServerTaskNumber     : BYTE;
  1175.                               ServerIDNumber       : OT_BinderyID;
  1176.                               TextJobDescription   : Byte50ArrayType;
  1177.                               ClientRecordArea     : Byte152ArrayType;
  1178.  
  1179.                             END;
  1180.  
  1181.  
  1182.   {*****************************************}
  1183.   {*** END OF QUEUE ENVIRONMENT SERVICES ***}
  1184.   {*****************************************}
  1185.  
  1186.  
  1187.   {*********************}
  1188.   {*** MISCEALLONOUS ***}
  1189.   {*********************}
  1190.  
  1191. CONST
  1192.  
  1193.   HexCharacterSet         : ARRAY [0 .. 15] OF CHAR = '0123456789ABCDEF';
  1194.  
  1195. TYPE
  1196.  
  1197.   ConnectionIDTableType   = RECORD
  1198.  
  1199.                               InUseFlag            : BYTE;
  1200.                               OrderNumber          : BYTE;
  1201.                               NetworkNumber        : Byte4ArrayType;
  1202.                               PhysicalNodeAddress  : Byte6ArrayType;
  1203.                               SocketNumber         : WORD;
  1204.                               ReceiveTimeOut       : WORD;
  1205.                               RoutingNode          : Byte6ArrayType;
  1206.                               PacketSequenceNumber : BYTE;
  1207.                               ConnectionNumber     : BYTE;
  1208.                               ConnectionStatus     : BYTE;
  1209.                               MaximumTimeOut       : WORD;
  1210.                               Padding              : Byte5ArrayType;
  1211.  
  1212.                             END;
  1213.  
  1214.   AddressValueType        = RECORD
  1215.  
  1216.                               LENGTH        : BYTE;
  1217.                               NetworkNumber : Byte4ArrayType;
  1218.                               NodeAddress   : Byte6ArrayType;
  1219.  
  1220.                             END;
  1221.  
  1222.   ServerAddressType       = RECORD
  1223.  
  1224.                               NetworkNumber : Byte4ArrayType;
  1225.                               NodeAddress   : Byte6ArrayType;
  1226.                               SocketNumber  : WORD;
  1227.                               AddressValue  : String10Type;
  1228.  
  1229.                             END;
  1230.  
  1231.   ServerIDTableType       = RECORD
  1232.  
  1233.                               STInUse       : BOOLEAN;
  1234.                               STOrderNumber : WORD;
  1235.                               STAddress     : ServerAddressType;
  1236.  
  1237.                             END;
  1238.  
  1239.  
  1240. CONST
  1241.  
  1242.   BlankServerIDTable : ServerIDTableType =
  1243.  
  1244.                          (STInuse       : FALSE;
  1245.                           STOrderNumber : 0;
  1246.                           STAddress     : (NetworkNumber : (0, 0, 0, 0);
  1247.                                            NodeAddress   : (0, 0, 0, 0, 0, 0);
  1248.                                            SocketNumber  : 0;
  1249.                                            AddressValue  : '') );
  1250.  
  1251.  
  1252.   MaxObjectsInList        = 250;
  1253.   MaxSlotsInShell         = 8;
  1254.  
  1255. TYPE
  1256.  
  1257.   ObjectListingType            = ARRAY [1 .. MaxObjectsInList] OF ObjectNameType;
  1258.   ObjectListingTypePtr         = ^ObjectListingType;
  1259.                                              
  1260.