home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / packages / win32ada / data.z / win32-rpcdcep.ads < prev    next >
Encoding:
Text File  |  1996-03-15  |  15.9 KB  |  301 lines
  1. -- $Source: /home/harp/1/proto/monoBANK/winnt/win32-rpcdcep.ads,v $ 
  2. -- $Revision: 1.12 $ $Date: 96/03/15 12:55:30 $ $Author: stm $ 
  3. -- See end of file for Copyright (c) information.
  4.  
  5. with Win32.Rpc;
  6. with Win32.Rpcdce;
  7. with Win32.Winnt;
  8.  
  9. package Win32.Rpcdcep is
  10.  
  11.     RPC_NCA_FLAGS_DEFAULT    : constant := 16#0#;           -- rpcdcep.h:77
  12.     RPC_NCA_FLAGS_IDEMPOTENT : constant := 16#1#;           -- rpcdcep.h:78
  13.     RPC_NCA_FLAGS_BROADCAST  : constant := 16#2#;           -- rpcdcep.h:79
  14.     RPC_NCA_FLAGS_MAYBE      : constant := 16#4#;           -- rpcdcep.h:80
  15.     RPCFLG_ASYNCHRONOUS      : constant := 16#40000000#;    -- rpcdcep.h:81
  16.     RPCFLG_INPUT_SYNCHRONOUS : constant := 16#20000000#;    -- rpcdcep.h:82
  17.     RPC_FLAGS_VALID_BIT      : constant := 16#8000#;        -- rpcdcep.h:89
  18.     TRANSPORT_TYPE_CN        : constant := 16#1#;           -- rpcdcep.h:259
  19.     TRANSPORT_TYPE_DG        : constant := 16#2#;           -- rpcdcep.h:260
  20.     TRANSPORT_TYPE_LPC       : constant := 16#4#;           -- rpcdcep.h:261
  21.  
  22.     type I_RPC_MUTEX is new Win32.PVOID;                    -- rpcdcep.h:156
  23.  
  24.     type RPC_VERSION;                                       -- rpcdcep.h:40
  25.     type RPC_SYNTAX_IDENTIFIER;                             -- rpcdcep.h:45
  26.     type RPC_MESSAGE;                                       -- rpcdcep.h:50
  27.     type RPC_DISPATCH_TABLE;                                -- rpcdcep.h:102
  28.     type RPC_PROTSEQ_ENDPOINT;                              -- rpcdcep.h:104
  29.     type RPC_SERVER_INTERFACE;                              -- rpcdcep.h:115
  30.     type RPC_CLIENT_INTERFACE;                              -- rpcdcep.h:128
  31.     type RPC_TRANSFER_SYNTAX;                               -- rpcdcep.h:269
  32.  
  33.     type PRPC_SYNTAX_IDENTIFIER is access all RPC_SYNTAX_IDENTIFIER;
  34.                                                             -- rpcdcep.h:48
  35.     type PRPC_MESSAGE is access all RPC_MESSAGE;            -- rpcdcep.h:63
  36.     type PRPC_DISPATCH_TABLE is access all RPC_DISPATCH_TABLE;
  37.                                                             -- rpcdcep.h:102
  38.     type PRPC_PROTSEQ_ENDPOINT is access all RPC_PROTSEQ_ENDPOINT;
  39.                                                             -- rpcdcep.h:108
  40.     type PRPC_SERVER_INTERFACE is access all RPC_SERVER_INTERFACE;
  41.                                                             -- rpcdcep.h:126
  42.     type PRPC_CLIENT_INTERFACE is access all RPC_CLIENT_INTERFACE;
  43.                                                             -- rpcdcep.h:139
  44.  
  45.     type RPC_VERSION is                                     -- rpcdcep.h:40
  46.         record
  47.             MajorVersion: Win32.USHORT;                     -- rpcdcep.h:41
  48.             MinorVersion: Win32.USHORT;                     -- rpcdcep.h:42
  49.         end record;
  50.  
  51.     type RPC_SYNTAX_IDENTIFIER is                           -- rpcdcep.h:45
  52.         record
  53.             SyntaxGUID   : Win32.Rpcdce.GUID;               -- rpcdcep.h:46
  54.             SyntaxVersion: RPC_VERSION;                     -- rpcdcep.h:47
  55.         end record;
  56.  
  57.     type PRPC_MGR_EPV is access all Win32.Rpcdce.RPC_MGR_EPV;
  58.                                                             -- rpcdcep.h:60
  59.  
  60.     type RPC_MESSAGE is                                     -- rpcdcep.h:50
  61.         record
  62.             Handle                 : Win32.Rpcdce.RPC_BINDING_HANDLE;
  63.                                                             -- rpcdcep.h:52
  64.             DataRepresentation     : Win32.ULONG;           -- rpcdcep.h:53
  65.             Buffer                 : Win32.PVOID;           -- rpcdcep.h:54
  66.             BufferLength           : Win32.UINT;            -- rpcdcep.h:55
  67.             ProcNum                : Win32.UINT;            -- rpcdcep.h:56
  68.             TransferSyntax         : PRPC_SYNTAX_IDENTIFIER;-- rpcdcep.h:57
  69.             RpcInterfaceInformation: Win32.PVOID;           -- rpcdcep.h:58
  70.             ReservedForRuntime     : Win32.PVOID;           -- rpcdcep.h:59
  71.             ManagerEpv             : PRPC_MGR_EPV;          -- rpcdcep.h:60
  72.             ImportContext          : Win32.PVOID;           -- rpcdcep.h:61
  73.             RpcFlags               : Win32.ULONG;           -- rpcdcep.h:62
  74.         end record;
  75.  
  76.     type RPC_FORWARD_FUNCTION is access function (
  77.                 InterfaceId     : access Win32.Rpcdce.UUID;
  78.                 InterfaceVersion: access RPC_VERSION;
  79.                 ObjectId        : access Win32.Rpcdce.UUID;
  80.                 Rpcpro          : Win32.PUCHAR;
  81.                 ppDestEndpoint  : access Win32.PVOID)
  82.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:66
  83.     pragma Convention(Stdcall, RPC_FORWARD_FUNCTION);
  84.  
  85.     type RPC_DISPATCH_FUNCTION is access procedure (
  86.                 Message: PRPC_MESSAGE);                     -- rpcdcep.h:94
  87.     pragma Convention(Stdcall, RPC_DISPATCH_FUNCTION);
  88.  
  89.     type RPC_DISPATCH_TABLE is                              -- rpcdcep.h:102
  90.         record
  91.             DispatchTableCount: Win32.UINT;                 -- rpcdcep.h:99
  92.             DispatchTable     : RPC_DISPATCH_FUNCTION;      -- rpcdcep.h:100
  93.             Reserved          : Win32.INT;                  -- rpcdcep.h:101
  94.         end record;
  95.  
  96.     type RPC_PROTSEQ_ENDPOINT is                            -- rpcdcep.h:104
  97.         record
  98.             RpcProtocolSequence: Win32.PUCHAR;              -- rpcdcep.h:106
  99.             Endpoint           : Win32.PUCHAR;              -- rpcdcep.h:107
  100.         end record;
  101.  
  102.     type RPC_SERVER_INTERFACE is                            -- rpcdcep.h:115
  103.         record
  104.             Length                 : Win32.UINT;            -- rpcdcep.h:117
  105.             InterfaceId            : RPC_SYNTAX_IDENTIFIER; -- rpcdcep.h:118
  106.             TransferSyntax         : RPC_SYNTAX_IDENTIFIER; -- rpcdcep.h:119
  107.             DispatchTable          : PRPC_DISPATCH_TABLE;   -- rpcdcep.h:120
  108.             RpcProtseqEndpointCount: Win32.UINT;            -- rpcdcep.h:121
  109.             RpcProtseqEndpoint     : PRPC_PROTSEQ_ENDPOINT; -- rpcdcep.h:122
  110.             DefaultManagerEpv      : PRPC_MGR_EPV;          -- rpcdcep.h:123
  111.             InterpreterInfo        : Win32.PVOID;           -- rpcdcep.h:125
  112.         end record;
  113.  
  114.     type RPC_CLIENT_INTERFACE is                            -- rpcdcep.h:128
  115.         record
  116.             Length                 : Win32.UINT;            -- rpcdcep.h:130
  117.             InterfaceId            : RPC_SYNTAX_IDENTIFIER; -- rpcdcep.h:131
  118.             TransferSyntax         : RPC_SYNTAX_IDENTIFIER; -- rpcdcep.h:132
  119.             DispatchTable          : PRPC_DISPATCH_TABLE;   -- rpcdcep.h:133
  120.             RpcProtseqEndpointCount: Win32.UINT;            -- rpcdcep.h:134
  121.             RpcProtseqEndpoint     : PRPC_PROTSEQ_ENDPOINT; -- rpcdcep.h:135
  122.             Reserved               : Win32.ULONG;           -- rpcdcep.h:136
  123.             InterpreterInfo        : Win32.PVOID;           -- rpcdcep.h:138
  124.         end record;
  125.  
  126.     type PRPC_RUNDOWN is access procedure (
  127.                 AssociationContext: Win32.PVOID);           -- rpcdcep.h:190
  128.     pragma Convention(Stdcall, PRPC_RUNDOWN);
  129.  
  130.     type RPC_TRANSFER_SYNTAX is                             -- rpcdcep.h:269
  131.         record
  132.             Uuid     : Win32.Rpcdce.UUID;                   -- rpcdcep.h:271
  133.             VersMajor: Win32.USHORT;                        -- rpcdcep.h:272
  134.             VersMinor: Win32.USHORT;                        -- rpcdcep.h:273
  135.         end record;
  136.  
  137.     function I_RpcGetBuffer(
  138.                 Message: access RPC_MESSAGE)
  139.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:142
  140.  
  141.     function I_RpcSendReceive(
  142.                 Message: access RPC_MESSAGE)
  143.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:147
  144.  
  145.     function I_RpcFreeBuffer(
  146.                 Message: access RPC_MESSAGE)
  147.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:152
  148.  
  149.     procedure I_RpcRequestMutex(
  150.                 Mutex: access I_RPC_MUTEX);                 -- rpcdcep.h:159
  151.  
  152.     procedure I_RpcClearMutex(
  153.                 Mutex: I_RPC_MUTEX);                        -- rpcdcep.h:164
  154.  
  155.     procedure I_RpcDeleteMutex(
  156.                 Mutex: I_RPC_MUTEX);                        -- rpcdcep.h:169
  157.  
  158.     function I_RpcAllocate(
  159.                 Size: Win32.UINT)
  160.                return Win32.PVOID;                          -- rpcdcep.h:174
  161.  
  162.     procedure I_RpcFree(
  163.                 Object: Win32.PVOID);                       -- rpcdcep.h:179
  164.  
  165.     procedure I_RpcPauseExecution(
  166.                 Milliseconds: Win32.ULONG);                 -- rpcdcep.h:184
  167.  
  168.     function I_RpcMonitorAssociation(
  169.                 Handle        : Win32.Rpcdce.RPC_BINDING_HANDLE;
  170.                 RundownRoutine: PRPC_RUNDOWN;
  171.                 Context       : Win32.PVOID)
  172.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:195
  173.  
  174.     function I_RpcStopMonitorAssociation(
  175.                 Handle: Win32.Rpcdce.RPC_BINDING_HANDLE)
  176.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:202
  177.  
  178.     function I_RpcGetCurrentCallHandle return Win32.Rpcdce.RPC_BINDING_HANDLE;
  179.                                                             -- rpcdcep.h:207
  180.  
  181.     function I_RpcGetAssociationContext(
  182.                 AssociationContext: access Win32.PVOID)
  183.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:212
  184.  
  185.     function I_RpcSetAssociationContext(
  186.                 AssociationContext: Win32.PVOID)
  187.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:217
  188.  
  189.     function I_RpcNsBindingSetEntryName(
  190.                 Binding        : Win32.Rpcdce.RPC_BINDING_HANDLE;
  191.                 EntryNameSyntax: Win32.ULONG;
  192.                 EntryName      : Win32.PWSTR)
  193.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:224
  194.  
  195.     function I_RpcBindingInqDynamicEndpoint(
  196.                 Binding        : Win32.Rpcdce.RPC_BINDING_HANDLE;
  197.                 DynamicEndpoint: access Win32.PUSHORT)
  198.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:244
  199.  
  200.     function I_RpcBindingInqTransportType(
  201.                 Binding: Win32.Rpcdce.RPC_BINDING_HANDLE;
  202.                 c_Type : access Win32.UINT)
  203.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:264
  204.  
  205.     function I_RpcIfInqTransferSyntaxes(
  206.                 RpcIfHandle        : Win32.Rpcdce.RPC_IF_HANDLE;
  207.                 TransferSyntaxes   : access RPC_TRANSFER_SYNTAX;
  208.                 TransferSyntaxSize : Win32.UINT;
  209.                 TransferSyntaxCount: access Win32.UINT)
  210.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:277
  211.  
  212.     function I_UuidCreate(
  213.                 Uuid: access Win32.Rpcdce.UUID)
  214.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:285
  215.  
  216.     function I_RpcBindingCopy(
  217.                 SourceBinding     : Win32.Rpcdce.RPC_BINDING_HANDLE;
  218.                 DestinationBinding: access Win32.Rpcdce.RPC_BINDING_HANDLE)
  219.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:290
  220.  
  221.     function I_RpcBindingIsClientLocal(
  222.                 BindingHandle  : Win32.Rpcdce.RPC_BINDING_HANDLE;
  223.                 ClientLocalFlag: access Win32.UINT)
  224.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:296
  225.  
  226.     procedure I_RpcSsDontSerializeContext;                  -- rpcdcep.h:302
  227.  
  228.     function I_RpcServerRegisterForwardFunction(
  229.                 pForwardFunction: RPC_FORWARD_FUNCTION)
  230.                return Win32.Rpc.RPC_STATUS;                 -- rpcdcep.h:308
  231.  
  232. private
  233.  
  234.     pragma Convention(C, RPC_VERSION);                      -- rpcdcep.h:40
  235.     pragma Convention(C, RPC_SYNTAX_IDENTIFIER);            -- rpcdcep.h:45
  236.     pragma Convention(C, RPC_MESSAGE);                      -- rpcdcep.h:50
  237.     pragma Convention(C, RPC_DISPATCH_TABLE);               -- rpcdcep.h:102
  238.     pragma Convention(C, RPC_PROTSEQ_ENDPOINT);             -- rpcdcep.h:104
  239.     pragma Convention(C, RPC_SERVER_INTERFACE);             -- rpcdcep.h:115
  240.     pragma Convention(C, RPC_CLIENT_INTERFACE);             -- rpcdcep.h:128
  241.     pragma Convention(C, RPC_TRANSFER_SYNTAX);              -- rpcdcep.h:269
  242.  
  243.     pragma Import(Stdcall, I_RpcGetBuffer, "I_RpcGetBuffer");     -- rpcdcep.h:142
  244.     pragma Import(Stdcall, I_RpcSendReceive, "I_RpcSendReceive"); -- rpcdcep.h:147
  245.     pragma Import(Stdcall, I_RpcFreeBuffer, "I_RpcFreeBuffer");   -- rpcdcep.h:152
  246.     pragma Import(Stdcall, I_RpcRequestMutex, "I_RpcRequestMutex");
  247.                                                             -- rpcdcep.h:159
  248.     pragma Import(Stdcall, I_RpcClearMutex, "I_RpcClearMutex");   -- rpcdcep.h:164
  249.     pragma Import(Stdcall, I_RpcDeleteMutex, "I_RpcDeleteMutex"); -- rpcdcep.h:169
  250.     pragma Import(Stdcall, I_RpcAllocate, "I_RpcAllocate");       -- rpcdcep.h:174
  251.     pragma Import(Stdcall, I_RpcFree, "I_RpcFree");               -- rpcdcep.h:179
  252.     pragma Import(Stdcall, I_RpcPauseExecution, "I_RpcPauseExecution");
  253.                                                             -- rpcdcep.h:184
  254.     pragma Import(Stdcall, I_RpcMonitorAssociation, "I_RpcMonitorAssociation");
  255.                                                             -- rpcdcep.h:195
  256.     pragma Import(Stdcall, I_RpcStopMonitorAssociation, 
  257.                      "I_RpcStopMonitorAssociation");        -- rpcdcep.h:202
  258.     pragma Import(Stdcall, I_RpcGetCurrentCallHandle, "I_RpcGetCurrentCallHandle");
  259.                                                             -- rpcdcep.h:207
  260.     pragma Import(Stdcall, I_RpcGetAssociationContext, "I_RpcGetAssociationContext");
  261.                                                             -- rpcdcep.h:212
  262.     pragma Import(Stdcall, I_RpcSetAssociationContext, "I_RpcSetAssociationContext");
  263.                                                             -- rpcdcep.h:217
  264.     pragma Import(Stdcall, I_RpcNsBindingSetEntryName, "I_RpcNsBindingSetEntryName");
  265.                                                             -- rpcdcep.h:224
  266.     pragma Import(Stdcall, I_RpcBindingInqDynamicEndpoint, 
  267.                      "I_RpcBindingInqDynamicEndpoint");     -- rpcdcep.h:244
  268.     pragma Import(Stdcall, I_RpcBindingInqTransportType, 
  269.                      "I_RpcBindingInqTransportType");       -- rpcdcep.h:264
  270.     pragma Import(Stdcall, I_RpcIfInqTransferSyntaxes, "I_RpcIfInqTransferSyntaxes");
  271.                                                             -- rpcdcep.h:277
  272.     pragma Import(Stdcall, I_UuidCreate, "I_UuidCreate");         -- rpcdcep.h:285
  273.     pragma Import(Stdcall, I_RpcBindingCopy, "I_RpcBindingCopy"); -- rpcdcep.h:290
  274.     pragma Import(Stdcall, I_RpcBindingIsClientLocal, "I_RpcBindingIsClientLocal");
  275.                                                             -- rpcdcep.h:296
  276.     pragma Import(Stdcall, I_RpcSsDontSerializeContext, 
  277.                      "I_RpcSsDontSerializeContext");        -- rpcdcep.h:302
  278.     pragma Import(Stdcall, I_RpcServerRegisterForwardFunction, 
  279.                      "I_RpcServerRegisterForwardFunction"); -- rpcdcep.h:308
  280.  
  281. -------------------------------------------------------------------------------
  282. --
  283. -- THIS FILE AND ANY ASSOCIATED DOCUMENTATION IS PROVIDED WITHOUT CHARGE
  284. -- "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING
  285. -- BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR
  286. -- FITNESS FOR A PARTICULAR PURPOSE.  The user assumes the entire risk as to
  287. -- the accuracy and the use of this file.  This file may be used, copied,
  288. -- modified and distributed only by licensees of Microsoft Corporation's
  289. -- WIN32 Software Development Kit in accordance with the terms of the 
  290. -- licensee's End-User License Agreement for Microsoft Software for the
  291. -- WIN32 Development Kit.
  292. --
  293. -- Copyright (c) Intermetrics, Inc. 1995
  294. -- Portions (c) 1985-1994 Microsoft Corporation with permission.
  295. -- Microsoft is a registered trademark and Windows and Windows NT are
  296. -- trademarks of Microsoft Corporation.
  297. --
  298. -------------------------------------------------------------------------------
  299.  
  300. end Win32.Rpcdcep;
  301.