1 {******************************************************************************}
2 { }
3 { RPC DCE API interface Unit for Object Pascal }
4 { }
5 { Portions created by Microsoft are Copyright (C) 1995-2001 Microsoft }
6 { Corporation. All Rights Reserved. }
7 { }
8 { The original file is: rpcdce.h, released June 2000. The original Pascal }
9 { code is: Rpcce.pas, released December 2000. The initial developer of the }
10 { Pascal code is Marcel van Brakel (brakelm att chello dott nl). }
11 { }
12 { Portions created by Marcel van Brakel are Copyright (C) 1999-2001 }
13 { Marcel van Brakel. All Rights Reserved. }
14 { }
15 { Obtained through: Joint Endeavour of Delphi Innovators (Project JEDI) }
16 { }
17 { You may retrieve the latest version of this file at the Project JEDI }
18 { APILIB home page, located at http://jedi-apilib.sourceforge.net }
19 { }
20 { The contents of this file are used with permission, subject to the Mozilla }
21 { Public License Version 1.1 (the "License"); you may not use this file except }
22 { in compliance with the License. You may obtain a copy of the License at }
23 { http://www.mozilla.org/MPL/MPL-1.1.html }
24 { }
25 { Software distributed under the License is distributed on an "AS IS" basis, }
26 { WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for }
27 { the specific language governing rights and limitations under the License. }
28 { }
29 { Alternatively, the contents of this file may be used under the terms of the }
30 { GNU Lesser General Public License (the "LGPL License"), in which case the }
31 { provisions of the LGPL License are applicable instead of those above. }
32 { If you wish to allow use of your version of this file only under the terms }
33 { of the LGPL License and not to allow others to use your version of this file }
34 { under the MPL, indicate your decision by deleting the provisions above and }
35 { replace them with the notice and other provisions required by the LGPL }
36 { License. If you do not delete the provisions above, a recipient may use }
37 { your version of this file under either the MPL or the LGPL License. }
38 { }
39 { For more information about the LGPL: http://www.gnu.org/copyleft/lesser.html }
40 { }
41 {******************************************************************************}
42
43 // $Id: JwaRpcDce.pas,v 1.14 2007/09/14 06:48:47 marquardt Exp $
44 {$IFNDEF JWA_OMIT_SECTIONS}
45 unit JwaRpcDce;
46
47 {$WEAKPACKAGEUNIT}
48 {$ENDIF JWA_OMIT_SECTIONS}
49
50 {$HPPEMIT ''}
51 {$HPPEMIT '#include "RpcDce.h"'}
52 {$HPPEMIT ''}
53 {$HPPEMIT 'typedef RPC_BINDING_VECTOR *PRPC_BINDING_VECTOR'}
54 {$HPPEMIT 'typedef UUID_VECTOR *PUUID_VECTOR'}
55 {$HPPEMIT 'typedef RPC_IF_ID *PRPC_IF_ID'}
56 {$HPPEMIT 'typedef RPC_PROTSEQ_VECTORA *PRPC_PROTSEQ_VECTORA'}
57 {$HPPEMIT 'typedef RPC_PROTSEQ_VECTORW *PRPC_PROTSEQ_VECTORW'}
58 {$HPPEMIT 'typedef RPC_STATS_VECTOR *PRPC_STATS_VECTOR'}
59 {$HPPEMIT 'typedef RPC_IF_ID_VECTOR *PRPC_IF_ID_VECTOR'}
60 {$HPPEMIT 'typedef RPC_AUTHZ_HANDLE *PRPC_AUTHZ_HANDLE'}
61 {$HPPEMIT 'typedef RPC_AUTH_IDENTITY_HANDLE *PRPC_AUTH_IDENTITY_HANDLE'}
62 {$HPPEMIT 'typedef RPC_BINDING_HANDLE *PRPC_BINDING_HANDLE'}
63 {$HPPEMIT 'typedef UUID *PUUID'}
64 {$HPPEMIT 'typedef UUID *LPUUID'}
65 {$HPPEMIT ''}
66
67 {$IFNDEF JWA_OMIT_SECTIONS}
68 {$I jediapilib.inc}
69
70 interface
71
72 uses
73 JwaWinNT, JwaWinType, JwaRpc;
74 {$ENDIF JWA_OMIT_SECTIONS}
75
76 {$IFNDEF JWA_IMPLEMENTATIONSECTION}
77 type
78 RPC_BINDING_HANDLE = I_RPC_HANDLE;
79 {$EXTERNALSYM RPC_BINDING_HANDLE}
80
81 {$IFNDEF JWA_INCLUDEMODE}
82 UUID = GUID;
83 {$EXTERNALSYM UUID}
84 {$ENDIF JWA_INCLUDEMODE}
85
86 PRPC_BINDING_HANDLE = ^RPC_BINDING_HANDLE;
87 {$NODEFINE PRPC_BINDING_HANDLE}
88 PUUID = ^UUID;
89 {$NODEFINE PUUID}
90 LPUUID = ^UUID;
91 {$NODEFINE LPUUID}
92
93 type
94 PRPC_BINDING_VECTOR = ^RPC_BINDING_VECTOR;
95 {$NODEFINE PRPC_BINDING_VECTOR}
96 _RPC_BINDING_VECTOR = record
97 Count: Cardinal;
98 BindingH: array [0..0] of RPC_BINDING_HANDLE;
99 end;
100 {$EXTERNALSYM _RPC_BINDING_VECTOR}
101 RPC_BINDING_VECTOR = _RPC_BINDING_VECTOR;
102 {$EXTERNALSYM RPC_BINDING_VECTOR}
103 TRpcBindingVector = RPC_BINDING_VECTOR;
104 PRpcBindingVector = PRPC_BINDING_VECTOR;
105
106 PUUID_VECTOR = ^UUID_VECTOR;
107 {$NODEFINE PUUID_VECTOR}
108 _UUID_VECTOR = record
109 Count: Cardinal;
110 Uuid: array [0..0] of PUUID;
111 end;
112 {$EXTERNALSYM _UUID_VECTOR}
113 UUID_VECTOR = _UUID_VECTOR;
114 {$EXTERNALSYM UUID_VECTOR}
115 TUuidVector = UUID_VECTOR;
116 PUuidVector = ^TUuidVector;
117
118 RPC_IF_HANDLE = LPVOID;
119 {$EXTERNALSYM RPC_IF_HANDLE}
120
121 PRPC_IF_ID = ^RPC_IF_ID;
122 {$NODEFINE PRPC_IF_ID}
123 _RPC_IF_ID = record
124 Uuid: UUID;
125 VersMajor: Word;
126 VersMinor: Word;
127 end;
128 {$EXTERNALSYM _RPC_IF_ID}
129 RPC_IF_ID = _RPC_IF_ID;
130 {$EXTERNALSYM RPC_IF_ID}
131 TRpcIfId = RPC_IF_ID;
132 PRpcIfId = ^TRpcIfId;
133
134 const
135 RPC_C_BINDING_INFINITE_TIMEOUT = 10;
136 {$EXTERNALSYM RPC_C_BINDING_INFINITE_TIMEOUT}
137 RPC_C_BINDING_MIN_TIMEOUT = 0;
138 {$EXTERNALSYM RPC_C_BINDING_MIN_TIMEOUT}
139 RPC_C_BINDING_DEFAULT_TIMEOUT = 5;
140 {$EXTERNALSYM RPC_C_BINDING_DEFAULT_TIMEOUT}
141 RPC_C_BINDING_MAX_TIMEOUT = 9;
142 {$EXTERNALSYM RPC_C_BINDING_MAX_TIMEOUT}
143
144 RPC_C_CANCEL_INFINITE_TIMEOUT = DWORD(-1);
145 {$EXTERNALSYM RPC_C_CANCEL_INFINITE_TIMEOUT}
146
147 RPC_C_LISTEN_MAX_CALLS_DEFAULT = 1234;
148 {$EXTERNALSYM RPC_C_LISTEN_MAX_CALLS_DEFAULT}
149 RPC_C_PROTSEQ_MAX_REQS_DEFAULT = 10;
150 {$EXTERNALSYM RPC_C_PROTSEQ_MAX_REQS_DEFAULT}
151
152 // RPC_POLICY EndpointFlags.
153
154 RPC_C_BIND_TO_ALL_NICS = 1;
155 {$EXTERNALSYM RPC_C_BIND_TO_ALL_NICS}
156 RPC_C_USE_INTERNET_PORT = $1;
157 {$EXTERNALSYM RPC_C_USE_INTERNET_PORT}
158 RPC_C_USE_INTRANET_PORT = $2;
159 {$EXTERNALSYM RPC_C_USE_INTRANET_PORT}
160 RPC_C_DONT_FAIL = $4;
161 {$EXTERNALSYM RPC_C_DONT_FAIL}
162
163 // RPC_POLICY EndpointFlags specific to the Falcon/RPC transport:
164
165 RPC_C_MQ_TEMPORARY = $0000;
166 {$EXTERNALSYM RPC_C_MQ_TEMPORARY}
167 RPC_C_MQ_PERMANENT = $0001;
168 {$EXTERNALSYM RPC_C_MQ_PERMANENT}
169 RPC_C_MQ_CLEAR_ON_OPEN = $0002;
170 {$EXTERNALSYM RPC_C_MQ_CLEAR_ON_OPEN}
171 RPC_C_MQ_USE_EXISTING_SECURITY = $0004;
172 {$EXTERNALSYM RPC_C_MQ_USE_EXISTING_SECURITY}
173 RPC_C_MQ_AUTHN_LEVEL_NONE = $0000;
174 {$EXTERNALSYM RPC_C_MQ_AUTHN_LEVEL_NONE}
175 RPC_C_MQ_AUTHN_LEVEL_PKT_INTEGRITY = $0008;
176 {$EXTERNALSYM RPC_C_MQ_AUTHN_LEVEL_PKT_INTEGRITY}
177 RPC_C_MQ_AUTHN_LEVEL_PKT_PRIVACY = $0010;
178 {$EXTERNALSYM RPC_C_MQ_AUTHN_LEVEL_PKT_PRIVACY}
179
180 // Client: RpcBindingSetOption() values for the Falcon/RPC transport:
181
182 RPC_C_OPT_MQ_DELIVERY = 1;
183 {$EXTERNALSYM RPC_C_OPT_MQ_DELIVERY}
184 RPC_C_OPT_MQ_PRIORITY = 2;
185 {$EXTERNALSYM RPC_C_OPT_MQ_PRIORITY}
186 RPC_C_OPT_MQ_JOURNAL = 3;
187 {$EXTERNALSYM RPC_C_OPT_MQ_JOURNAL}
188 RPC_C_OPT_MQ_ACKNOWLEDGE = 4;
189 {$EXTERNALSYM RPC_C_OPT_MQ_ACKNOWLEDGE}
190 RPC_C_OPT_MQ_AUTHN_SERVICE = 5;
191 {$EXTERNALSYM RPC_C_OPT_MQ_AUTHN_SERVICE}
192 RPC_C_OPT_MQ_AUTHN_LEVEL = 6;
193 {$EXTERNALSYM RPC_C_OPT_MQ_AUTHN_LEVEL}
194 RPC_C_OPT_MQ_TIME_TO_REACH_QUEUE = 7;
195 {$EXTERNALSYM RPC_C_OPT_MQ_TIME_TO_REACH_QUEUE}
196 RPC_C_OPT_MQ_TIME_TO_BE_RECEIVED = 8;
197 {$EXTERNALSYM RPC_C_OPT_MQ_TIME_TO_BE_RECEIVED}
198 RPC_C_OPT_BINDING_NONCAUSAL = 9;
199 {$EXTERNALSYM RPC_C_OPT_BINDING_NONCAUSAL}
200 RPC_C_OPT_SECURITY_CALLBACK = 10;
201 {$EXTERNALSYM RPC_C_OPT_SECURITY_CALLBACK}
202 RPC_C_OPT_UNIQUE_BINDING = 11;
203 {$EXTERNALSYM RPC_C_OPT_UNIQUE_BINDING}
204 RPC_C_OPT_CALL_TIMEOUT = 12;
205 {$EXTERNALSYM RPC_C_OPT_CALL_TIMEOUT}
206 RPC_C_OPT_DONT_LINGER = 13;
207 {$EXTERNALSYM RPC_C_OPT_DONT_LINGER}
208 RPC_C_OPT_MAX_OPTIONS = 14;
209 {$EXTERNALSYM RPC_C_OPT_MAX_OPTIONS}
210
211 RPC_C_MQ_EXPRESS = 0; // Client: RPC_C_MQ_DELIVERY.
212 {$EXTERNALSYM RPC_C_MQ_EXPRESS}
213 RPC_C_MQ_RECOVERABLE = 1;
214 {$EXTERNALSYM RPC_C_MQ_RECOVERABLE}
215
216 RPC_C_MQ_JOURNAL_NONE = 0; // Client: RPC_C_MQ_JOURNAL.
217 {$EXTERNALSYM RPC_C_MQ_JOURNAL_NONE}
218 RPC_C_MQ_JOURNAL_DEADLETTER = 1;
219 {$EXTERNALSYM RPC_C_MQ_JOURNAL_DEADLETTER}
220 RPC_C_MQ_JOURNAL_ALWAYS = 2;
221 {$EXTERNALSYM RPC_C_MQ_JOURNAL_ALWAYS}
222
223 // flags for RpcServerInqAuthClientEx
224
225 RPC_C_FULL_CERT_CHAIN = $0001;
226 {$EXTERNALSYM RPC_C_FULL_CERT_CHAIN}
227
228 type
229 PRPC_PROTSEQ_VECTORA = ^RPC_PROTSEQ_VECTORA;
230 {$NODEFINE PRPC_PROTSEQ_VECTORA}
231 _RPC_PROTSEQ_VECTORA = record
232 Count: Cardinal;
233 Protseq: array [0..0] of PByte
234 end;
235 {$EXTERNALSYM _RPC_PROTSEQ_VECTORA}
236 RPC_PROTSEQ_VECTORA = _RPC_PROTSEQ_VECTORA;
237 {$EXTERNALSYM RPC_PROTSEQ_VECTORA}
238 TRpcProtSeqVectorA = RPC_PROTSEQ_VECTORA;
239 PRpcProtSeqVectorA = PRPC_PROTSEQ_VECTORA;
240
241 PRPC_PROTSEQ_VECTORW = ^RPC_PROTSEQ_VECTORW;
242 {$NODEFINE PRPC_PROTSEQ_VECTORW}
243 _RPC_PROTSEQ_VECTORW = record
244 Count: Cardinal;
245 Protseq: array [0..0] of PWord;
246 end;
247 {$EXTERNALSYM _RPC_PROTSEQ_VECTORW}
248 RPC_PROTSEQ_VECTORW = _RPC_PROTSEQ_VECTORW;
249 {$EXTERNALSYM RPC_PROTSEQ_VECTORW}
250 TRpcProtSeqVectorW = RPC_PROTSEQ_VECTORW;
251 PRpcProtSeqVectorW = PRPC_PROTSEQ_VECTORW;
252
253 {$IFDEF UNICODE}
254 RPC_PROTSEQ_VECTOR = RPC_PROTSEQ_VECTORW;
255 {$EXTERNALSYM RPC_PROTSEQ_VECTOR}
256 PRPC_PROTSEQ_VECTOR = PRPC_PROTSEQ_VECTORW;
257 TRpcProtSeqVector = TRpcProtSeqVectorW;
258 PRpcProtSeqVector = PRpcProtSeqVectorW;
259 {$ELSE}
260 RPC_PROTSEQ_VECTOR = RPC_PROTSEQ_VECTORA;
261 {$EXTERNALSYM RPC_PROTSEQ_VECTOR}
262 PRPC_PROTSEQ_VECTOR = PRPC_PROTSEQ_VECTORA;
263 TRpcProtSeqVector = TRpcProtSeqVectorA;
264 PRpcProtSeqVector = PRpcProtSeqVectorA;
265 {$ENDIF UNICODE}
266
267 PRPC_POLICY = ^RPC_POLICY;
268 {$EXTERNALSYM PRPC_POLICY}
269 _RPC_POLICY = record
270 Length: Cardinal;
271 EndpointFlags: Cardinal;
272 NICFlags: Cardinal;
273 end;
274 {$EXTERNALSYM _RPC_POLICY}
275 RPC_POLICY = _RPC_POLICY;
276 {$EXTERNALSYM RPC_POLICY}
277 TRpcPolicy = RPC_POLICY;
278 PRpcPolicy = PRPC_POLICY;
279
280 RPC_OBJECT_INQ_FN = procedure(const ObjectUuid: UUID; var TypeUuid: UUID;
281 var Status: RPC_STATUS); stdcall;
282 {$EXTERNALSYM RPC_OBJECT_INQ_FN}
283 TRpcObjectInqFn = RPC_OBJECT_INQ_FN;
284
nterfaceUuidnull285 RPC_IF_CALLBACK_FN = function(InterfaceUuid: RPC_IF_HANDLE; Context: Pointer): RPC_STATUS; stdcall;
286 {$EXTERNALSYM RPC_IF_CALLBACK_FN}
287 TRpcIfCallbackFn = RPC_IF_CALLBACK_FN;
288
289 RPC_SECURITY_CALLBACK_FN = procedure(Context: Pointer); stdcall;
290 {$EXTERNALSYM RPC_SECURITY_CALLBACK_FN}
291 TRpcSecurityCallbackFn = RPC_SECURITY_CALLBACK_FN;
292
293 PRPC_STATS_VECTOR = ^RPC_STATS_VECTOR;
294 {$NODEFINE PRPC_STATS_VECTOR}
295 RPC_STATS_VECTOR = record
296 Count: Cardinal;
297 Stats: array [0..0] of Cardinal;
298 end;
299 {$EXTERNALSYM RPC_STATS_VECTOR}
300 TRpcStatsVector = RPC_STATS_VECTOR;
301 PRpcStatsVector = PRPC_STATS_VECTOR;
302
303 const
304 RPC_C_STATS_CALLS_IN = 0;
305 {$EXTERNALSYM RPC_C_STATS_CALLS_IN}
306 RPC_C_STATS_CALLS_OUT = 1;
307 {$EXTERNALSYM RPC_C_STATS_CALLS_OUT}
308 RPC_C_STATS_PKTS_IN = 2;
309 {$EXTERNALSYM RPC_C_STATS_PKTS_IN}
310 RPC_C_STATS_PKTS_OUT = 3;
311 {$EXTERNALSYM RPC_C_STATS_PKTS_OUT}
312
313 type
314 PRPC_IF_ID_VECTOR = ^RPC_IF_ID_VECTOR;
315 {$NODEFINE RPC_IF_ID_VECTOR}
316 RPC_IF_ID_VECTOR = record
317 Count: Cardinal;
318 IfId: array [0..0] of PRpcIfId;
319 end;
320 {$EXTERNALSYM RPC_IF_ID_VECTOR}
321 TRpcIfIdVector = RPC_IF_ID_VECTOR;
322 PRpcIfIdVector = PRPC_IF_ID_VECTOR;
323
RpcBindingCopynull324 function RpcBindingCopy(SourceBinding: RPC_BINDING_HANDLE;
325 var DestinationBinding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
326 {$EXTERNALSYM RpcBindingCopy}
327
RpcBindingFreenull328 function RpcBindingFree(var Binding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
329 {$EXTERNALSYM RpcBindingFree}
330
RpcBindingSetOptionnull331 function RpcBindingSetOption(hBinding: RPC_BINDING_HANDLE; option: Cardinal;
332 optionValue: ULONG_PTR): RPC_STATUS; stdcall;
333 {$EXTERNALSYM RpcBindingSetOption}
334
RpcBindingInqOptionnull335 function RpcBindingInqOption(hBinding: RPC_BINDING_HANDLE; option: Cardinal;
336 var pOptionValue: ULONG_PTR): RPC_STATUS; stdcall;
337 {$EXTERNALSYM RpcBindingInqOption}
338
RpcBindingFromStringBindingAnull339 function RpcBindingFromStringBindingA(StringBinding: PChar;
340 var Binding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
341 {$EXTERNALSYM RpcBindingFromStringBindingA}
RpcBindingFromStringBindingWnull342 function RpcBindingFromStringBindingW(StringBinding: PWideChar;
343 var Binding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
344 {$EXTERNALSYM RpcBindingFromStringBindingW}
RpcBindingFromStringBindingnull345 function RpcBindingFromStringBinding(StringBinding: PTSTR;
346 var Binding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
347 {$EXTERNALSYM RpcBindingFromStringBinding}
348
RpcSsGetContextBindingnull349 function RpcSsGetContextBinding(ContextHandle: Pointer; var Binding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
350 {$EXTERNALSYM RpcSsGetContextBinding}
351
RpcBindingInqObjectnull352 function RpcBindingInqObject(Binding: RPC_BINDING_HANDLE; var ObjectUuid: UUID): RPC_STATUS; stdcall;
353 {$EXTERNALSYM RpcBindingInqObject}
354
RpcBindingResetnull355 function RpcBindingReset(Binding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
356 {$EXTERNALSYM RpcBindingReset}
357
358 // RpcBindingServerFromClient : UNSUPPORTED
359 // RpcBindingSetAuthInfo
360
RpcBindingSetObjectnull361 function RpcBindingSetObject(Binding: RPC_BINDING_HANDLE; const ObjectUuid: UUID): RPC_STATUS; stdcall;
362 {$EXTERNALSYM RpcBindingSetObject}
363
RpcMgmtInqDefaultProtectLevelnull364 function RpcMgmtInqDefaultProtectLevel(AuthnSvc: Cardinal; var AuthnLevel: Cardinal): RPC_STATUS; stdcall;
365 {$EXTERNALSYM RpcMgmtInqDefaultProtectLevel}
366
RpcBindingToStringBindingAnull367 function RpcBindingToStringBindingA(Binding: RPC_BINDING_HANDLE;
368 var StringBinding: PChar): RPC_STATUS; stdcall;
369 {$EXTERNALSYM RpcBindingToStringBindingA}
RpcBindingToStringBindingWnull370 function RpcBindingToStringBindingW(Binding: RPC_BINDING_HANDLE;
371 var StringBinding: PWideChar): RPC_STATUS; stdcall;
372 {$EXTERNALSYM RpcBindingToStringBindingW}
RpcBindingToStringBindingnull373 function RpcBindingToStringBinding(Binding: RPC_BINDING_HANDLE;
374 var StringBinding: PTSTR): RPC_STATUS; stdcall;
375 {$EXTERNALSYM RpcBindingToStringBinding}
376
RpcBindingVectorFreenull377 function RpcBindingVectorFree(var BindingVector: PRPC_BINDING_VECTOR): RPC_STATUS; stdcall;
378 {$EXTERNALSYM RpcBindingVectorFree}
379
RpcStringBindingComposeAnull380 function RpcStringBindingComposeA(ObjUuid, Protseq, NetworkAddr, Endpoint,
381 Options: PChar; var StringBinding: PChar): RPC_STATUS; stdcall;
382 {$EXTERNALSYM RpcStringBindingComposeA}
RpcStringBindingComposeWnull383 function RpcStringBindingComposeW(ObjUuid, Protseq, NetworkAddr, Endpoint,
384 Options: PWideChar; var StringBinding: PWideChar): RPC_STATUS; stdcall;
385 {$EXTERNALSYM RpcStringBindingComposeW}
RpcStringBindingComposenull386 function RpcStringBindingCompose(ObjUuid, Protseq, NetworkAddr, Endpoint,
387 Options: PTSTR; var StringBinding: PTSTR): RPC_STATUS; stdcall;
388 {$EXTERNALSYM RpcStringBindingCompose}
389
RpcStringBindingParseAnull390 function RpcStringBindingParseA(StringBinding: PChar; ObjUuid, Protseq,
391 NetworkAddr, Endpoint, NetworkOptions: PPChar): RPC_STATUS; stdcall;
392 {$EXTERNALSYM RpcStringBindingParseA}
RpcStringBindingParseWnull393 function RpcStringBindingParseW(StringBinding: PWideChar; ObjUuid, Protseq,
394 NetworkAddr, Endpoint, NetworkOptions: PPWideChar): RPC_STATUS; stdcall;
395 {$EXTERNALSYM RpcStringBindingParseW}
RpcStringBindingParsenull396 function RpcStringBindingParse(StringBinding: PTSTR; ObjUuid, Protseq,
397 NetworkAddr, Endpoint, NetworkOptions: PPTSTR): RPC_STATUS; stdcall;
398 {$EXTERNALSYM RpcStringBindingParse}
399
RpcStringFreeAnull400 function RpcStringFreeA(var S: PChar): RPC_STATUS; stdcall;
401 {$EXTERNALSYM RpcStringFreeA}
RpcStringFreeWnull402 function RpcStringFreeW(var S: PWideChar): RPC_STATUS; stdcall;
403 {$EXTERNALSYM RpcStringFreeW}
RpcStringFreenull404 function RpcStringFree(var S: PTSTR): RPC_STATUS; stdcall;
405 {$EXTERNALSYM RpcStringFree}
406
RpcIfInqIdnull407 function RpcIfInqId(RpcIfHandle: RPC_IF_HANDLE; var RpcIfId: RPC_IF_ID): RPC_STATUS; stdcall;
408 {$EXTERNALSYM RpcIfInqId}
409
RpcNetworkIsProtseqValidAnull410 function RpcNetworkIsProtseqValidA(Protseq: PChar): RPC_STATUS; stdcall;
411 {$EXTERNALSYM RpcNetworkIsProtseqValidA}
412
RpcNetworkIsProtseqValidWnull413 function RpcNetworkIsProtseqValidW(Protseq: PWideChar): RPC_STATUS; stdcall;
414 {$EXTERNALSYM RpcNetworkIsProtseqValidW}
415
RpcMgmtInqComTimeoutnull416 function RpcMgmtInqComTimeout(Binding: RPC_BINDING_HANDLE; var Timeout: Cardinal): RPC_STATUS; stdcall;
417 {$EXTERNALSYM RpcMgmtInqComTimeout}
418
RpcMgmtSetComTimeoutnull419 function RpcMgmtSetComTimeout(Binding: RPC_BINDING_HANDLE; Timeout: Cardinal): RPC_STATUS; stdcall;
420 {$EXTERNALSYM RpcMgmtSetComTimeout}
421
RpcMgmtSetCancelTimeoutnull422 function RpcMgmtSetCancelTimeout(Timeout: Longint): RPC_STATUS; stdcall;
423 {$EXTERNALSYM RpcMgmtSetCancelTimeout}
424
RpcNetworkInqProtseqsAnull425 function RpcNetworkInqProtseqsA(var ProtseqVector: PRPC_PROTSEQ_VECTORA): RPC_STATUS; stdcall;
426 {$EXTERNALSYM RpcNetworkInqProtseqsA}
RpcNetworkInqProtseqsWnull427 function RpcNetworkInqProtseqsW(var ProtseqVector: PRPC_PROTSEQ_VECTORW): RPC_STATUS; stdcall;
428 {$EXTERNALSYM RpcNetworkInqProtseqsW}
RpcNetworkInqProtseqsnull429 function RpcNetworkInqProtseqs(var ProtseqVector: PRPC_PROTSEQ_VECTOR): RPC_STATUS; stdcall;
430 {$EXTERNALSYM RpcNetworkInqProtseqs}
431
RpcObjectInqTypenull432 function RpcObjectInqType(const ObjUuid: UUID; TypeUuid: PUUID): RPC_STATUS; stdcall;
433 {$EXTERNALSYM RpcObjectInqType}
434
RpcObjectSetInqFnnull435 function RpcObjectSetInqFn(InquiryFn: RPC_OBJECT_INQ_FN): RPC_STATUS; stdcall;
436 {$EXTERNALSYM RpcObjectSetInqFn}
437
RpcObjectSetTypenull438 function RpcObjectSetType(const ObjUuid: UUID; TypeUuid: PUUID): RPC_STATUS; stdcall;
439 {$EXTERNALSYM RpcObjectSetType}
440
RpcProtseqVectorFreeAnull441 function RpcProtseqVectorFreeA(var ProtseqVector: PRPC_PROTSEQ_VECTORA): RPC_STATUS; stdcall;
442 {$EXTERNALSYM RpcProtseqVectorFreeA}
RpcProtseqVectorFreeWnull443 function RpcProtseqVectorFreeW(var ProtseqVector: PRPC_PROTSEQ_VECTORW): RPC_STATUS; stdcall;
444 {$EXTERNALSYM RpcProtseqVectorFreeW}
RpcProtseqVectorFreenull445 function RpcProtseqVectorFree(var ProtseqVector: PRPC_PROTSEQ_VECTOR): RPC_STATUS; stdcall;
446 {$EXTERNALSYM RpcProtseqVectorFree}
447
RpcServerInqBindingsnull448 function RpcServerInqBindings(var BindingVector: PRPC_BINDING_VECTOR): RPC_STATUS; stdcall;
449 {$EXTERNALSYM RpcServerInqBindings}
450
RpcServerInqIfnull451 function RpcServerInqIf(IfSpec: RPC_IF_HANDLE; MgrTypeUuid: PUUID;
452 MgrEpv: Pointer): RPC_STATUS; stdcall;
453 {$EXTERNALSYM RpcServerInqIf}
454
RpcServerListennull455 function RpcServerListen(MinimumCallThreads, MaxCalls, DontWait: Cardinal): RPC_STATUS; stdcall;
456 {$EXTERNALSYM RpcServerListen}
457
RpcServerRegisterIfnull458 function RpcServerRegisterIf(IfSpec: RPC_IF_HANDLE; MgrTypeUuid: PUUID;
459 MgrEpv: Pointer): RPC_STATUS; stdcall;
460 {$EXTERNALSYM RpcServerRegisterIf}
461
RpcServerRegisterIfExnull462 function RpcServerRegisterIfEx(IfSpec: RPC_IF_HANDLE; MgrTypeUuid: PUUID;
463 MgrEpv: Pointer; Flags, MaxCalls: Cardinal; IfCallback: RPC_IF_CALLBACK_FN): RPC_STATUS; stdcall;
464 {$EXTERNALSYM RpcServerRegisterIfEx}
465
RpcServerRegisterIf2null466 function RpcServerRegisterIf2(IfSpec: RPC_IF_HANDLE; MgrTypeUuid: PUUID;
467 MgrEpv: Pointer; Flags, MaxCalls, MaxRpcSize: Cardinal;
468 IfCallbackFn: RPC_IF_CALLBACK_FN): RPC_STATUS; stdcall;
469 {$EXTERNALSYM RpcServerRegisterIf2}
470
RpcServerUnregisterIfnull471 function RpcServerUnregisterIf(IfSpec: RPC_IF_HANDLE; MgrTypeUuid: PUUID;
472 WaitForCallsToComplete: Cardinal): RPC_STATUS; stdcall;
473 {$EXTERNALSYM RpcServerUnregisterIf}
474
RpcServerUnregisterIfExnull475 function RpcServerUnregisterIfEx(IfSpec: RPC_IF_HANDLE; MgrTypeUuid: PUUID;
476 RundownContextHandles: Integer): RPC_STATUS; stdcall;
477 {$EXTERNALSYM RpcServerUnregisterIfEx}
478
RpcServerUseAllProtseqsnull479 function RpcServerUseAllProtseqs(MaxCalls: Cardinal; SecurityDescriptor: Pointer): RPC_STATUS; stdcall;
480 {$EXTERNALSYM RpcServerUseAllProtseqs}
481
RpcServerUseAllProtseqsExnull482 function RpcServerUseAllProtseqsEx(MaxCalls: Cardinal; SecurityDescriptor: Pointer;
483 Policy: PRPC_POLICY): RPC_STATUS; stdcall;
484 {$EXTERNALSYM RpcServerUseAllProtseqsEx}
485
RpcServerUseAllProtseqsIfnull486 function RpcServerUseAllProtseqsIf(MaxCalls: Cardinal; IfSpec: RPC_IF_HANDLE;
487 SecurityDescriptor: Pointer): RPC_STATUS; stdcall;
488 {$EXTERNALSYM RpcServerUseAllProtseqsIf}
489
RpcServerUseAllProtseqsIfExnull490 function RpcServerUseAllProtseqsIfEx(MaxCalls: Cardinal; IfSpec: RPC_IF_HANDLE;
491 SecurityDescriptor: Pointer; Policy: PRPC_POLICY): RPC_STATUS; stdcall;
492 {$EXTERNALSYM RpcServerUseAllProtseqsIfEx}
493
RpcServerUseProtseqAnull494 function RpcServerUseProtseqA(Protseq: PChar; MaxCalls: Cardinal;
495 SecurityDescriptor: Pointer): RPC_STATUS; stdcall;
496 {$EXTERNALSYM RpcServerUseProtseqA}
RpcServerUseProtseqWnull497 function RpcServerUseProtseqW(Protseq: PWideChar; MaxCalls: Cardinal;
498 SecurityDescriptor: Pointer): RPC_STATUS; stdcall;
499 {$EXTERNALSYM RpcServerUseProtseqW}
RpcServerUseProtseqnull500 function RpcServerUseProtseq(Protseq: PTSTR; MaxCalls: Cardinal;
501 SecurityDescriptor: Pointer): RPC_STATUS; stdcall;
502 {$EXTERNALSYM RpcServerUseProtseq}
503
RpcServerUseProtseqExAnull504 function RpcServerUseProtseqExA(Protseq: PChar; MaxCalls: Cardinal;
505 SecurityDescriptor: Pointer; const Policy: RPC_POLICY): RPC_STATUS; stdcall;
506 {$EXTERNALSYM RpcServerUseProtseqExA}
RpcServerUseProtseqExWnull507 function RpcServerUseProtseqExW(Protseq: PWideChar; MaxCalls: Cardinal;
508 SecurityDescriptor: Pointer; const Policy: RPC_POLICY): RPC_STATUS; stdcall;
509 {$EXTERNALSYM RpcServerUseProtseqExW}
RpcServerUseProtseqExnull510 function RpcServerUseProtseqEx(Protseq: PTSTR; MaxCalls: Cardinal;
511 SecurityDescriptor: Pointer; const Policy: RPC_POLICY): RPC_STATUS; stdcall;
512 {$EXTERNALSYM RpcServerUseProtseqEx}
513
RpcServerUseProtseqEpAnull514 function RpcServerUseProtseqEpA(Protseq: PChar; MaxCalls: Cardinal;
515 Endpoint: PChar; SecurityDescriptor: Pointer): RPC_STATUS; stdcall;
516 {$EXTERNALSYM RpcServerUseProtseqEpA}
RpcServerUseProtseqEpWnull517 function RpcServerUseProtseqEpW(Protseq: PWideChar; MaxCalls: Cardinal;
518 Endpoint: PWideChar; SecurityDescriptor: Pointer): RPC_STATUS; stdcall;
519 {$EXTERNALSYM RpcServerUseProtseqEpW}
RpcServerUseProtseqEpnull520 function RpcServerUseProtseqEp(Protseq: PTSTR; MaxCalls: Cardinal;
521 Endpoint: PTSTR; SecurityDescriptor: Pointer): RPC_STATUS; stdcall;
522 {$EXTERNALSYM RpcServerUseProtseqEp}
523
RpcServerUseProtseqEpExAnull524 function RpcServerUseProtseqEpExA(Protseq: PChar; MaxCalls: Cardinal;
525 Endpoint: PChar; SecurityDescriptor: Pointer; const Policy: RPC_POLICY): RPC_STATUS; stdcall;
526 {$EXTERNALSYM RpcServerUseProtseqEpExA}
RpcServerUseProtseqEpExWnull527 function RpcServerUseProtseqEpExW(Protseq: PWideChar; MaxCalls: Cardinal;
528 Endpoint: PWideChar; SecurityDescriptor: Pointer; const Policy: RPC_POLICY): RPC_STATUS; stdcall;
529 {$EXTERNALSYM RpcServerUseProtseqEpExW}
RpcServerUseProtseqEpExnull530 function RpcServerUseProtseqEpEx(Protseq: PTSTR; MaxCalls: Cardinal;
531 Endpoint: PTSTR; SecurityDescriptor: Pointer; const Policy: RPC_POLICY): RPC_STATUS; stdcall;
532 {$EXTERNALSYM RpcServerUseProtseqEpEx}
533
RpcServerUseProtseqIfAnull534 function RpcServerUseProtseqIfA(Protseq: PChar; MaxCalls: Cardinal;
535 IfSpec: RPC_IF_HANDLE; SecurityDescriptor: Pointer): RPC_STATUS; stdcall;
536 {$EXTERNALSYM RpcServerUseProtseqIfA}
RpcServerUseProtseqIfWnull537 function RpcServerUseProtseqIfW(Protseq: PWideChar; MaxCalls: Cardinal;
538 IfSpec: RPC_IF_HANDLE; SecurityDescriptor: Pointer): RPC_STATUS; stdcall;
539 {$EXTERNALSYM RpcServerUseProtseqIfW}
540
RpcServerUseProtseqIfExAnull541 function RpcServerUseProtseqIfExA(Protseq: PChar; MaxCalls: Cardinal;
542 IfSpec: RPC_IF_HANDLE; SecurityDescriptor: Pointer; const Policy: RPC_POLICY): RPC_STATUS; stdcall;
543 {$EXTERNALSYM RpcServerUseProtseqIfExA}
RpcServerUseProtseqIfExWnull544 function RpcServerUseProtseqIfExW(Protseq: PWideChar; MaxCalls: Cardinal;
545 IfSpec: RPC_IF_HANDLE; SecurityDescriptor: Pointer; const Policy: RPC_POLICY): RPC_STATUS; stdcall;
546 {$EXTERNALSYM RpcServerUseProtseqIfExW}
RpcServerUseProtseqIfExnull547 function RpcServerUseProtseqIfEx(Protseq: PTSTR; MaxCalls: Cardinal;
548 IfSpec: RPC_IF_HANDLE; SecurityDescriptor: Pointer; const Policy: RPC_POLICY): RPC_STATUS; stdcall;
549 {$EXTERNALSYM RpcServerUseProtseqIfEx}
550
551 procedure RpcServerYield; stdcall;
552 {$EXTERNALSYM RpcServerYield}
553
RpcMgmtStatsVectorFreenull554 function RpcMgmtStatsVectorFree(var StatsVector: PRPC_STATS_VECTOR): RPC_STATUS; stdcall;
555 {$EXTERNALSYM RpcMgmtStatsVectorFree}
556
RpcMgmtInqStatsnull557 function RpcMgmtInqStats(Binding: RPC_BINDING_HANDLE; var Statistics: PRPC_STATS_VECTOR): RPC_STATUS; stdcall;
558 {$EXTERNALSYM RpcMgmtInqStats}
559
RpcMgmtIsServerListeningnull560 function RpcMgmtIsServerListening(Binding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
561 {$EXTERNALSYM RpcMgmtIsServerListening}
562
RpcMgmtStopServerListeningnull563 function RpcMgmtStopServerListening(Binding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
564 {$EXTERNALSYM RpcMgmtStopServerListening}
565
RpcMgmtWaitServerListennull566 function RpcMgmtWaitServerListen: RPC_STATUS; stdcall;
567 {$EXTERNALSYM RpcMgmtWaitServerListen}
568
RpcMgmtSetServerStackSizenull569 function RpcMgmtSetServerStackSize(ThreadStackSize: Cardinal): RPC_STATUS; stdcall;
570 {$EXTERNALSYM RpcMgmtSetServerStackSize}
571
572 procedure RpcSsDontSerializeContext; stdcall;
573 {$EXTERNALSYM RpcSsDontSerializeContext}
574
RpcMgmtEnableIdleCleanupnull575 function RpcMgmtEnableIdleCleanup: RPC_STATUS; stdcall;
576 {$EXTERNALSYM RpcMgmtEnableIdleCleanup}
577
RpcMgmtInqIfIdsnull578 function RpcMgmtInqIfIds(Binding: RPC_BINDING_HANDLE;
579 var IfIdVector: PRPC_IF_ID_VECTOR): RPC_STATUS; stdcall;
580 {$EXTERNALSYM RpcMgmtInqIfIds}
581
RpcIfIdVectorFreenull582 function RpcIfIdVectorFree(var IfIdVector: PRPC_IF_ID_VECTOR): RPC_STATUS; stdcall;
583 {$EXTERNALSYM RpcIfIdVectorFree}
584
RpcMgmtInqServerPrincNameAnull585 function RpcMgmtInqServerPrincNameA(Binding: RPC_BINDING_HANDLE;
586 AuthnSvc: Cardinal; var ServerPrincName: PChar): RPC_STATUS; stdcall;
587 {$EXTERNALSYM RpcMgmtInqServerPrincNameA}
RpcMgmtInqServerPrincNameWnull588 function RpcMgmtInqServerPrincNameW(Binding: RPC_BINDING_HANDLE;
589 AuthnSvc: Cardinal; var ServerPrincName: PWideChar): RPC_STATUS; stdcall;
590 {$EXTERNALSYM RpcMgmtInqServerPrincNameW}
RpcMgmtInqServerPrincNamenull591 function RpcMgmtInqServerPrincName(Binding: RPC_BINDING_HANDLE;
592 AuthnSvc: Cardinal; var ServerPrincName: PTSTR): RPC_STATUS; stdcall;
593 {$EXTERNALSYM RpcMgmtInqServerPrincName}
594
RpcServerInqDefaultPrincNameAnull595 function RpcServerInqDefaultPrincNameA(AuthnSvc: Cardinal; var PrincName: PChar): RPC_STATUS; stdcall;
596 {$EXTERNALSYM RpcServerInqDefaultPrincNameA}
RpcServerInqDefaultPrincNameWnull597 function RpcServerInqDefaultPrincNameW(AuthnSvc: Cardinal; var PrincName: PWideChar): RPC_STATUS; stdcall;
598 {$EXTERNALSYM RpcServerInqDefaultPrincNameW}
RpcServerInqDefaultPrincNamenull599 function RpcServerInqDefaultPrincName(AuthnSvc: Cardinal; var PrincName: PTSTR): RPC_STATUS; stdcall;
600 {$EXTERNALSYM RpcServerInqDefaultPrincName}
601
RpcEpResolveBindingnull602 function RpcEpResolveBinding(Binding: RPC_BINDING_HANDLE; IfSpe: RPC_IF_HANDLE): RPC_STATUS; stdcall;
603 {$EXTERNALSYM RpcEpResolveBinding}
604
RpcNsBindingInqEntryNameAnull605 function RpcNsBindingInqEntryNameA(Binding: RPC_BINDING_HANDLE;
606 EntryNameSyntax: Cardinal; var EntryName: PChar): RPC_STATUS; stdcall;
607 {$EXTERNALSYM RpcNsBindingInqEntryNameA}
RpcNsBindingInqEntryNameWnull608 function RpcNsBindingInqEntryNameW(Binding: RPC_BINDING_HANDLE;
609 EntryNameSyntax: Cardinal; var EntryName: PWideChar): RPC_STATUS; stdcall;
610 {$EXTERNALSYM RpcNsBindingInqEntryNameW}
RpcNsBindingInqEntryNamenull611 function RpcNsBindingInqEntryName(Binding: RPC_BINDING_HANDLE;
612 EntryNameSyntax: Cardinal; var EntryName: PTSTR): RPC_STATUS; stdcall;
613 {$EXTERNALSYM RpcNsBindingInqEntryName}
614
615 type
616 RPC_AUTH_IDENTITY_HANDLE = Pointer;
617 {$EXTERNALSYM RPC_AUTH_IDENTITY_HANDLE}
618 RPC_AUTHZ_HANDLE = Pointer;
619 {$EXTERNALSYM RPC_AUTHZ_HANDLE}
620 PRPC_AUTHZ_HANDLE = ^RPC_AUTHZ_HANDLE;
621 {$NODEFINE PRPC_AUTHZ_HANDLE}
622
623 PRPC_AUTH_IDENTITY_HANDLE = ^RPC_AUTH_IDENTITY_HANDLE;
624 {$NODEFINE PRPC_AUTH_IDENTITY_HANDLE}
625
626 const
627 RPC_C_AUTHN_LEVEL_DEFAULT = 0;
628 {$EXTERNALSYM RPC_C_AUTHN_LEVEL_DEFAULT}
629 RPC_C_AUTHN_LEVEL_NONE = 1;
630 {$EXTERNALSYM RPC_C_AUTHN_LEVEL_NONE}
631 RPC_C_AUTHN_LEVEL_CONNECT = 2;
632 {$EXTERNALSYM RPC_C_AUTHN_LEVEL_CONNECT}
633 RPC_C_AUTHN_LEVEL_CALL = 3;
634 {$EXTERNALSYM RPC_C_AUTHN_LEVEL_CALL}
635 RPC_C_AUTHN_LEVEL_PKT = 4;
636 {$EXTERNALSYM RPC_C_AUTHN_LEVEL_PKT}
637 RPC_C_AUTHN_LEVEL_PKT_INTEGRITY = 5;
638 {$EXTERNALSYM RPC_C_AUTHN_LEVEL_PKT_INTEGRITY}
639 RPC_C_AUTHN_LEVEL_PKT_PRIVACY = 6;
640 {$EXTERNALSYM RPC_C_AUTHN_LEVEL_PKT_PRIVACY}
641
642 RPC_C_IMP_LEVEL_DEFAULT = 0;
643 {$EXTERNALSYM RPC_C_IMP_LEVEL_DEFAULT}
644 RPC_C_IMP_LEVEL_ANONYMOUS = 1;
645 {$EXTERNALSYM RPC_C_IMP_LEVEL_ANONYMOUS}
646 RPC_C_IMP_LEVEL_IDENTIFY = 2;
647 {$EXTERNALSYM RPC_C_IMP_LEVEL_IDENTIFY}
648 RPC_C_IMP_LEVEL_IMPERSONATE = 3;
649 {$EXTERNALSYM RPC_C_IMP_LEVEL_IMPERSONATE}
650 RPC_C_IMP_LEVEL_DELEGATE = 4;
651 {$EXTERNALSYM RPC_C_IMP_LEVEL_DELEGATE}
652
653 RPC_C_QOS_IDENTITY_STATIC = 0;
654 {$EXTERNALSYM RPC_C_QOS_IDENTITY_STATIC}
655 RPC_C_QOS_IDENTITY_DYNAMIC = 1;
656 {$EXTERNALSYM RPC_C_QOS_IDENTITY_DYNAMIC}
657
658 RPC_C_QOS_CAPABILITIES_DEFAULT = $0;
659 {$EXTERNALSYM RPC_C_QOS_CAPABILITIES_DEFAULT}
660 RPC_C_QOS_CAPABILITIES_MUTUAL_AUTH = $1;
661 {$EXTERNALSYM RPC_C_QOS_CAPABILITIES_MUTUAL_AUTH}
662 RPC_C_QOS_CAPABILITIES_MAKE_FULLSIC = $2;
663 {$EXTERNALSYM RPC_C_QOS_CAPABILITIES_MAKE_FULLSIC}
664 RPC_C_QOS_CAPABILITIES_ANY_AUTHORITY = $4;
665 {$EXTERNALSYM RPC_C_QOS_CAPABILITIES_ANY_AUTHORITY}
666 RPC_C_QOS_CAPABILITIES_IGNORE_DELEGATE_FAILURE = $8;
667 {$EXTERNALSYM RPC_C_QOS_CAPABILITIES_IGNORE_DELEGATE_FAILURE}
668 RPC_C_QOS_CAPABILITIES_LOCAL_MA_HINT = $10;
669 {$EXTERNALSYM RPC_C_QOS_CAPABILITIES_LOCAL_MA_HINT}
670
671 RPC_C_PROTECT_LEVEL_DEFAULT = RPC_C_AUTHN_LEVEL_DEFAULT;
672 {$EXTERNALSYM RPC_C_PROTECT_LEVEL_DEFAULT}
673 RPC_C_PROTECT_LEVEL_NONE = RPC_C_AUTHN_LEVEL_NONE;
674 {$EXTERNALSYM RPC_C_PROTECT_LEVEL_NONE}
675 RPC_C_PROTECT_LEVEL_CONNECT = RPC_C_AUTHN_LEVEL_CONNECT;
676 {$EXTERNALSYM RPC_C_PROTECT_LEVEL_CONNECT}
677 RPC_C_PROTECT_LEVEL_CALL = RPC_C_AUTHN_LEVEL_CALL;
678 {$EXTERNALSYM RPC_C_PROTECT_LEVEL_CALL}
679 RPC_C_PROTECT_LEVEL_PKT = RPC_C_AUTHN_LEVEL_PKT;
680 {$EXTERNALSYM RPC_C_PROTECT_LEVEL_PKT}
681 RPC_C_PROTECT_LEVEL_PKT_INTEGRITY = RPC_C_AUTHN_LEVEL_PKT_INTEGRITY;
682 {$EXTERNALSYM RPC_C_PROTECT_LEVEL_PKT_INTEGRITY}
683 RPC_C_PROTECT_LEVEL_PKT_PRIVACY = RPC_C_AUTHN_LEVEL_PKT_PRIVACY;
684 {$EXTERNALSYM RPC_C_PROTECT_LEVEL_PKT_PRIVACY}
685
686 RPC_C_AUTHN_NONE = 0;
687 {$EXTERNALSYM RPC_C_AUTHN_NONE}
688 RPC_C_AUTHN_DCE_PRIVATE = 1;
689 {$EXTERNALSYM RPC_C_AUTHN_DCE_PRIVATE}
690 RPC_C_AUTHN_DCE_PUBLIC = 2;
691 {$EXTERNALSYM RPC_C_AUTHN_DCE_PUBLIC}
692 RPC_C_AUTHN_DEC_PUBLIC = 4;
693 {$EXTERNALSYM RPC_C_AUTHN_DEC_PUBLIC}
694 RPC_C_AUTHN_GSS_NEGOTIATE = 9;
695 {$EXTERNALSYM RPC_C_AUTHN_GSS_NEGOTIATE}
696 RPC_C_AUTHN_WINNT = 10;
697 {$EXTERNALSYM RPC_C_AUTHN_WINNT}
698 RPC_C_AUTHN_GSS_SCHANNEL = 14;
699 {$EXTERNALSYM RPC_C_AUTHN_GSS_SCHANNEL}
700 RPC_C_AUTHN_GSS_KERBEROS = 16;
701 {$EXTERNALSYM RPC_C_AUTHN_GSS_KERBEROS}
702 RPC_C_AUTHN_DPA = 17;
703 {$EXTERNALSYM RPC_C_AUTHN_DPA}
704 RPC_C_AUTHN_MSN = 18;
705 {$EXTERNALSYM RPC_C_AUTHN_MSN}
706 RPC_C_AUTHN_DIGEST = 21;
707 {$EXTERNALSYM RPC_C_AUTHN_DIGEST}
708 RPC_C_AUTHN_MQ = 100;
709 {$EXTERNALSYM RPC_C_AUTHN_MQ}
710 RPC_C_AUTHN_DEFAULT = DWORD($FFFFFFFF);
711 {$EXTERNALSYM RPC_C_AUTHN_DEFAULT}
712
713 RPC_C_NO_CREDENTIALS = RPC_AUTH_IDENTITY_HANDLE(MAXUINT_PTR);
714 {$EXTERNALSYM RPC_C_NO_CREDENTIALS}
715
716 RPC_C_SECURITY_QOS_VERSION = 1;
717 {$EXTERNALSYM RPC_C_SECURITY_QOS_VERSION}
718 RPC_C_SECURITY_QOS_VERSION_1 = 1;
719 {$EXTERNALSYM RPC_C_SECURITY_QOS_VERSION_1}
720
721 type
722 _RPC_SECURITY_QOS = record
723 Version: Longint;
724 Capabilities: Longint;
725 IdentityTracking: Longint;
726 ImpersonationType: Longint;
727 end;
728 {$EXTERNALSYM _RPC_SECURITY_QOS}
729 RPC_SECURITY_QOS = _RPC_SECURITY_QOS;
730 {$EXTERNALSYM RPC_SECURITY_QOS}
731 PRPC_SECURITY_QOS = ^RPC_SECURITY_QOS;
732 {$EXTERNALSYM PRPC_SECURITY_QOS}
733 TRpcSecurityQos = RPC_SECURITY_QOS;
734 PRpcSecurityQos = PRPC_SECURITY_QOS;
735
736 {$IFNDEF JWA_INCLUDEMODE}
737
738 const
739 SEC_WINNT_AUTH_IDENTITY_ANSI = $1;
740 {$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY_ANSI}
741 SEC_WINNT_AUTH_IDENTITY_UNICODE = $2;
742 {$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY_UNICODE}
743
744 type
745 _SEC_WINNT_AUTH_IDENTITY_W = record
746 User: PWideChar;
747 UserLength: Longint;
748 Domain: PWideChar;
749 DomainLength: Longint;
750 Password: PWideChar;
751 PasswordLength: Longint;
752 Flags: Longint;
753 end;
754 {$EXTERNALSYM _SEC_WINNT_AUTH_IDENTITY_W}
755 SEC_WINNT_AUTH_IDENTITY_W = _SEC_WINNT_AUTH_IDENTITY_W;
756 {$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY_W}
757 PSEC_WINNT_AUTH_IDENTITY_W = ^SEC_WINNT_AUTH_IDENTITY_W;
758 {$EXTERNALSYM PSEC_WINNT_AUTH_IDENTITY_W}
759 TSecWinNTAuthIdentityW = SEC_WINNT_AUTH_IDENTITY_W;
760 PSecWinNTAuthIdentityW = PSEC_WINNT_AUTH_IDENTITY_W;
761
762 _SEC_WINNT_AUTH_IDENTITY_A = record
763 User: PChar;
764 UserLength: Longint;
765 Domain: PChar;
766 DomainLength: Longint;
767 Password: PChar;
768 PasswordLength: Longint;
769 Flags: Longint;
770 end;
771 {$EXTERNALSYM _SEC_WINNT_AUTH_IDENTITY_A}
772 SEC_WINNT_AUTH_IDENTITY_A = _SEC_WINNT_AUTH_IDENTITY_A;
773 {$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY_A}
774 PSEC_WINNT_AUTH_IDENTITY_A = ^SEC_WINNT_AUTH_IDENTITY_A;
775 {$EXTERNALSYM PSEC_WINNT_AUTH_IDENTITY_A}
776 TSecWinNTAuthIdentityA = SEC_WINNT_AUTH_IDENTITY_A;
777 PSecWinNTAuthIdentityA = PSEC_WINNT_AUTH_IDENTITY_A;
778
779 {$IFDEF UNICODE}
780 SEC_WINNT_AUTH_IDENTITY = SEC_WINNT_AUTH_IDENTITY_W;
781 {$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY}
782 PSEC_WINNT_AUTH_IDENTITY = PSEC_WINNT_AUTH_IDENTITY_W;
783 {$EXTERNALSYM PSEC_WINNT_AUTH_IDENTITY}
784 _SEC_WINNT_AUTH_IDENTITY = _SEC_WINNT_AUTH_IDENTITY_W;
785 {$EXTERNALSYM _SEC_WINNT_AUTH_IDENTITY}
786 TSecWinNTAuthIdentity = TSecWinNTAuthIdentityW;
787 PSecWinNTAuthIdentity = PSecWinNTAuthIdentityW;
788 {$ELSE}
789 SEC_WINNT_AUTH_IDENTITY = SEC_WINNT_AUTH_IDENTITY_A;
790 {$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY}
791 PSEC_WINNT_AUTH_IDENTITY = PSEC_WINNT_AUTH_IDENTITY_A;
792 {$EXTERNALSYM PSEC_WINNT_AUTH_IDENTITY}
793 _SEC_WINNT_AUTH_IDENTITY = _SEC_WINNT_AUTH_IDENTITY_A;
794 {$EXTERNALSYM _SEC_WINNT_AUTH_IDENTITY}
795 TSecWinNTAuthIdentity = TSecWinNTAuthIdentityA;
796 PSecWinNTAuthIdentity = PSecWinNTAuthIdentityA;
797 {$ENDIF UNICODE}
798
799 {$ENDIF JWA_INCLUDEMODE}
800
801 const
802 RPC_C_SECURITY_QOS_VERSION_2 = 2;
803 {$EXTERNALSYM RPC_C_SECURITY_QOS_VERSION_2}
804
805 RPC_C_AUTHN_INFO_TYPE_HTTP = 1;
806 {$EXTERNALSYM RPC_C_AUTHN_INFO_TYPE_HTTP}
807
808 RPC_C_HTTP_AUTHN_TARGET_SERVER = 1;
809 {$EXTERNALSYM RPC_C_HTTP_AUTHN_TARGET_SERVER}
810 RPC_C_HTTP_AUTHN_TARGET_PROXY = 2;
811 {$EXTERNALSYM RPC_C_HTTP_AUTHN_TARGET_PROXY}
812
813 RPC_C_HTTP_AUTHN_SCHEME_BASIC = $00000001;
814 {$EXTERNALSYM RPC_C_HTTP_AUTHN_SCHEME_BASIC}
815 RPC_C_HTTP_AUTHN_SCHEME_NTLM = $00000002;
816 {$EXTERNALSYM RPC_C_HTTP_AUTHN_SCHEME_NTLM}
817 RPC_C_HTTP_AUTHN_SCHEME_PASSPORT = $00000004;
818 {$EXTERNALSYM RPC_C_HTTP_AUTHN_SCHEME_PASSPORT}
819 RPC_C_HTTP_AUTHN_SCHEME_DIGEST = $00000008;
820 {$EXTERNALSYM RPC_C_HTTP_AUTHN_SCHEME_DIGEST}
821 RPC_C_HTTP_AUTHN_SCHEME_NEGOTIATE = $00000010;
822 {$EXTERNALSYM RPC_C_HTTP_AUTHN_SCHEME_NEGOTIATE}
823
824 RPC_C_HTTP_FLAG_USE_SSL = 1;
825 {$EXTERNALSYM RPC_C_HTTP_FLAG_USE_SSL}
826 RPC_C_HTTP_FLAG_USE_FIRST_AUTH_SCHEME = 2;
827 {$EXTERNALSYM RPC_C_HTTP_FLAG_USE_FIRST_AUTH_SCHEME}
828
829 type
830 _RPC_HTTP_TRANSPORT_CREDENTIALS_W = record
831 TransportCredentials: PSEC_WINNT_AUTH_IDENTITY_W;
832 Flags: Cardinal;
833 AuthenticationTarget: Cardinal;
834 NumberOfAuthnSchemes: Cardinal;
835 AuthnSchemes: PCardinal;
836 ServerCertificateSubject: PWord;
837 end;
838 {$EXTERNALSYM RPC_HTTP_TRANSPORT_CREDENTIALS_W}
839 RPC_HTTP_TRANSPORT_CREDENTIALS_W = _RPC_HTTP_TRANSPORT_CREDENTIALS_W;
840 {$EXTERNALSYM RPC_HTTP_TRANSPORT_CREDENTIALS_W}
841 PRPC_HTTP_TRANSPORT_CREDENTIALS_W = ^RPC_HTTP_TRANSPORT_CREDENTIALS_W;
842 {$EXTERNALSYM PRPC_HTTP_TRANSPORT_CREDENTIALS_W}
843 TRpcHttpTransportCredentialsW = RPC_HTTP_TRANSPORT_CREDENTIALS_W;
844 PRpcHttpTransportCredentialsW = PRPC_HTTP_TRANSPORT_CREDENTIALS_W;
845
846 _RPC_HTTP_TRANSPORT_CREDENTIALS_A = record
847 TransportCredentials: PSEC_WINNT_AUTH_IDENTITY_A;
848 Flags: Cardinal;
849 AuthenticationTarget: Cardinal;
850 NumberOfAuthnSchemes: Cardinal;
851 AuthnSchemes: PCardinal;
852 ServerCertificateSubject: PByte;
853 end;
854 {$EXTERNALSYM RPC_HTTP_TRANSPORT_CREDENTIALS_A}
855 RPC_HTTP_TRANSPORT_CREDENTIALS_A = _RPC_HTTP_TRANSPORT_CREDENTIALS_A;
856 {$EXTERNALSYM RPC_HTTP_TRANSPORT_CREDENTIALS_A}
857 PRPC_HTTP_TRANSPORT_CREDENTIALS_A = ^RPC_HTTP_TRANSPORT_CREDENTIALS_A;
858 {$EXTERNALSYM PRPC_HTTP_TRANSPORT_CREDENTIALS_A}
859 TRpcHttpTransportCredentialsA = RPC_HTTP_TRANSPORT_CREDENTIALS_A;
860 PRpcHttpTransportCredentialsA = PRPC_HTTP_TRANSPORT_CREDENTIALS_A;
861
862 _RPC_SECURITY_QOS_V2_W = record
863 Version: Cardinal;
864 Capabilities: Cardinal;
865 IdentityTracking: Cardinal;
866 ImpersonationType: Cardinal;
867 AdditionalSecurityInfoType: Cardinal;
868 case Integer of
869 0: (HttpCredentials: PRPC_HTTP_TRANSPORT_CREDENTIALS_W);
870 end;
871 {$EXTERNALSYM _RPC_SECURITY_QOS_V2_W}
872 RPC_SECURITY_QOS_V2_W = _RPC_SECURITY_QOS_V2_W;
873 {$EXTERNALSYM RPC_SECURITY_QOS_V2_W}
874 PRPC_SECURITY_QOS_V2_W = ^RPC_SECURITY_QOS_V2_W;
875 {$EXTERNALSYM PRPC_SECURITY_QOS_V2_W}
876 TRpcSecurityQosV2W = RPC_SECURITY_QOS_V2_W;
877 PRpcSecurityQosV2W = PRPC_SECURITY_QOS_V2_W;
878
879 _RPC_SECURITY_QOS_V2_A = record
880 Version: Cardinal;
881 Capabilities: Cardinal;
882 IdentityTracking: Cardinal;
883 ImpersonationType: Cardinal;
884 AdditionalSecurityInfoType: Cardinal;
885 case Integer of
886 0: (HttpCredentials: PRPC_HTTP_TRANSPORT_CREDENTIALS_A);
887 end;
888 {$EXTERNALSYM _RPC_SECURITY_QOS_V2_A}
889 RPC_SECURITY_QOS_V2_A = _RPC_SECURITY_QOS_V2_A;
890 {$EXTERNALSYM RPC_SECURITY_QOS_V2_A}
891 PRPC_SECURITY_QOS_V2_A = ^RPC_SECURITY_QOS_V2_A;
892 {$EXTERNALSYM PRPC_SECURITY_QOS_V2_A}
893 TRpcSecurityQosV2A = RPC_SECURITY_QOS_V2_A;
894 PRpcSecurityQosV2A = PRPC_SECURITY_QOS_V2_A;
895
896 const
897 RPC_C_SECURITY_QOS_VERSION_3 = 3;
898 {$EXTERNALSYM RPC_C_SECURITY_QOS_VERSION_3}
899
900 type
901 _RPC_SECURITY_QOS_V3_W = record
902 Version: Cardinal;
903 Capabilities: Cardinal;
904 IdentityTracking: Cardinal;
905 ImpersonationType: Cardinal;
906 AdditionalSecurityInfoType: Cardinal;
907 u: record
908 case Integer of
909 0: (HttpCredentials: PRPC_HTTP_TRANSPORT_CREDENTIALS_W);
910 end;
911 Sid: Pointer;
912 end;
913 {$EXTERNALSYM _RPC_SECURITY_QOS_V3_W}
914 RPC_SECURITY_QOS_V3_W = _RPC_SECURITY_QOS_V3_W;
915 {$EXTERNALSYM RPC_SECURITY_QOS_V3_W}
916 PRPC_SECURITY_QOS_V3_W = ^RPC_SECURITY_QOS_V3_W;
917 {$EXTERNALSYM PRPC_SECURITY_QOS_V3_W}
918 TRpcSecurityQosV3W = RPC_SECURITY_QOS_V3_W;
919 PRpcSecurityQosV3W = PRPC_SECURITY_QOS_V3_W;
920
921 _RPC_SECURITY_QOS_V3_A = record
922 Version: Cardinal;
923 Capabilities: Cardinal;
924 IdentityTracking: Cardinal;
925 ImpersonationType: Cardinal;
926 AdditionalSecurityInfoType: Cardinal;
927 u: record
928 case Integer of
929 0: (HttpCredentials: PRPC_HTTP_TRANSPORT_CREDENTIALS_A);
930 end;
931 Sid: Pointer;
932 end;
933 {$EXTERNALSYM _RPC_SECURITY_QOS_V3_A}
934 RPC_SECURITY_QOS_V3_A = _RPC_SECURITY_QOS_V3_A;
935 {$EXTERNALSYM RPC_SECURITY_QOS_V3_A}
936 PRPC_SECURITY_QOS_V3_A = ^RPC_SECURITY_QOS_V3_A;
937 {$EXTERNALSYM PRPC_SECURITY_QOS_V3_A}
938 TRpcSecurityQosV3A = RPC_SECURITY_QOS_V3_A;
939 PRpcSecurityQosV3A = PRPC_SECURITY_QOS_V3_A;
940
941 {$IFDEF UNICODE}
942
943 RPC_SECURITY_QOS_V2 = RPC_SECURITY_QOS_V2_W;
944 {$EXTERNALSYM RPC_SECURITY_QOS_V2}
945 PRPC_SECURITY_QOS_V2 = PRPC_SECURITY_QOS_V2_W;
946 {$EXTERNALSYM PRPC_SECURITY_QOS_V2}
947 _RPC_SECURITY_QOS_V2 = _RPC_SECURITY_QOS_V2_W;
948 {$EXTERNALSYM _RPC_SECURITY_QOS_V2}
949 TRpcSecurityQosV2 = TRpcSecurityQosV2W;
950 PRpcSecurityQosV2 = PRpcSecurityQosV2W;
951
952 RPC_HTTP_TRANSPORT_CREDENTIALS = RPC_HTTP_TRANSPORT_CREDENTIALS_W;
953 {$EXTERNALSYM RPC_HTTP_TRANSPORT_CREDENTIALS}
954 PRPC_HTTP_TRANSPORT_CREDENTIALS = PRPC_HTTP_TRANSPORT_CREDENTIALS_W;
955 {$EXTERNALSYM PRPC_HTTP_TRANSPORT_CREDENTIALS}
956 _RPC_HTTP_TRANSPORT_CREDENTIALS = _RPC_HTTP_TRANSPORT_CREDENTIALS_W;
957 {$EXTERNALSYM _RPC_HTTP_TRANSPORT_CREDENTIALS}
958 TRpcHttpTransportCredentials = TRpcHttpTransportCredentialsW;
959 PRpcHttpTransportCredentials = PRpcHttpTransportCredentialsW;
960
961 RPC_SECURITY_QOS_V3 = RPC_SECURITY_QOS_V3_W;
962 {$EXTERNALSYM RPC_SECURITY_QOS_V3}
963 PRPC_SECURITY_QOS_V3 = PRPC_SECURITY_QOS_V3_W;
964 {$EXTERNALSYM PRPC_SECURITY_QOS_V3}
965 _RPC_SECURITY_QOS_V3 = _RPC_SECURITY_QOS_V3_W;
966 {$EXTERNALSYM _RPC_SECURITY_QOS_V3}
967 TRpcSecurityQosV3 = TRpcSecurityQosV3W;
968 PRpcSecurityQosV3 = PRpcSecurityQosV3W;
969
970 {$ELSE}
971
972 RPC_SECURITY_QOS_V2 = RPC_SECURITY_QOS_V2_A;
973 {$EXTERNALSYM RPC_SECURITY_QOS_V2}
974 PRPC_SECURITY_QOS_V2 = PRPC_SECURITY_QOS_V2_A;
975 {$EXTERNALSYM PRPC_SECURITY_QOS_V2}
976 _RPC_SECURITY_QOS_V2 = _RPC_SECURITY_QOS_V2_A;
977 {$EXTERNALSYM _RPC_SECURITY_QOS_V2}
978 TRpcSecurityQosV2 = TRpcSecurityQosV2A;
979 PRpcSecurityQosV2 = PRpcSecurityQosV2A;
980
981 RPC_HTTP_TRANSPORT_CREDENTIALS = RPC_HTTP_TRANSPORT_CREDENTIALS_A;
982 {$EXTERNALSYM RPC_HTTP_TRANSPORT_CREDENTIALS}
983 PRPC_HTTP_TRANSPORT_CREDENTIALS = PRPC_HTTP_TRANSPORT_CREDENTIALS_A;
984 {$EXTERNALSYM PRPC_HTTP_TRANSPORT_CREDENTIALS}
985 _RPC_HTTP_TRANSPORT_CREDENTIALS = _RPC_HTTP_TRANSPORT_CREDENTIALS_A;
986 {$EXTERNALSYM _RPC_HTTP_TRANSPORT_CREDENTIALS}
987 TRpcHttpTransportCredentials = TRpcHttpTransportCredentialsA;
988 PRpcHttpTransportCredentials = PRpcHttpTransportCredentialsA;
989
990 RPC_SECURITY_QOS_V3 = RPC_SECURITY_QOS_V3_A;
991 {$EXTERNALSYM RPC_SECURITY_QOS_V3}
992 PRPC_SECURITY_QOS_V3 = PRPC_SECURITY_QOS_V3_A;
993 {$EXTERNALSYM PRPC_SECURITY_QOS_V3}
994 _RPC_SECURITY_QOS_V3 = _RPC_SECURITY_QOS_V3_A;
995 {$EXTERNALSYM _RPC_SECURITY_QOS_V3}
996 TRpcSecurityQosV3 = TRpcSecurityQosV3A;
997 PRpcSecurityQosV3 = PRpcSecurityQosV3A;
998
999 {$ENDIF UNICODE}
1000
1001 type
erverNamenull1002 RPC_NEW_HTTP_PROXY_CHANNEL = function(ServerName: PWideChar; ServerPort: PWord; RemoteUser: PByte; out NewServerName: PWord): RPC_STATUS; stdcall;
1003 {$EXTERNALSYM RPC_NEW_HTTP_PROXY_CHANNEL}
1004
1005 RPC_HTTP_PROXY_FREE_STRING = procedure(ServerName: PWideChar); stdcall;
1006 {$EXTERNALSYM RPC_HTTP_PROXY_FREE_STRING}
1007
1008 const
1009 RPC_C_AUTHZ_NONE = 0;
1010 {$EXTERNALSYM RPC_C_AUTHZ_NONE}
1011 RPC_C_AUTHZ_NAME = 1;
1012 {$EXTERNALSYM RPC_C_AUTHZ_NAME}
1013 RPC_C_AUTHZ_DCE = 2;
1014 {$EXTERNALSYM RPC_C_AUTHZ_DCE}
1015 RPC_C_AUTHZ_DEFAULT = DWORD($ffffffff);
1016 {$EXTERNALSYM RPC_C_AUTHZ_DEFAULT}
1017
RpcImpersonateClientnull1018 function RpcImpersonateClient(BindingHandle: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
1019 {$EXTERNALSYM RpcImpersonateClient}
1020
RpcRevertToSelfExnull1021 function RpcRevertToSelfEx(BindingHandle: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
1022 {$EXTERNALSYM RpcRevertToSelfEx}
1023
RpcRevertToSelfnull1024 function RpcRevertToSelf: RPC_STATUS; stdcall;
1025 {$EXTERNALSYM RpcRevertToSelf}
1026
RpcBindingInqAuthClientAnull1027 function RpcBindingInqAuthClientA(ClientBinding: RPC_BINDING_HANDLE;
1028 Privs: PRPC_AUTHZ_HANDLE; ServerPrincName: PPChar; AuthnLevel, AuthnSvc,
1029 AuthzSvc: PCardinal): RPC_STATUS; stdcall;
1030 {$EXTERNALSYM RpcBindingInqAuthClientA}
RpcBindingInqAuthClientWnull1031 function RpcBindingInqAuthClientW(ClientBinding: RPC_BINDING_HANDLE;
1032 Privs: PRPC_AUTHZ_HANDLE; ServerPrincName: PPWideChar; AuthnLevel, AuthnSvc,
1033 AuthzSvc: PCardinal): RPC_STATUS; stdcall;
1034 {$EXTERNALSYM RpcBindingInqAuthClientW}
1035
RpcBindingInqAuthClientExAnull1036 function RpcBindingInqAuthClientExA(ClientBinding: RPC_BINDING_HANDLE;
1037 Privs: PRPC_AUTHZ_HANDLE; ServerPrincName: PPChar; AuthnLevel, AuthnSvc,
1038 AuthzSvc: PCardinal; Flags: Cardinal): RPC_STATUS; stdcall;
1039 {$EXTERNALSYM RpcBindingInqAuthClientExA}
RpcBindingInqAuthClientExWnull1040 function RpcBindingInqAuthClientExW(ClientBinding: RPC_BINDING_HANDLE;
1041 Privs: PRPC_AUTHZ_HANDLE; ServerPrincName: PPWideChar; AuthnLevel, AuthnSvc,
1042 AuthzSvc: PCardinal; Flags: Cardinal): RPC_STATUS; stdcall;
1043 {$EXTERNALSYM RpcBindingInqAuthClientExW}
1044
RpcBindingInqAuthInfoAnull1045 function RpcBindingInqAuthInfoA(Binding: RPC_BINDING_HANDLE; ServerPrincName: PPChar;
1046 AuthnLevel, AuthnSvc: PCardinal; AuthIdentity: PRPC_AUTH_IDENTITY_HANDLE;
1047 AuthzSvc: PCardinal): RPC_STATUS; stdcall;
1048 {$EXTERNALSYM RpcBindingInqAuthInfoA}
RpcBindingInqAuthInfoWnull1049 function RpcBindingInqAuthInfoW(Binding: RPC_BINDING_HANDLE; ServerPrincName: PPWideChar;
1050 AuthnLevel, AuthnSvc: PCardinal; AuthIdentity: PRPC_AUTH_IDENTITY_HANDLE;
1051 AuthzSvc: PCardinal): RPC_STATUS; stdcall;
1052 {$EXTERNALSYM RpcBindingInqAuthInfoW}
1053
RpcBindingSetAuthInfoAnull1054 function RpcBindingSetAuthInfoA(Binding: RPC_BINDING_HANDLE; ServerPrincName: PChar;
1055 AuthnLevel, AuthnSvc: Cardinal; AuthIdentity: RPC_AUTH_IDENTITY_HANDLE;
1056 AuthzSvc: Cardinal): RPC_STATUS; stdcall;
1057 {$EXTERNALSYM RpcBindingSetAuthInfoA}
RpcBindingSetAuthInfoWnull1058 function RpcBindingSetAuthInfoW(Binding: RPC_BINDING_HANDLE; ServerPrincName: PWideChar;
1059 AuthnLevel, AuthnSvc: Cardinal; AuthIdentity: RPC_AUTH_IDENTITY_HANDLE;
1060 AuthzSvc: Cardinal): RPC_STATUS; stdcall;
1061 {$EXTERNALSYM RpcBindingSetAuthInfoW}
1062
RpcBindingSetAuthInfoExAnull1063 function RpcBindingSetAuthInfoExA(Binding: RPC_BINDING_HANDLE;
1064 ServerPrincName: PChar; AuthnLevel, AuthnSvc: Cardinal;
1065 AuthIdentity: RPC_AUTH_IDENTITY_HANDLE; AuthzSvc: Cardinal;
1066 const SecurityQOS: RPC_SECURITY_QOS): RPC_STATUS; stdcall;
1067 {$EXTERNALSYM RpcBindingSetAuthInfoExA}
RpcBindingSetAuthInfoExWnull1068 function RpcBindingSetAuthInfoExW(Binding: RPC_BINDING_HANDLE;
1069 ServerPrincName: PWideChar; AuthnLevel, AuthnSvc: Cardinal;
1070 AuthIdentity: RPC_AUTH_IDENTITY_HANDLE; AuthzSvc: Cardinal;
1071 const SecurityQOS: RPC_SECURITY_QOS): RPC_STATUS; stdcall;
1072 {$EXTERNALSYM RpcBindingSetAuthInfoExW}
1073
RpcBindingInqAuthInfoExAnull1074 function RpcBindingInqAuthInfoExA(Binding: RPC_BINDING_HANDLE;
1075 ServerPrincName: PPChar; AuthnLevel, AuthnSvc: PCardinal;
1076 AuthIdentity: PRPC_AUTH_IDENTITY_HANDLE; AuthzSvc: PCardinal;
1077 RpcQosVersion: Cardinal; var SecurityQOS: RPC_SECURITY_QOS): RPC_STATUS; stdcall;
1078 {$EXTERNALSYM RpcBindingInqAuthInfoExA}
RpcBindingInqAuthInfoExWnull1079 function RpcBindingInqAuthInfoExW(Binding: RPC_BINDING_HANDLE;
1080 ServerPrincName: PPWideChar; AuthnLevel, AuthnSvc: PCardinal;
1081 AuthIdentity: PRPC_AUTH_IDENTITY_HANDLE; AuthzSvc: PCardinal;
1082 RpcQosVersion: Cardinal; var SecurityQOS: RPC_SECURITY_QOS): RPC_STATUS; stdcall;
1083 {$EXTERNALSYM RpcBindingInqAuthInfoExW}
1084
1085 type
1086 RPC_AUTH_KEY_RETRIEVAL_FN = procedure(Arg: Pointer; ServerPrincName: PWideChar;
1087 KeyVer: Cardinal; var Key: Pointer; var Status: RPC_STATUS); stdcall;
1088 {$EXTERNALSYM RPC_AUTH_KEY_RETRIEVAL_FN}
1089 TRpcAuthKeyRetrievalFn = RPC_AUTH_KEY_RETRIEVAL_FN;
1090
RpcServerRegisterAuthInfoAnull1091 function RpcServerRegisterAuthInfoA(ServerPrincName: PChar; AuthnSvc: Cardinal;
1092 GetKeyFn: RPC_AUTH_KEY_RETRIEVAL_FN; Arg: Pointer): RPC_STATUS; stdcall;
1093 {$EXTERNALSYM RpcServerRegisterAuthInfoA}
RpcServerRegisterAuthInfoWnull1094 function RpcServerRegisterAuthInfoW(ServerPrincName: PWideChar; AuthnSvc: Cardinal;
1095 GetKeyFn: RPC_AUTH_KEY_RETRIEVAL_FN; Arg: Pointer): RPC_STATUS; stdcall;
1096 {$EXTERNALSYM RpcServerRegisterAuthInfoW}
RpcBindingInqAuthClientnull1097 function RpcBindingInqAuthClient(ClientBinding: RPC_BINDING_HANDLE;
1098 Privs: PRPC_AUTHZ_HANDLE; ServerPrincName: PPTSTR; AuthnLevel, AuthnSvc,
1099 AuthzSvc: PCardinal): RPC_STATUS; stdcall;
1100 {$EXTERNALSYM RpcBindingInqAuthClient}
RpcBindingInqAuthClientExnull1101 function RpcBindingInqAuthClientEx(ClientBinding: RPC_BINDING_HANDLE;
1102 Privs: PRPC_AUTHZ_HANDLE; ServerPrincName: PPTSTR; AuthnLevel, AuthnSvc,
1103 AuthzSvc: PCardinal; Flags: Cardinal): RPC_STATUS; stdcall;
1104 {$EXTERNALSYM RpcBindingInqAuthClientEx}
RpcBindingInqAuthInfonull1105 function RpcBindingInqAuthInfo(Binding: RPC_BINDING_HANDLE; ServerPrincName: PPTSTR;
1106 AuthnLevel, AuthnSvc: PCardinal; AuthIdentity: PRPC_AUTH_IDENTITY_HANDLE;
1107 AuthzSvc: PCardinal): RPC_STATUS; stdcall;
1108 {$EXTERNALSYM RpcBindingInqAuthInfo}
RpcBindingSetAuthInfonull1109 function RpcBindingSetAuthInfo(Binding: RPC_BINDING_HANDLE; ServerPrincName: PTSTR;
1110 AuthnLevel, AuthnSvc: Cardinal; AuthIdentity: RPC_AUTH_IDENTITY_HANDLE;
1111 AuthzSvc: Cardinal): RPC_STATUS; stdcall;
1112 {$EXTERNALSYM RpcBindingSetAuthInfo}
RpcBindingSetAuthInfoExnull1113 function RpcBindingSetAuthInfoEx(Binding: RPC_BINDING_HANDLE;
1114 ServerPrincName: PTSTR; AuthnLevel, AuthnSvc: Cardinal;
1115 AuthIdentity: RPC_AUTH_IDENTITY_HANDLE; AuthzSvc: Cardinal;
1116 const SecurityQOS: RPC_SECURITY_QOS): RPC_STATUS; stdcall;
1117 {$EXTERNALSYM RpcBindingSetAuthInfoEx}
RpcBindingInqAuthInfoExnull1118 function RpcBindingInqAuthInfoEx(Binding: RPC_BINDING_HANDLE;
1119 ServerPrincName: PPTSTR; AuthnLevel, AuthnSvc: PCardinal;
1120 AuthIdentity: PRPC_AUTH_IDENTITY_HANDLE; AuthzSvc: PCardinal;
1121 RpcQosVersion: Cardinal; var SecurityQOS: RPC_SECURITY_QOS): RPC_STATUS; stdcall;
1122 {$EXTERNALSYM RpcBindingInqAuthInfoEx}
RpcServerRegisterAuthInfonull1123 function RpcServerRegisterAuthInfo(ServerPrincName: PTSTR; AuthnSvc: Cardinal;
1124 GetKeyFn: RPC_AUTH_KEY_RETRIEVAL_FN; Arg: Pointer): RPC_STATUS; stdcall;
1125 {$EXTERNALSYM RpcServerRegisterAuthInfo}
1126
1127 type
1128 RPC_CLIENT_INFORMATION1 = record
1129 UserName: PChar;
1130 ComputerName: PChar;
1131 Privilege: Word;
1132 AuthFlags: Longword;
1133 end;
1134 {$EXTERNALSYM RPC_CLIENT_INFORMATION1}
1135 PRPC_CLIENT_INFORMATION1 = ^RPC_CLIENT_INFORMATION1;
1136 {$EXTERNALSYM PRPC_CLIENT_INFORMATION1}
1137 TRpcClientInformation1 = RPC_CLIENT_INFORMATION1;
1138 PRpcClientInformation1 = PRPC_CLIENT_INFORMATION1;
1139
RpcBindingServerFromClientnull1140 function RpcBindingServerFromClient(ClientBinding: RPC_BINDING_HANDLE;
1141 var ServerBinding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
1142 {$EXTERNALSYM RpcBindingServerFromClient}
1143
1144 procedure RpcRaiseException(exception: RPC_STATUS); stdcall;
1145 {$EXTERNALSYM RpcRaiseException}
1146
RpcTestCancelnull1147 function RpcTestCancel: RPC_STATUS; stdcall;
1148 {$EXTERNALSYM RpcTestCancel}
1149
RpcServerTestCancelnull1150 function RpcServerTestCancel(BindingHandle: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
1151 {$EXTERNALSYM RpcServerTestCancel}
1152
RpcCancelThreadnull1153 function RpcCancelThread(Thread: Pointer): RPC_STATUS; stdcall;
1154 {$EXTERNALSYM RpcCancelThread}
1155
RpcCancelThreadExnull1156 function RpcCancelThreadEx(Thread: Pointer; Timeout: Longint): RPC_STATUS; stdcall;
1157 {$EXTERNALSYM RpcCancelThreadEx}
1158
UuidCreatenull1159 function UuidCreate(var Uuid: UUID): RPC_STATUS; stdcall;
1160 {$EXTERNALSYM UuidCreate}
1161
UuidCreateSequentialnull1162 function UuidCreateSequential(out Uuid: UUID): RPC_STATUS; stdcall;
1163 {$EXTERNALSYM UuidCreateSequential}
1164
UuidFromStringAnull1165 function UuidFromStringA(StringUuid: PChar; var Uuid: UUID): RPC_STATUS; stdcall;
1166 {$EXTERNALSYM UuidFromStringA}
UuidFromStringWnull1167 function UuidFromStringW(StringUuid: PWideChar; var Uuid: UUID): RPC_STATUS; stdcall;
1168 {$EXTERNALSYM UuidFromStringW}
UuidFromStringnull1169 function UuidFromString(StringUuid: PTSTR; var Uuid: UUID): RPC_STATUS; stdcall;
1170 {$EXTERNALSYM UuidFromString}
1171
UuidToStringAnull1172 function UuidToStringA(const Uuid: UUID; var StringUuid: PChar): RPC_STATUS; stdcall;
1173 {$EXTERNALSYM UuidToStringA}
UuidToStringWnull1174 function UuidToStringW(const Uuid: UUID; var StringUuid: PWideChar): RPC_STATUS; stdcall;
1175 {$EXTERNALSYM UuidToStringW}
UuidToStringnull1176 function UuidToString(const Uuid: UUID; var StringUuid: PTSTR): RPC_STATUS; stdcall;
1177 {$EXTERNALSYM UuidToString}
1178
UuidComparenull1179 function UuidCompare(const Uuid1, Uuid2: UUID; var Status: RPC_STATUS): Integer; stdcall;
1180 {$EXTERNALSYM UuidCompare}
1181
UuidCreateNilnull1182 function UuidCreateNil(var NilUuid: UUID): RPC_STATUS; stdcall;
1183 {$EXTERNALSYM UuidCreateNil}
1184
UuidEqualnull1185 function UuidEqual(const Uuid1, Uuid2: UUID; var Status: RPC_STATUS): Integer; stdcall;
1186 {$EXTERNALSYM UuidEqual}
1187
UuidHashnull1188 function UuidHash(const Uuid: UUID; var Status: RPC_STATUS): Word; stdcall;
1189 {$EXTERNALSYM UuidHash}
1190
UuidIsNilnull1191 function UuidIsNil(const Uuid: UUID; var Status: RPC_STATUS): Integer; stdcall;
1192 {$EXTERNALSYM UuidIsNil}
1193
RpcEpRegisterNoReplaceAnull1194 function RpcEpRegisterNoReplaceA(IfSpec: RPC_IF_HANDLE;
1195 BindingVector: PRPC_BINDING_VECTOR; UuidVector: PUUID_VECTOR;
1196 Annotation: PChar): RPC_STATUS; stdcall;
1197 {$EXTERNALSYM RpcEpRegisterNoReplaceA}
RpcEpRegisterNoReplaceWnull1198 function RpcEpRegisterNoReplaceW(IfSpec: RPC_IF_HANDLE;
1199 BindingVector: PRPC_BINDING_VECTOR; UuidVector: PUUID_VECTOR;
1200 Annotation: PWideChar): RPC_STATUS; stdcall;
1201 {$EXTERNALSYM RpcEpRegisterNoReplaceW}
RpcEpRegisterNoReplacenull1202 function RpcEpRegisterNoReplace(IfSpec: RPC_IF_HANDLE;
1203 BindingVector: PRPC_BINDING_VECTOR; UuidVector: PUUID_VECTOR;
1204 Annotation: PTSTR): RPC_STATUS; stdcall;
1205 {$EXTERNALSYM RpcEpRegisterNoReplace}
1206
RpcEpRegisterAnull1207 function RpcEpRegisterA(IfSpec: RPC_IF_HANDLE; BindingVector: PRPC_BINDING_VECTOR;
1208 UuidVector: PUUID_VECTOR; Annotation: PChar): RPC_STATUS; stdcall;
1209 {$EXTERNALSYM RpcEpRegisterA}
RpcEpRegisterWnull1210 function RpcEpRegisterW(IfSpec: RPC_IF_HANDLE; BindingVector: PRPC_BINDING_VECTOR;
1211 UuidVector: PUUID_VECTOR; Annotation: PWideChar): RPC_STATUS; stdcall;
1212 {$EXTERNALSYM RpcEpRegisterW}
1213
RpcEpRegisternull1214 function RpcEpRegister(IfSpec: RPC_IF_HANDLE; BindingVector: PRPC_BINDING_VECTOR;
1215 UuidVector: PUUID_VECTOR; Annotation: PTSTR): RPC_STATUS; stdcall;
1216 {$EXTERNALSYM RpcEpRegister}
1217
RpcEpUnregisternull1218 function RpcEpUnregister(IfSpec: RPC_IF_HANDLE; BindingVector: PRPC_BINDING_VECTOR;
1219 UuidVector: UUID_VECTOR): RPC_STATUS; stdcall;
1220 {$EXTERNALSYM RpcEpUnregister}
1221
DceErrorInqTextAnull1222 function DceErrorInqTextA(RpcStatus: RPC_STATUS; ErrorText: PChar): RPC_STATUS; stdcall;
1223 {$EXTERNALSYM DceErrorInqTextA}
DceErrorInqTextWnull1224 function DceErrorInqTextW(RpcStatus: RPC_STATUS; ErrorText: PWideChar): RPC_STATUS; stdcall;
1225 {$EXTERNALSYM DceErrorInqTextW}
DceErrorInqTextnull1226 function DceErrorInqText(RpcStatus: RPC_STATUS; ErrorText: PTSTR): RPC_STATUS; stdcall;
1227 {$EXTERNALSYM DceErrorInqText}
1228
1229 const
1230 DCE_C_ERROR_STRING_LEN = 256;
1231 {$EXTERNALSYM DCE_C_ERROR_STRING_LEN}
1232
1233 type
1234 RPC_EP_INQ_HANDLE = ^I_RPC_HANDLE;
1235 {$EXTERNALSYM RPC_EP_INQ_HANDLE}
1236
1237 const
1238 RPC_C_EP_ALL_ELTS = 0;
1239 {$EXTERNALSYM RPC_C_EP_ALL_ELTS}
1240 RPC_C_EP_MATCH_BY_IF = 1;
1241 {$EXTERNALSYM RPC_C_EP_MATCH_BY_IF}
1242 RPC_C_EP_MATCH_BY_OBJ = 2;
1243 {$EXTERNALSYM RPC_C_EP_MATCH_BY_OBJ}
1244 RPC_C_EP_MATCH_BY_BOTH = 3;
1245 {$EXTERNALSYM RPC_C_EP_MATCH_BY_BOTH}
1246
1247 RPC_C_VERS_ALL = 1;
1248 {$EXTERNALSYM RPC_C_VERS_ALL}
1249 RPC_C_VERS_COMPATIBLE = 2;
1250 {$EXTERNALSYM RPC_C_VERS_COMPATIBLE}
1251 RPC_C_VERS_EXACT = 3;
1252 {$EXTERNALSYM RPC_C_VERS_EXACT}
1253 RPC_C_VERS_MAJOR_ONLY = 4;
1254 {$EXTERNALSYM RPC_C_VERS_MAJOR_ONLY}
1255 RPC_C_VERS_UPTO = 5;
1256 {$EXTERNALSYM RPC_C_VERS_UPTO}
1257
RpcMgmtEpEltInqBeginnull1258 function RpcMgmtEpEltInqBegin(EpBinding: RPC_BINDING_HANDLE; InquiryType: Cardinal;
1259 IfId: PRPC_IF_ID; VersOption: Cardinal; ObjectUuid: PUUID;
1260 var InquiryContext: RPC_EP_INQ_HANDLE): RPC_STATUS; stdcall;
1261 {$EXTERNALSYM RpcMgmtEpEltInqBegin}
1262
RpcMgmtEpEltInqDonenull1263 function RpcMgmtEpEltInqDone(var InquiryContext: RPC_EP_INQ_HANDLE): RPC_STATUS; stdcall;
1264 {$EXTERNALSYM RpcMgmtEpEltInqDone}
1265
RpcMgmtEpEltInqNextAnull1266 function RpcMgmtEpEltInqNextA(InquiryContext: RPC_EP_INQ_HANDLE; var IfId: RPC_IF_ID;
1267 Binding: PRPC_BINDING_HANDLE; ObjectUuid: PUUID; var Annotation: PChar): RPC_STATUS; stdcall;
1268 {$EXTERNALSYM RpcMgmtEpEltInqNextA}
RpcMgmtEpEltInqNextWnull1269 function RpcMgmtEpEltInqNextW(InquiryContext: RPC_EP_INQ_HANDLE; var IfId: RPC_IF_ID;
1270 Binding: PRPC_BINDING_HANDLE; ObjectUuid: PUUID; var Annotation: PWideChar): RPC_STATUS; stdcall;
1271 {$EXTERNALSYM RpcMgmtEpEltInqNextW}
RpcMgmtEpEltInqNextnull1272 function RpcMgmtEpEltInqNext(InquiryContext: RPC_EP_INQ_HANDLE; var IfId: RPC_IF_ID;
1273 Binding: PRPC_BINDING_HANDLE; ObjectUuid: PUUID; var Annotation: PTSTR): RPC_STATUS; stdcall;
1274 {$EXTERNALSYM RpcMgmtEpEltInqNext}
1275
RpcMgmtEpUnregisternull1276 function RpcMgmtEpUnregister(EpBinding: RPC_BINDING_HANDLE; IfId: PRPC_IF_ID;
1277 Binding: RPC_BINDING_HANDLE; ObjectUuid : PUUID): RPC_STATUS; stdcall;
1278 {$EXTERNALSYM RpcMgmtEpUnregister}
1279
1280 type
lientBindingnull1281 RPC_MGMT_AUTHORIZATION_FN = function(ClientBinding: RPC_BINDING_HANDLE;
1282 RequestedMgmtOperation: Cardinal; var Status: RPC_STATUS): Integer; stdcall;
1283 {$EXTERNALSYM RPC_MGMT_AUTHORIZATION_FN}
1284 TRpcMgmtAuthorizationFn = RPC_MGMT_AUTHORIZATION_FN;
1285
1286 const
1287 RPC_C_MGMT_INQ_IF_IDS = 0;
1288 {$EXTERNALSYM RPC_C_MGMT_INQ_IF_IDS}
1289 RPC_C_MGMT_INQ_PRINC_NAME = 1;
1290 {$EXTERNALSYM RPC_C_MGMT_INQ_PRINC_NAME}
1291 RPC_C_MGMT_INQ_STATS = 2;
1292 {$EXTERNALSYM RPC_C_MGMT_INQ_STATS}
1293 RPC_C_MGMT_IS_SERVER_LISTEN = 3;
1294 {$EXTERNALSYM RPC_C_MGMT_IS_SERVER_LISTEN}
1295 RPC_C_MGMT_STOP_SERVER_LISTEN = 4;
1296 {$EXTERNALSYM RPC_C_MGMT_STOP_SERVER_LISTEN}
1297
RpcMgmtSetAuthorizationFnnull1298 function RpcMgmtSetAuthorizationFn(AuthorizationFn: RPC_MGMT_AUTHORIZATION_FN): RPC_STATUS; stdcall;
1299 {$EXTERNALSYM RpcMgmtSetAuthorizationFn}
1300
1301 const
1302 RPC_C_PARM_MAX_PACKET_LENGTH = 1;
1303 {$EXTERNALSYM RPC_C_PARM_MAX_PACKET_LENGTH}
1304 RPC_C_PARM_BUFFER_LENGTH = 2;
1305 {$EXTERNALSYM RPC_C_PARM_BUFFER_LENGTH}
1306
1307 RPC_IF_AUTOLISTEN = $0001;
1308 {$EXTERNALSYM RPC_IF_AUTOLISTEN}
1309 RPC_IF_OLE = $0002;
1310 {$EXTERNALSYM RPC_IF_OLE}
1311 RPC_IF_ALLOW_UNKNOWN_AUTHORITY = $0004;
1312 {$EXTERNALSYM RPC_IF_ALLOW_UNKNOWN_AUTHORITY}
1313 RPC_IF_ALLOW_SECURE_ONLY = $0008;
1314 {$EXTERNALSYM RPC_IF_ALLOW_SECURE_ONLY}
1315 RPC_IF_ALLOW_CALLBACKS_WITH_NO_AUTH = $0010;
1316 {$EXTERNALSYM RPC_IF_ALLOW_CALLBACKS_WITH_NO_AUTH}
1317
1318 {$ENDIF JWA_IMPLEMENTATIONSECTION}
1319
1320 {$IFNDEF JWA_OMIT_SECTIONS}
1321 implementation
1322 //uses ...
1323 {$ENDIF JWA_OMIT_SECTIONS}
1324
1325 {$IFNDEF JWA_INTERFACESECTION}
1326
1327 {$IFNDEF JWA_INCLUDEMODE}
1328 const
1329 rpclib = 'rpcrt4.dll';
1330 {$IFDEF UNICODE}
1331 AWSuffix = 'W';
1332 {$ELSE}
1333 AWSuffix = 'A';
1334 {$ENDIF UNICODE}
1335 {$ENDIF JWA_INCLUDEMODE}
1336
1337 {$IFDEF DYNAMIC_LINK}
1338
1339 var
1340 _RpcBindingCopy: Pointer;
1341
RpcBindingCopynull1342 function RpcBindingCopy;
1343 begin
1344 GetProcedureAddress(_RpcBindingCopy, rpclib, 'RpcBindingCopy');
1345 asm
1346 MOV ESP, EBP
1347 POP EBP
1348 JMP [_RpcBindingCopy]
1349 end;
1350 end;
1351
1352 var
1353 _RpcBindingFree: Pointer;
1354
RpcBindingFreenull1355 function RpcBindingFree;
1356 begin
1357 GetProcedureAddress(_RpcBindingFree, rpclib, 'RpcBindingFree');
1358 asm
1359 MOV ESP, EBP
1360 POP EBP
1361 JMP [_RpcBindingFree]
1362 end;
1363 end;
1364
1365 var
1366 _RpcBindingSetOption: Pointer;
1367
RpcBindingSetOptionnull1368 function RpcBindingSetOption;
1369 begin
1370 GetProcedureAddress(_RpcBindingSetOption, rpclib, 'RpcBindingSetOption');
1371 asm
1372 MOV ESP, EBP
1373 POP EBP
1374 JMP [_RpcBindingSetOption]
1375 end;
1376 end;
1377
1378 var
1379 _RpcBindingInqOption: Pointer;
1380
RpcBindingInqOptionnull1381 function RpcBindingInqOption;
1382 begin
1383 GetProcedureAddress(_RpcBindingInqOption, rpclib, 'RpcBindingInqOption');
1384 asm
1385 MOV ESP, EBP
1386 POP EBP
1387 JMP [_RpcBindingInqOption]
1388 end;
1389 end;
1390
1391 var
1392 _RpcBindingFromStringBindingA: Pointer;
1393
RpcBindingFromStringBindingAnull1394 function RpcBindingFromStringBindingA;
1395 begin
1396 GetProcedureAddress(_RpcBindingFromStringBindingA, rpclib, 'RpcBindingFromStringBindingA');
1397 asm
1398 MOV ESP, EBP
1399 POP EBP
1400 JMP [_RpcBindingFromStringBindingA]
1401 end;
1402 end;
1403
1404 var
1405 _RpcBindingFromStringBindingW: Pointer;
1406
RpcBindingFromStringBindingWnull1407 function RpcBindingFromStringBindingW;
1408 begin
1409 GetProcedureAddress(_RpcBindingFromStringBindingW, rpclib, 'RpcBindingFromStringBindingW');
1410 asm
1411 MOV ESP, EBP
1412 POP EBP
1413 JMP [_RpcBindingFromStringBindingW]
1414 end;
1415 end;
1416
1417 var
1418 _RpcBindingFromStringBinding: Pointer;
1419
RpcBindingFromStringBindingnull1420 function RpcBindingFromStringBinding;
1421 begin
1422 GetProcedureAddress(_RpcBindingFromStringBinding, rpclib, 'RpcBindingFromStringBinding' + AWSuffix);
1423 asm
1424 MOV ESP, EBP
1425 POP EBP
1426 JMP [_RpcBindingFromStringBinding]
1427 end;
1428 end;
1429
1430 var
1431 _RpcSsGetContextBinding: Pointer;
1432
RpcSsGetContextBindingnull1433 function RpcSsGetContextBinding;
1434 begin
1435 GetProcedureAddress(_RpcSsGetContextBinding, rpclib, 'RpcSsGetContextBinding');
1436 asm
1437 MOV ESP, EBP
1438 POP EBP
1439 JMP [_RpcSsGetContextBinding]
1440 end;
1441 end;
1442
1443 var
1444 _RpcBindingInqObject: Pointer;
1445
RpcBindingInqObjectnull1446 function RpcBindingInqObject;
1447 begin
1448 GetProcedureAddress(_RpcBindingInqObject, rpclib, 'RpcBindingInqObject');
1449 asm
1450 MOV ESP, EBP
1451 POP EBP
1452 JMP [_RpcBindingInqObject]
1453 end;
1454 end;
1455
1456 var
1457 _RpcBindingReset: Pointer;
1458
RpcBindingResetnull1459 function RpcBindingReset;
1460 begin
1461 GetProcedureAddress(_RpcBindingReset, rpclib, 'RpcBindingReset');
1462 asm
1463 MOV ESP, EBP
1464 POP EBP
1465 JMP [_RpcBindingReset]
1466 end;
1467 end;
1468
1469 var
1470 _RpcBindingSetObject: Pointer;
1471
RpcBindingSetObjectnull1472 function RpcBindingSetObject;
1473 begin
1474 GetProcedureAddress(_RpcBindingSetObject, rpclib, 'RpcBindingSetObject');
1475 asm
1476 MOV ESP, EBP
1477 POP EBP
1478 JMP [_RpcBindingSetObject]
1479 end;
1480 end;
1481
1482 var
1483 _RpcMgmtInqDefaultProtectLevel: Pointer;
1484
RpcMgmtInqDefaultProtectLevelnull1485 function RpcMgmtInqDefaultProtectLevel;
1486 begin
1487 GetProcedureAddress(_RpcMgmtInqDefaultProtectLevel, rpclib, 'RpcMgmtInqDefaultProtectLevel');
1488 asm
1489 MOV ESP, EBP
1490 POP EBP
1491 JMP [_RpcMgmtInqDefaultProtectLevel]
1492 end;
1493 end;
1494
1495 var
1496 _RpcBindingToStringBindingA: Pointer;
1497
RpcBindingToStringBindingAnull1498 function RpcBindingToStringBindingA;
1499 begin
1500 GetProcedureAddress(_RpcBindingToStringBindingA, rpclib, 'RpcBindingToStringBindingA');
1501 asm
1502 MOV ESP, EBP
1503 POP EBP
1504 JMP [_RpcBindingToStringBindingA]
1505 end;
1506 end;
1507
1508 var
1509 _RpcBindingToStringBindingW: Pointer;
1510
RpcBindingToStringBindingWnull1511 function RpcBindingToStringBindingW;
1512 begin
1513 GetProcedureAddress(_RpcBindingToStringBindingW, rpclib, 'RpcBindingToStringBindingW');
1514 asm
1515 MOV ESP, EBP
1516 POP EBP
1517 JMP [_RpcBindingToStringBindingW]
1518 end;
1519 end;
1520
1521 var
1522 _RpcBindingToStringBinding: Pointer;
1523
RpcBindingToStringBindingnull1524 function RpcBindingToStringBinding;
1525 begin
1526 GetProcedureAddress(_RpcBindingToStringBinding, rpclib, 'RpcBindingToStringBinding' + AWSuffix);
1527 asm
1528 MOV ESP, EBP
1529 POP EBP
1530 JMP [_RpcBindingToStringBinding]
1531 end;
1532 end;
1533
1534 var
1535 _RpcBindingVectorFree: Pointer;
1536
RpcBindingVectorFreenull1537 function RpcBindingVectorFree;
1538 begin
1539 GetProcedureAddress(_RpcBindingVectorFree, rpclib, 'RpcBindingVectorFree');
1540 asm
1541 MOV ESP, EBP
1542 POP EBP
1543 JMP [_RpcBindingVectorFree]
1544 end;
1545 end;
1546
1547 var
1548 _RpcStringBindingComposeA: Pointer;
1549
RpcStringBindingComposeAnull1550 function RpcStringBindingComposeA;
1551 begin
1552 GetProcedureAddress(_RpcStringBindingComposeA, rpclib, 'RpcStringBindingComposeA');
1553 asm
1554 MOV ESP, EBP
1555 POP EBP
1556 JMP [_RpcStringBindingComposeA]
1557 end;
1558 end;
1559
1560 var
1561 _RpcStringBindingComposeW: Pointer;
1562
RpcStringBindingComposeWnull1563 function RpcStringBindingComposeW;
1564 begin
1565 GetProcedureAddress(_RpcStringBindingComposeW, rpclib, 'RpcStringBindingComposeW');
1566 asm
1567 MOV ESP, EBP
1568 POP EBP
1569 JMP [_RpcStringBindingComposeW]
1570 end;
1571 end;
1572
1573 var
1574 _RpcStringBindingCompose: Pointer;
1575
RpcStringBindingComposenull1576 function RpcStringBindingCompose;
1577 begin
1578 GetProcedureAddress(_RpcStringBindingCompose, rpclib, 'RpcStringBindingCompose' + AWSuffix);
1579 asm
1580 MOV ESP, EBP
1581 POP EBP
1582 JMP [_RpcStringBindingCompose]
1583 end;
1584 end;
1585
1586 var
1587 _RpcStringBindingParseA: Pointer;
1588
RpcStringBindingParseAnull1589 function RpcStringBindingParseA;
1590 begin
1591 GetProcedureAddress(_RpcStringBindingParseA, rpclib, 'RpcStringBindingParseA');
1592 asm
1593 MOV ESP, EBP
1594 POP EBP
1595 JMP [_RpcStringBindingParseA]
1596 end;
1597 end;
1598
1599 var
1600 _RpcStringBindingParseW: Pointer;
1601
RpcStringBindingParseWnull1602 function RpcStringBindingParseW;
1603 begin
1604 GetProcedureAddress(_RpcStringBindingParseW, rpclib, 'RpcStringBindingParseW');
1605 asm
1606 MOV ESP, EBP
1607 POP EBP
1608 JMP [_RpcStringBindingParseW]
1609 end;
1610 end;
1611
1612 var
1613 _RpcStringBindingParse: Pointer;
1614
RpcStringBindingParsenull1615 function RpcStringBindingParse;
1616 begin
1617 GetProcedureAddress(_RpcStringBindingParse, rpclib, 'RpcStringBindingParse' + AWSuffix);
1618 asm
1619 MOV ESP, EBP
1620 POP EBP
1621 JMP [_RpcStringBindingParse]
1622 end;
1623 end;
1624
1625 var
1626 _RpcStringFreeA: Pointer;
1627
RpcStringFreeAnull1628 function RpcStringFreeA;
1629 begin
1630 GetProcedureAddress(_RpcStringFreeA, rpclib, 'RpcStringFreeA');
1631 asm
1632 MOV ESP, EBP
1633 POP EBP
1634 JMP [_RpcStringFreeA]
1635 end;
1636 end;
1637
1638 var
1639 _RpcStringFreeW: Pointer;
1640
RpcStringFreeWnull1641 function RpcStringFreeW;
1642 begin
1643 GetProcedureAddress(_RpcStringFreeW, rpclib, 'RpcStringFreeW');
1644 asm
1645 MOV ESP, EBP
1646 POP EBP
1647 JMP [_RpcStringFreeW]
1648 end;
1649 end;
1650
1651 var
1652 _RpcStringFree: Pointer;
1653
RpcStringFreenull1654 function RpcStringFree;
1655 begin
1656 GetProcedureAddress(_RpcStringFree, rpclib, 'RpcStringFree' + AWSuffix);
1657 asm
1658 MOV ESP, EBP
1659 POP EBP
1660 JMP [_RpcStringFree]
1661 end;
1662 end;
1663
1664 var
1665 _RpcIfInqId: Pointer;
1666
RpcIfInqIdnull1667 function RpcIfInqId;
1668 begin
1669 GetProcedureAddress(_RpcIfInqId, rpclib, 'RpcIfInqId');
1670 asm
1671 MOV ESP, EBP
1672 POP EBP
1673 JMP [_RpcIfInqId]
1674 end;
1675 end;
1676
1677 var
1678 _RpcNetworkIsProtseqValidA: Pointer;
1679
RpcNetworkIsProtseqValidAnull1680 function RpcNetworkIsProtseqValidA;
1681 begin
1682 GetProcedureAddress(_RpcNetworkIsProtseqValidA, rpclib, 'RpcNetworkIsProtseqValidA');
1683 asm
1684 MOV ESP, EBP
1685 POP EBP
1686 JMP [_RpcNetworkIsProtseqValidA]
1687 end;
1688 end;
1689
1690 var
1691 _RpcNetworkIsProtseqValidW: Pointer;
1692
RpcNetworkIsProtseqValidWnull1693 function RpcNetworkIsProtseqValidW;
1694 begin
1695 GetProcedureAddress(_RpcNetworkIsProtseqValidW, rpclib, 'RpcNetworkIsProtseqValidW');
1696 asm
1697 MOV ESP, EBP
1698 POP EBP
1699 JMP [_RpcNetworkIsProtseqValidW]
1700 end;
1701 end;
1702
1703 var
1704 _RpcMgmtInqComTimeout: Pointer;
1705
RpcMgmtInqComTimeoutnull1706 function RpcMgmtInqComTimeout;
1707 begin
1708 GetProcedureAddress(_RpcMgmtInqComTimeout, rpclib, 'RpcMgmtInqComTimeout');
1709 asm
1710 MOV ESP, EBP
1711 POP EBP
1712 JMP [_RpcMgmtInqComTimeout]
1713 end;
1714 end;
1715
1716 var
1717 _RpcMgmtSetComTimeout: Pointer;
1718
RpcMgmtSetComTimeoutnull1719 function RpcMgmtSetComTimeout;
1720 begin
1721 GetProcedureAddress(_RpcMgmtSetComTimeout, rpclib, 'RpcMgmtSetComTimeout');
1722 asm
1723 MOV ESP, EBP
1724 POP EBP
1725 JMP [_RpcMgmtSetComTimeout]
1726 end;
1727 end;
1728
1729 var
1730 _RpcMgmtSetCancelTimeout: Pointer;
1731
RpcMgmtSetCancelTimeoutnull1732 function RpcMgmtSetCancelTimeout;
1733 begin
1734 GetProcedureAddress(_RpcMgmtSetCancelTimeout, rpclib, 'RpcMgmtSetCancelTimeout');
1735 asm
1736 MOV ESP, EBP
1737 POP EBP
1738 JMP [_RpcMgmtSetCancelTimeout]
1739 end;
1740 end;
1741
1742 var
1743 _RpcNetworkInqProtseqsA: Pointer;
1744
RpcNetworkInqProtseqsAnull1745 function RpcNetworkInqProtseqsA;
1746 begin
1747 GetProcedureAddress(_RpcNetworkInqProtseqsA, rpclib, 'RpcNetworkInqProtseqsA');
1748 asm
1749 MOV ESP, EBP
1750 POP EBP
1751 JMP [_RpcNetworkInqProtseqsA]
1752 end;
1753 end;
1754
1755 var
1756 _RpcNetworkInqProtseqsW: Pointer;
1757
RpcNetworkInqProtseqsWnull1758 function RpcNetworkInqProtseqsW;
1759 begin
1760 GetProcedureAddress(_RpcNetworkInqProtseqsW, rpclib, 'RpcNetworkInqProtseqsW');
1761 asm
1762 MOV ESP, EBP
1763 POP EBP
1764 JMP [_RpcNetworkInqProtseqsW]
1765 end;
1766 end;
1767
1768 var
1769 _RpcNetworkInqProtseqs: Pointer;
1770
RpcNetworkInqProtseqsnull1771 function RpcNetworkInqProtseqs;
1772 begin
1773 GetProcedureAddress(_RpcNetworkInqProtseqs, rpclib, 'RpcNetworkInqProtseqs' + AWSuffix);
1774 asm
1775 MOV ESP, EBP
1776 POP EBP
1777 JMP [_RpcNetworkInqProtseqs]
1778 end;
1779 end;
1780
1781 var
1782 _RpcObjectInqType: Pointer;
1783
RpcObjectInqTypenull1784 function RpcObjectInqType;
1785 begin
1786 GetProcedureAddress(_RpcObjectInqType, rpclib, 'RpcObjectInqType');
1787 asm
1788 MOV ESP, EBP
1789 POP EBP
1790 JMP [_RpcObjectInqType]
1791 end;
1792 end;
1793
1794 var
1795 _RpcObjectSetInqFn: Pointer;
1796
RpcObjectSetInqFnnull1797 function RpcObjectSetInqFn;
1798 begin
1799 GetProcedureAddress(_RpcObjectSetInqFn, rpclib, 'RpcObjectSetInqFn');
1800 asm
1801 MOV ESP, EBP
1802 POP EBP
1803 JMP [_RpcObjectSetInqFn]
1804 end;
1805 end;
1806
1807 var
1808 _RpcObjectSetType: Pointer;
1809
RpcObjectSetTypenull1810 function RpcObjectSetType;
1811 begin
1812 GetProcedureAddress(_RpcObjectSetType, rpclib, 'RpcObjectSetType');
1813 asm
1814 MOV ESP, EBP
1815 POP EBP
1816 JMP [_RpcObjectSetType]
1817 end;
1818 end;
1819
1820 var
1821 _RpcProtseqVectorFreeA: Pointer;
1822
RpcProtseqVectorFreeAnull1823 function RpcProtseqVectorFreeA;
1824 begin
1825 GetProcedureAddress(_RpcProtseqVectorFreeA, rpclib, 'RpcProtseqVectorFreeA');
1826 asm
1827 MOV ESP, EBP
1828 POP EBP
1829 JMP [_RpcProtseqVectorFreeA]
1830 end;
1831 end;
1832
1833 var
1834 _RpcProtseqVectorFreeW: Pointer;
1835
RpcProtseqVectorFreeWnull1836 function RpcProtseqVectorFreeW;
1837 begin
1838 GetProcedureAddress(_RpcProtseqVectorFreeW, rpclib, 'RpcProtseqVectorFreeW');
1839 asm
1840 MOV ESP, EBP
1841 POP EBP
1842 JMP [_RpcProtseqVectorFreeW]
1843 end;
1844 end;
1845
1846 var
1847 _RpcProtseqVectorFree: Pointer;
1848
RpcProtseqVectorFreenull1849 function RpcProtseqVectorFree;
1850 begin
1851 GetProcedureAddress(_RpcProtseqVectorFree, rpclib, 'RpcProtseqVectorFree' + AWSuffix);
1852 asm
1853 MOV ESP, EBP
1854 POP EBP
1855 JMP [_RpcProtseqVectorFree]
1856 end;
1857 end;
1858
1859 var
1860 _RpcServerInqBindings: Pointer;
1861
RpcServerInqBindingsnull1862 function RpcServerInqBindings;
1863 begin
1864 GetProcedureAddress(_RpcServerInqBindings, rpclib, 'RpcServerInqBindings');
1865 asm
1866 MOV ESP, EBP
1867 POP EBP
1868 JMP [_RpcServerInqBindings]
1869 end;
1870 end;
1871
1872 var
1873 _RpcServerInqIf: Pointer;
1874
RpcServerInqIfnull1875 function RpcServerInqIf;
1876 begin
1877 GetProcedureAddress(_RpcServerInqIf, rpclib, 'RpcServerInqIf');
1878 asm
1879 MOV ESP, EBP
1880 POP EBP
1881 JMP [_RpcServerInqIf]
1882 end;
1883 end;
1884
1885 var
1886 _RpcServerListen: Pointer;
1887
RpcServerListennull1888 function RpcServerListen;
1889 begin
1890 GetProcedureAddress(_RpcServerListen, rpclib, 'RpcServerListen');
1891 asm
1892 MOV ESP, EBP
1893 POP EBP
1894 JMP [_RpcServerListen]
1895 end;
1896 end;
1897
1898 var
1899 _RpcServerRegisterIf: Pointer;
1900
RpcServerRegisterIfnull1901 function RpcServerRegisterIf;
1902 begin
1903 GetProcedureAddress(_RpcServerRegisterIf, rpclib, 'RpcServerRegisterIf');
1904 asm
1905 MOV ESP, EBP
1906 POP EBP
1907 JMP [_RpcServerRegisterIf]
1908 end;
1909 end;
1910
1911 var
1912 _RpcServerRegisterIfEx: Pointer;
1913
RpcServerRegisterIfExnull1914 function RpcServerRegisterIfEx;
1915 begin
1916 GetProcedureAddress(_RpcServerRegisterIfEx, rpclib, 'RpcServerRegisterIfEx');
1917 asm
1918 MOV ESP, EBP
1919 POP EBP
1920 JMP [_RpcServerRegisterIfEx]
1921 end;
1922 end;
1923
1924 var
1925 _RpcServerRegisterIf2: Pointer;
1926
RpcServerRegisterIf2null1927 function RpcServerRegisterIf2;
1928 begin
1929 GetProcedureAddress(_RpcServerRegisterIf2, rpclib, 'RpcServerRegisterIf2');
1930 asm
1931 MOV ESP, EBP
1932 POP EBP
1933 JMP [_RpcServerRegisterIf2]
1934 end;
1935 end;
1936
1937 var
1938 _RpcServerUnregisterIf: Pointer;
1939
RpcServerUnregisterIfnull1940 function RpcServerUnregisterIf;
1941 begin
1942 GetProcedureAddress(_RpcServerUnregisterIf, rpclib, 'RpcServerUnregisterIf');
1943 asm
1944 MOV ESP, EBP
1945 POP EBP
1946 JMP [_RpcServerUnregisterIf]
1947 end;
1948 end;
1949
1950 var
1951 _RpcServerUnregisterIfEx: Pointer;
1952
RpcServerUnregisterIfExnull1953 function RpcServerUnregisterIfEx;
1954 begin
1955 GetProcedureAddress(_RpcServerUnregisterIfEx, rpclib, 'RpcServerUnregisterIfEx');
1956 asm
1957 MOV ESP, EBP
1958 POP EBP
1959 JMP [_RpcServerUnregisterIfEx]
1960 end;
1961 end;
1962
1963 var
1964 _RpcServerUseAllProtseqs: Pointer;
1965
RpcServerUseAllProtseqsnull1966 function RpcServerUseAllProtseqs;
1967 begin
1968 GetProcedureAddress(_RpcServerUseAllProtseqs, rpclib, 'RpcServerUseAllProtseqs');
1969 asm
1970 MOV ESP, EBP
1971 POP EBP
1972 JMP [_RpcServerUseAllProtseqs]
1973 end;
1974 end;
1975
1976 var
1977 _RpcServerUseAllProtseqsEx: Pointer;
1978
RpcServerUseAllProtseqsExnull1979 function RpcServerUseAllProtseqsEx;
1980 begin
1981 GetProcedureAddress(_RpcServerUseAllProtseqsEx, rpclib, 'RpcServerUseAllProtseqsEx');
1982 asm
1983 MOV ESP, EBP
1984 POP EBP
1985 JMP [_RpcServerUseAllProtseqsEx]
1986 end;
1987 end;
1988
1989 var
1990 _RpcServerUseAllProtseqsIf: Pointer;
1991
RpcServerUseAllProtseqsIfnull1992 function RpcServerUseAllProtseqsIf;
1993 begin
1994 GetProcedureAddress(_RpcServerUseAllProtseqsIf, rpclib, 'RpcServerUseAllProtseqsIf');
1995 asm
1996 MOV ESP, EBP
1997 POP EBP
1998 JMP [_RpcServerUseAllProtseqsIf]
1999 end;
2000 end;
2001
2002 var
2003 _RpcServerUseAllProtseqsIfEx: Pointer;
2004
RpcServerUseAllProtseqsIfExnull2005 function RpcServerUseAllProtseqsIfEx;
2006 begin
2007 GetProcedureAddress(_RpcServerUseAllProtseqsIfEx, rpclib, 'RpcServerUseAllProtseqsIfEx');
2008 asm
2009 MOV ESP, EBP
2010 POP EBP
2011 JMP [_RpcServerUseAllProtseqsIfEx]
2012 end;
2013 end;
2014
2015 var
2016 _RpcServerUseProtseqA: Pointer;
2017
RpcServerUseProtseqAnull2018 function RpcServerUseProtseqA;
2019 begin
2020 GetProcedureAddress(_RpcServerUseProtseqA, rpclib, 'RpcServerUseProtseqA');
2021 asm
2022 MOV ESP, EBP
2023 POP EBP
2024 JMP [_RpcServerUseProtseqA]
2025 end;
2026 end;
2027
2028 var
2029 _RpcServerUseProtseqW: Pointer;
2030
RpcServerUseProtseqWnull2031 function RpcServerUseProtseqW;
2032 begin
2033 GetProcedureAddress(_RpcServerUseProtseqW, rpclib, 'RpcServerUseProtseqW');
2034 asm
2035 MOV ESP, EBP
2036 POP EBP
2037 JMP [_RpcServerUseProtseqW]
2038 end;
2039 end;
2040
2041 var
2042 _RpcServerUseProtseq: Pointer;
2043
RpcServerUseProtseqnull2044 function RpcServerUseProtseq;
2045 begin
2046 GetProcedureAddress(_RpcServerUseProtseq, rpclib, 'RpcServerUseProtseq' + AWSuffix);
2047 asm
2048 MOV ESP, EBP
2049 POP EBP
2050 JMP [_RpcServerUseProtseq]
2051 end;
2052 end;
2053
2054 var
2055 _RpcServerUseProtseqExA: Pointer;
2056
RpcServerUseProtseqExAnull2057 function RpcServerUseProtseqExA;
2058 begin
2059 GetProcedureAddress(_RpcServerUseProtseqExA, rpclib, 'RpcServerUseProtseqExA');
2060 asm
2061 MOV ESP, EBP
2062 POP EBP
2063 JMP [_RpcServerUseProtseqExA]
2064 end;
2065 end;
2066
2067 var
2068 _RpcServerUseProtseqExW: Pointer;
2069
RpcServerUseProtseqExWnull2070 function RpcServerUseProtseqExW;
2071 begin
2072 GetProcedureAddress(_RpcServerUseProtseqExW, rpclib, 'RpcServerUseProtseqExW');
2073 asm
2074 MOV ESP, EBP
2075 POP EBP
2076 JMP [_RpcServerUseProtseqExW]
2077 end;
2078 end;
2079
2080 var
2081 _RpcServerUseProtseqEx: Pointer;
2082
RpcServerUseProtseqExnull2083 function RpcServerUseProtseqEx;
2084 begin
2085 GetProcedureAddress(_RpcServerUseProtseqEx, rpclib, 'RpcServerUseProtseqEx' + AWSuffix);
2086 asm
2087 MOV ESP, EBP
2088 POP EBP
2089 JMP [_RpcServerUseProtseqEx]
2090 end;
2091 end;
2092
2093 var
2094 _RpcServerUseProtseqEpA: Pointer;
2095
RpcServerUseProtseqEpAnull2096 function RpcServerUseProtseqEpA;
2097 begin
2098 GetProcedureAddress(_RpcServerUseProtseqEpA, rpclib, 'RpcServerUseProtseqEpA');
2099 asm
2100 MOV ESP, EBP
2101 POP EBP
2102 JMP [_RpcServerUseProtseqEpA]
2103 end;
2104 end;
2105
2106 var
2107 _RpcServerUseProtseqEpW: Pointer;
2108
RpcServerUseProtseqEpWnull2109 function RpcServerUseProtseqEpW;
2110 begin
2111 GetProcedureAddress(_RpcServerUseProtseqEpW, rpclib, 'RpcServerUseProtseqEpW');
2112 asm
2113 MOV ESP, EBP
2114 POP EBP
2115 JMP [_RpcServerUseProtseqEpW]
2116 end;
2117 end;
2118
2119 var
2120 _RpcServerUseProtseqEp: Pointer;
2121
RpcServerUseProtseqEpnull2122 function RpcServerUseProtseqEp;
2123 begin
2124 GetProcedureAddress(_RpcServerUseProtseqEp, rpclib, 'RpcServerUseProtseqEp' + AWSuffix);
2125 asm
2126 MOV ESP, EBP
2127 POP EBP
2128 JMP [_RpcServerUseProtseqEp]
2129 end;
2130 end;
2131
2132 var
2133 _RpcServerUseProtseqEpExA: Pointer;
2134
RpcServerUseProtseqEpExAnull2135 function RpcServerUseProtseqEpExA;
2136 begin
2137 GetProcedureAddress(_RpcServerUseProtseqEpExA, rpclib, 'RpcServerUseProtseqEpExA');
2138 asm
2139 MOV ESP, EBP
2140 POP EBP
2141 JMP [_RpcServerUseProtseqEpExA]
2142 end;
2143 end;
2144
2145 var
2146 _RpcServerUseProtseqEpExW: Pointer;
2147
RpcServerUseProtseqEpExWnull2148 function RpcServerUseProtseqEpExW;
2149 begin
2150 GetProcedureAddress(_RpcServerUseProtseqEpExW, rpclib, 'RpcServerUseProtseqEpExW');
2151 asm
2152 MOV ESP, EBP
2153 POP EBP
2154 JMP [_RpcServerUseProtseqEpExW]
2155 end;
2156 end;
2157
2158 var
2159 _RpcServerUseProtseqEpEx: Pointer;
2160
RpcServerUseProtseqEpExnull2161 function RpcServerUseProtseqEpEx;
2162 begin
2163 GetProcedureAddress(_RpcServerUseProtseqEpEx, rpclib, 'RpcServerUseProtseqEpEx' + AWSuffix);
2164 asm
2165 MOV ESP, EBP
2166 POP EBP
2167 JMP [_RpcServerUseProtseqEpEx]
2168 end;
2169 end;
2170
2171 var
2172 _RpcServerUseProtseqIfA: Pointer;
2173
RpcServerUseProtseqIfAnull2174 function RpcServerUseProtseqIfA;
2175 begin
2176 GetProcedureAddress(_RpcServerUseProtseqIfA, rpclib, 'RpcServerUseProtseqIfA');
2177 asm
2178 MOV ESP, EBP
2179 POP EBP
2180 JMP [_RpcServerUseProtseqIfA]
2181 end;
2182 end;
2183
2184 var
2185 _RpcServerUseProtseqIfW: Pointer;
2186
RpcServerUseProtseqIfWnull2187 function RpcServerUseProtseqIfW;
2188 begin
2189 GetProcedureAddress(_RpcServerUseProtseqIfW, rpclib, 'RpcServerUseProtseqIfW');
2190 asm
2191 MOV ESP, EBP
2192 POP EBP
2193 JMP [_RpcServerUseProtseqIfW]
2194 end;
2195 end;
2196
2197 var
2198 _RpcServerUseProtseqIfExA: Pointer;
2199
RpcServerUseProtseqIfExAnull2200 function RpcServerUseProtseqIfExA;
2201 begin
2202 GetProcedureAddress(_RpcServerUseProtseqIfExA, rpclib, 'RpcServerUseProtseqIfExA');
2203 asm
2204 MOV ESP, EBP
2205 POP EBP
2206 JMP [_RpcServerUseProtseqIfExA]
2207 end;
2208 end;
2209
2210 var
2211 _RpcServerUseProtseqIfExW: Pointer;
2212
RpcServerUseProtseqIfExWnull2213 function RpcServerUseProtseqIfExW;
2214 begin
2215 GetProcedureAddress(_RpcServerUseProtseqIfExW, rpclib, 'RpcServerUseProtseqIfExW');
2216 asm
2217 MOV ESP, EBP
2218 POP EBP
2219 JMP [_RpcServerUseProtseqIfExW]
2220 end;
2221 end;
2222
2223 var
2224 _RpcServerUseProtseqIfEx: Pointer;
2225
RpcServerUseProtseqIfExnull2226 function RpcServerUseProtseqIfEx;
2227 begin
2228 GetProcedureAddress(_RpcServerUseProtseqIfEx, rpclib, 'RpcServerUseProtseqIfEx' + AWSuffix);
2229 asm
2230 MOV ESP, EBP
2231 POP EBP
2232 JMP [_RpcServerUseProtseqIfEx]
2233 end;
2234 end;
2235
2236 var
2237 _RpcServerYield: Pointer;
2238
2239 procedure RpcServerYield;
2240 begin
2241 GetProcedureAddress(_RpcServerYield, rpclib, 'RpcServerYield');
2242 asm
2243 MOV ESP, EBP
2244 POP EBP
2245 JMP [_RpcServerYield]
2246 end;
2247 end;
2248
2249 var
2250 _RpcMgmtStatsVectorFree: Pointer;
2251
RpcMgmtStatsVectorFreenull2252 function RpcMgmtStatsVectorFree;
2253 begin
2254 GetProcedureAddress(_RpcMgmtStatsVectorFree, rpclib, 'RpcMgmtStatsVectorFree');
2255 asm
2256 MOV ESP, EBP
2257 POP EBP
2258 JMP [_RpcMgmtStatsVectorFree]
2259 end;
2260 end;
2261
2262 var
2263 _RpcMgmtInqStats: Pointer;
2264
RpcMgmtInqStatsnull2265 function RpcMgmtInqStats;
2266 begin
2267 GetProcedureAddress(_RpcMgmtInqStats, rpclib, 'RpcMgmtInqStats');
2268 asm
2269 MOV ESP, EBP
2270 POP EBP
2271 JMP [_RpcMgmtInqStats]
2272 end;
2273 end;
2274
2275 var
2276 _RpcMgmtIsServerListening: Pointer;
2277
RpcMgmtIsServerListeningnull2278 function RpcMgmtIsServerListening;
2279 begin
2280 GetProcedureAddress(_RpcMgmtIsServerListening, rpclib, 'RpcMgmtIsServerListening');
2281 asm
2282 MOV ESP, EBP
2283 POP EBP
2284 JMP [_RpcMgmtIsServerListening]
2285 end;
2286 end;
2287
2288 var
2289 _RpcMgmtStopServerListening: Pointer;
2290
RpcMgmtStopServerListeningnull2291 function RpcMgmtStopServerListening;
2292 begin
2293 GetProcedureAddress(_RpcMgmtStopServerListening, rpclib, 'RpcMgmtStopServerListening');
2294 asm
2295 MOV ESP, EBP
2296 POP EBP
2297 JMP [_RpcMgmtStopServerListening]
2298 end;
2299 end;
2300
2301 var
2302 _RpcMgmtWaitServerListen: Pointer;
2303
RpcMgmtWaitServerListennull2304 function RpcMgmtWaitServerListen;
2305 begin
2306 GetProcedureAddress(_RpcMgmtWaitServerListen, rpclib, 'RpcMgmtWaitServerListen');
2307 asm
2308 MOV ESP, EBP
2309 POP EBP
2310 JMP [_RpcMgmtWaitServerListen]
2311 end;
2312 end;
2313
2314 var
2315 _RpcMgmtSetServerStackSize: Pointer;
2316
RpcMgmtSetServerStackSizenull2317 function RpcMgmtSetServerStackSize;
2318 begin
2319 GetProcedureAddress(_RpcMgmtSetServerStackSize, rpclib, 'RpcMgmtSetServerStackSize');
2320 asm
2321 MOV ESP, EBP
2322 POP EBP
2323 JMP [_RpcMgmtSetServerStackSize]
2324 end;
2325 end;
2326
2327 var
2328 _RpcSsDontSerializeContext: Pointer;
2329
2330 procedure RpcSsDontSerializeContext;
2331 begin
2332 GetProcedureAddress(_RpcSsDontSerializeContext, rpclib, 'RpcSsDontSerializeContext');
2333 asm
2334 MOV ESP, EBP
2335 POP EBP
2336 JMP [_RpcSsDontSerializeContext]
2337 end;
2338 end;
2339
2340 var
2341 _RpcMgmtEnableIdleCleanup: Pointer;
2342
RpcMgmtEnableIdleCleanupnull2343 function RpcMgmtEnableIdleCleanup;
2344 begin
2345 GetProcedureAddress(_RpcMgmtEnableIdleCleanup, rpclib, 'RpcMgmtEnableIdleCleanup');
2346 asm
2347 MOV ESP, EBP
2348 POP EBP
2349 JMP [_RpcMgmtEnableIdleCleanup]
2350 end;
2351 end;
2352
2353 var
2354 _RpcMgmtInqIfIds: Pointer;
2355
RpcMgmtInqIfIdsnull2356 function RpcMgmtInqIfIds;
2357 begin
2358 GetProcedureAddress(_RpcMgmtInqIfIds, rpclib, 'RpcMgmtInqIfIds');
2359 asm
2360 MOV ESP, EBP
2361 POP EBP
2362 JMP [_RpcMgmtInqIfIds]
2363 end;
2364 end;
2365
2366 var
2367 _RpcIfIdVectorFree: Pointer;
2368
RpcIfIdVectorFreenull2369 function RpcIfIdVectorFree;
2370 begin
2371 GetProcedureAddress(_RpcIfIdVectorFree, rpclib, 'RpcIfIdVectorFree');
2372 asm
2373 MOV ESP, EBP
2374 POP EBP
2375 JMP [_RpcIfIdVectorFree]
2376 end;
2377 end;
2378
2379 var
2380 _RpcMgmtInqServerPrincNameA: Pointer;
2381
RpcMgmtInqServerPrincNameAnull2382 function RpcMgmtInqServerPrincNameA;
2383 begin
2384 GetProcedureAddress(_RpcMgmtInqServerPrincNameA, rpclib, 'RpcMgmtInqServerPrincNameA');
2385 asm
2386 MOV ESP, EBP
2387 POP EBP
2388 JMP [_RpcMgmtInqServerPrincNameA]
2389 end;
2390 end;
2391
2392 var
2393 _RpcMgmtInqServerPrincNameW: Pointer;
2394
RpcMgmtInqServerPrincNameWnull2395 function RpcMgmtInqServerPrincNameW;
2396 begin
2397 GetProcedureAddress(_RpcMgmtInqServerPrincNameW, rpclib, 'RpcMgmtInqServerPrincNameW');
2398 asm
2399 MOV ESP, EBP
2400 POP EBP
2401 JMP [_RpcMgmtInqServerPrincNameW]
2402 end;
2403 end;
2404
2405 var
2406 _RpcMgmtInqServerPrincName: Pointer;
2407
RpcMgmtInqServerPrincNamenull2408 function RpcMgmtInqServerPrincName;
2409 begin
2410 GetProcedureAddress(_RpcMgmtInqServerPrincName, rpclib, 'RpcMgmtInqServerPrincName' + AWSuffix);
2411 asm
2412 MOV ESP, EBP
2413 POP EBP
2414 JMP [_RpcMgmtInqServerPrincName]
2415 end;
2416 end;
2417
2418 var
2419 _RpcServerInqDefaultPrincNameA: Pointer;
2420
RpcServerInqDefaultPrincNameAnull2421 function RpcServerInqDefaultPrincNameA;
2422 begin
2423 GetProcedureAddress(_RpcServerInqDefaultPrincNameA, rpclib, 'RpcServerInqDefaultPrincNameA');
2424 asm
2425 MOV ESP, EBP
2426 POP EBP
2427 JMP [_RpcServerInqDefaultPrincNameA]
2428 end;
2429 end;
2430
2431 var
2432 _RpcServerInqDefaultPrincNameW: Pointer;
2433
RpcServerInqDefaultPrincNameWnull2434 function RpcServerInqDefaultPrincNameW;
2435 begin
2436 GetProcedureAddress(_RpcServerInqDefaultPrincNameW, rpclib, 'RpcServerInqDefaultPrincNameW');
2437 asm
2438 MOV ESP, EBP
2439 POP EBP
2440 JMP [_RpcServerInqDefaultPrincNameW]
2441 end;
2442 end;
2443
2444 var
2445 _RpcServerInqDefaultPrincName: Pointer;
2446
RpcServerInqDefaultPrincNamenull2447 function RpcServerInqDefaultPrincName;
2448 begin
2449 GetProcedureAddress(_RpcServerInqDefaultPrincName, rpclib, 'RpcServerInqDefaultPrincName' + AWSuffix);
2450 asm
2451 MOV ESP, EBP
2452 POP EBP
2453 JMP [_RpcServerInqDefaultPrincName]
2454 end;
2455 end;
2456
2457 var
2458 _RpcEpResolveBinding: Pointer;
2459
RpcEpResolveBindingnull2460 function RpcEpResolveBinding;
2461 begin
2462 GetProcedureAddress(_RpcEpResolveBinding, rpclib, 'RpcEpResolveBinding');
2463 asm
2464 MOV ESP, EBP
2465 POP EBP
2466 JMP [_RpcEpResolveBinding]
2467 end;
2468 end;
2469
2470 var
2471 _RpcNsBindingInqEntryNameA: Pointer;
2472
RpcNsBindingInqEntryNameAnull2473 function RpcNsBindingInqEntryNameA;
2474 begin
2475 GetProcedureAddress(_RpcNsBindingInqEntryNameA, rpclib, 'RpcNsBindingInqEntryNameA');
2476 asm
2477 MOV ESP, EBP
2478 POP EBP
2479 JMP [_RpcNsBindingInqEntryNameA]
2480 end;
2481 end;
2482
2483 var
2484 _RpcNsBindingInqEntryNameW: Pointer;
2485
RpcNsBindingInqEntryNameWnull2486 function RpcNsBindingInqEntryNameW;
2487 begin
2488 GetProcedureAddress(_RpcNsBindingInqEntryNameW, rpclib, 'RpcNsBindingInqEntryNameW');
2489 asm
2490 MOV ESP, EBP
2491 POP EBP
2492 JMP [_RpcNsBindingInqEntryNameW]
2493 end;
2494 end;
2495
2496 var
2497 _RpcNsBindingInqEntryName: Pointer;
2498
RpcNsBindingInqEntryNamenull2499 function RpcNsBindingInqEntryName;
2500 begin
2501 GetProcedureAddress(_RpcNsBindingInqEntryName, rpclib, 'RpcNsBindingInqEntryName' + AWSuffix);
2502 asm
2503 MOV ESP, EBP
2504 POP EBP
2505 JMP [_RpcNsBindingInqEntryName]
2506 end;
2507 end;
2508
2509 var
2510 _RpcImpersonateClient: Pointer;
2511
RpcImpersonateClientnull2512 function RpcImpersonateClient;
2513 begin
2514 GetProcedureAddress(_RpcImpersonateClient, rpclib, 'RpcImpersonateClient');
2515 asm
2516 MOV ESP, EBP
2517 POP EBP
2518 JMP [_RpcImpersonateClient]
2519 end;
2520 end;
2521
2522 var
2523 _RpcRevertToSelfEx: Pointer;
2524
RpcRevertToSelfExnull2525 function RpcRevertToSelfEx;
2526 begin
2527 GetProcedureAddress(_RpcRevertToSelfEx, rpclib, 'RpcRevertToSelfEx');
2528 asm
2529 MOV ESP, EBP
2530 POP EBP
2531 JMP [_RpcRevertToSelfEx]
2532 end;
2533 end;
2534
2535 var
2536 _RpcRevertToSelf: Pointer;
2537
RpcRevertToSelfnull2538 function RpcRevertToSelf;
2539 begin
2540 GetProcedureAddress(_RpcRevertToSelf, rpclib, 'RpcRevertToSelf');
2541 asm
2542 MOV ESP, EBP
2543 POP EBP
2544 JMP [_RpcRevertToSelf]
2545 end;
2546 end;
2547
2548 var
2549 _RpcBindingInqAuthClientA: Pointer;
2550
RpcBindingInqAuthClientAnull2551 function RpcBindingInqAuthClientA;
2552 begin
2553 GetProcedureAddress(_RpcBindingInqAuthClientA, rpclib, 'RpcBindingInqAuthClientA');
2554 asm
2555 MOV ESP, EBP
2556 POP EBP
2557 JMP [_RpcBindingInqAuthClientA]
2558 end;
2559 end;
2560
2561 var
2562 _RpcBindingInqAuthClientW: Pointer;
2563
RpcBindingInqAuthClientWnull2564 function RpcBindingInqAuthClientW;
2565 begin
2566 GetProcedureAddress(_RpcBindingInqAuthClientW, rpclib, 'RpcBindingInqAuthClientW');
2567 asm
2568 MOV ESP, EBP
2569 POP EBP
2570 JMP [_RpcBindingInqAuthClientW]
2571 end;
2572 end;
2573
2574 var
2575 _RpcBindingInqAuthClientExA: Pointer;
2576
RpcBindingInqAuthClientExAnull2577 function RpcBindingInqAuthClientExA;
2578 begin
2579 GetProcedureAddress(_RpcBindingInqAuthClientExA, rpclib, 'RpcBindingInqAuthClientExA');
2580 asm
2581 MOV ESP, EBP
2582 POP EBP
2583 JMP [_RpcBindingInqAuthClientExA]
2584 end;
2585 end;
2586
2587 var
2588 _RpcBindingInqAuthClientExW: Pointer;
2589
RpcBindingInqAuthClientExWnull2590 function RpcBindingInqAuthClientExW;
2591 begin
2592 GetProcedureAddress(_RpcBindingInqAuthClientExW, rpclib, 'RpcBindingInqAuthClientExW');
2593 asm
2594 MOV ESP, EBP
2595 POP EBP
2596 JMP [_RpcBindingInqAuthClientExW]
2597 end;
2598 end;
2599
2600 var
2601 _RpcBindingInqAuthInfoA: Pointer;
2602
RpcBindingInqAuthInfoAnull2603 function RpcBindingInqAuthInfoA;
2604 begin
2605 GetProcedureAddress(_RpcBindingInqAuthInfoA, rpclib, 'RpcBindingInqAuthInfoA');
2606 asm
2607 MOV ESP, EBP
2608 POP EBP
2609 JMP [_RpcBindingInqAuthInfoA]
2610 end;
2611 end;
2612
2613 var
2614 _RpcBindingInqAuthInfoW: Pointer;
2615
RpcBindingInqAuthInfoWnull2616 function RpcBindingInqAuthInfoW;
2617 begin
2618 GetProcedureAddress(_RpcBindingInqAuthInfoW, rpclib, 'RpcBindingInqAuthInfoW');
2619 asm
2620 MOV ESP, EBP
2621 POP EBP
2622 JMP [_RpcBindingInqAuthInfoW]
2623 end;
2624 end;
2625
2626 var
2627 _RpcBindingSetAuthInfoA: Pointer;
2628
RpcBindingSetAuthInfoAnull2629 function RpcBindingSetAuthInfoA;
2630 begin
2631 GetProcedureAddress(_RpcBindingSetAuthInfoA, rpclib, 'RpcBindingSetAuthInfoA');
2632 asm
2633 MOV ESP, EBP
2634 POP EBP
2635 JMP [_RpcBindingSetAuthInfoA]
2636 end;
2637 end;
2638
2639 var
2640 _RpcBindingSetAuthInfoW: Pointer;
2641
RpcBindingSetAuthInfoWnull2642 function RpcBindingSetAuthInfoW;
2643 begin
2644 GetProcedureAddress(_RpcBindingSetAuthInfoW, rpclib, 'RpcBindingSetAuthInfoW');
2645 asm
2646 MOV ESP, EBP
2647 POP EBP
2648 JMP [_RpcBindingSetAuthInfoW]
2649 end;
2650 end;
2651
2652 var
2653 _RpcBindingSetAuthInfoExA: Pointer;
2654
RpcBindingSetAuthInfoExAnull2655 function RpcBindingSetAuthInfoExA;
2656 begin
2657 GetProcedureAddress(_RpcBindingSetAuthInfoExA, rpclib, 'RpcBindingSetAuthInfoExA');
2658 asm
2659 MOV ESP, EBP
2660 POP EBP
2661 JMP [_RpcBindingSetAuthInfoExA]
2662 end;
2663 end;
2664
2665 var
2666 _RpcBindingSetAuthInfoExW: Pointer;
2667
RpcBindingSetAuthInfoExWnull2668 function RpcBindingSetAuthInfoExW;
2669 begin
2670 GetProcedureAddress(_RpcBindingSetAuthInfoExW, rpclib, 'RpcBindingSetAuthInfoExW');
2671 asm
2672 MOV ESP, EBP
2673 POP EBP
2674 JMP [_RpcBindingSetAuthInfoExW]
2675 end;
2676 end;
2677
2678 var
2679 _RpcBindingInqAuthInfoExA: Pointer;
2680
RpcBindingInqAuthInfoExAnull2681 function RpcBindingInqAuthInfoExA;
2682 begin
2683 GetProcedureAddress(_RpcBindingInqAuthInfoExA, rpclib, 'RpcBindingInqAuthInfoExA');
2684 asm
2685 MOV ESP, EBP
2686 POP EBP
2687 JMP [_RpcBindingInqAuthInfoExA]
2688 end;
2689 end;
2690
2691 var
2692 _RpcBindingInqAuthInfoExW: Pointer;
2693
RpcBindingInqAuthInfoExWnull2694 function RpcBindingInqAuthInfoExW;
2695 begin
2696 GetProcedureAddress(_RpcBindingInqAuthInfoExW, rpclib, 'RpcBindingInqAuthInfoExW');
2697 asm
2698 MOV ESP, EBP
2699 POP EBP
2700 JMP [_RpcBindingInqAuthInfoExW]
2701 end;
2702 end;
2703
2704 var
2705 _RpcServerRegisterAuthInfoA: Pointer;
2706
RpcServerRegisterAuthInfoAnull2707 function RpcServerRegisterAuthInfoA;
2708 begin
2709 GetProcedureAddress(_RpcServerRegisterAuthInfoA, rpclib, 'RpcServerRegisterAuthInfoA');
2710 asm
2711 MOV ESP, EBP
2712 POP EBP
2713 JMP [_RpcServerRegisterAuthInfoA]
2714 end;
2715 end;
2716
2717 var
2718 _RpcServerRegisterAuthInfoW: Pointer;
2719
RpcServerRegisterAuthInfoWnull2720 function RpcServerRegisterAuthInfoW;
2721 begin
2722 GetProcedureAddress(_RpcServerRegisterAuthInfoW, rpclib, 'RpcServerRegisterAuthInfoW');
2723 asm
2724 MOV ESP, EBP
2725 POP EBP
2726 JMP [_RpcServerRegisterAuthInfoW]
2727 end;
2728 end;
2729
2730 var
2731 _RpcBindingInqAuthClient: Pointer;
2732
RpcBindingInqAuthClientnull2733 function RpcBindingInqAuthClient;
2734 begin
2735 GetProcedureAddress(_RpcBindingInqAuthClient, rpclib, 'RpcBindingInqAuthClient' + AWSuffix);
2736 asm
2737 MOV ESP, EBP
2738 POP EBP
2739 JMP [_RpcBindingInqAuthClient]
2740 end;
2741 end;
2742
2743 var
2744 _RpcBindingInqAuthClientEx: Pointer;
2745
RpcBindingInqAuthClientExnull2746 function RpcBindingInqAuthClientEx;
2747 begin
2748 GetProcedureAddress(_RpcBindingInqAuthClientEx, rpclib, 'RpcBindingInqAuthClientEx' + AWSuffix);
2749 asm
2750 MOV ESP, EBP
2751 POP EBP
2752 JMP [_RpcBindingInqAuthClientEx]
2753 end;
2754 end;
2755
2756 var
2757 _RpcBindingInqAuthInfo: Pointer;
2758
RpcBindingInqAuthInfonull2759 function RpcBindingInqAuthInfo;
2760 begin
2761 GetProcedureAddress(_RpcBindingInqAuthInfo, rpclib, 'RpcBindingInqAuthInfo' + AWSuffix);
2762 asm
2763 MOV ESP, EBP
2764 POP EBP
2765 JMP [_RpcBindingInqAuthInfo]
2766 end;
2767 end;
2768
2769 var
2770 _RpcBindingSetAuthInfo: Pointer;
2771
RpcBindingSetAuthInfonull2772 function RpcBindingSetAuthInfo;
2773 begin
2774 GetProcedureAddress(_RpcBindingSetAuthInfo, rpclib, 'RpcBindingSetAuthInfo' + AWSuffix);
2775 asm
2776 MOV ESP, EBP
2777 POP EBP
2778 JMP [_RpcBindingSetAuthInfo]
2779 end;
2780 end;
2781
2782 var
2783 _RpcBindingSetAuthInfoEx: Pointer;
2784
RpcBindingSetAuthInfoExnull2785 function RpcBindingSetAuthInfoEx;
2786 begin
2787 GetProcedureAddress(_RpcBindingSetAuthInfoEx, rpclib, 'RpcBindingSetAuthInfoEx' + AWSuffix);
2788 asm
2789 MOV ESP, EBP
2790 POP EBP
2791 JMP [_RpcBindingSetAuthInfoEx]
2792 end;
2793 end;
2794
2795 var
2796 _RpcBindingInqAuthInfoEx: Pointer;
2797
RpcBindingInqAuthInfoExnull2798 function RpcBindingInqAuthInfoEx;
2799 begin
2800 GetProcedureAddress(_RpcBindingInqAuthInfoEx, rpclib, 'RpcBindingInqAuthInfoEx' + AWSuffix);
2801 asm
2802 MOV ESP, EBP
2803 POP EBP
2804 JMP [_RpcBindingInqAuthInfoEx]
2805 end;
2806 end;
2807
2808 var
2809 _RpcServerRegisterAuthInfo: Pointer;
2810
RpcServerRegisterAuthInfonull2811 function RpcServerRegisterAuthInfo;
2812 begin
2813 GetProcedureAddress(_RpcServerRegisterAuthInfo, rpclib, 'RpcServerRegisterAuthInfo' + AWSuffix);
2814 asm
2815 MOV ESP, EBP
2816 POP EBP
2817 JMP [_RpcServerRegisterAuthInfo]
2818 end;
2819 end;
2820
2821 var
2822 _RpcBindingServerFromClient: Pointer;
2823
RpcBindingServerFromClientnull2824 function RpcBindingServerFromClient;
2825 begin
2826 GetProcedureAddress(_RpcBindingServerFromClient, rpclib, 'RpcBindingServerFromClient');
2827 asm
2828 MOV ESP, EBP
2829 POP EBP
2830 JMP [_RpcBindingServerFromClient]
2831 end;
2832 end;
2833
2834 var
2835 _RpcRaiseException: Pointer;
2836
2837 procedure RpcRaiseException;
2838 begin
2839 GetProcedureAddress(_RpcRaiseException, rpclib, 'RpcRaiseException');
2840 asm
2841 MOV ESP, EBP
2842 POP EBP
2843 JMP [_RpcRaiseException]
2844 end;
2845 end;
2846
2847 var
2848 _RpcTestCancel: Pointer;
2849
RpcTestCancelnull2850 function RpcTestCancel;
2851 begin
2852 GetProcedureAddress(_RpcTestCancel, rpclib, 'RpcTestCancel');
2853 asm
2854 MOV ESP, EBP
2855 POP EBP
2856 JMP [_RpcTestCancel]
2857 end;
2858 end;
2859
2860 var
2861 _RpcServerTestCancel: Pointer;
2862
RpcServerTestCancelnull2863 function RpcServerTestCancel;
2864 begin
2865 GetProcedureAddress(_RpcServerTestCancel, rpclib, 'RpcServerTestCancel');
2866 asm
2867 MOV ESP, EBP
2868 POP EBP
2869 JMP [_RpcServerTestCancel]
2870 end;
2871 end;
2872
2873 var
2874 _RpcCancelThread: Pointer;
2875
RpcCancelThreadnull2876 function RpcCancelThread;
2877 begin
2878 GetProcedureAddress(_RpcCancelThread, rpclib, 'RpcCancelThread');
2879 asm
2880 MOV ESP, EBP
2881 POP EBP
2882 JMP [_RpcCancelThread]
2883 end;
2884 end;
2885
2886 var
2887 _RpcCancelThreadEx: Pointer;
2888
RpcCancelThreadExnull2889 function RpcCancelThreadEx;
2890 begin
2891 GetProcedureAddress(_RpcCancelThreadEx, rpclib, 'RpcCancelThreadEx');
2892 asm
2893 MOV ESP, EBP
2894 POP EBP
2895 JMP [_RpcCancelThreadEx]
2896 end;
2897 end;
2898
2899 var
2900 _UuidCreate: Pointer;
2901
UuidCreatenull2902 function UuidCreate;
2903 begin
2904 GetProcedureAddress(_UuidCreate, rpclib, 'UuidCreate');
2905 asm
2906 MOV ESP, EBP
2907 POP EBP
2908 JMP [_UuidCreate]
2909 end;
2910 end;
2911
2912 var
2913 _UuidCreateSequential: Pointer;
2914
UuidCreateSequentialnull2915 function UuidCreateSequential;
2916 begin
2917 GetProcedureAddress(_UuidCreateSequential, rpclib, 'UuidCreateSequential');
2918 asm
2919 MOV ESP, EBP
2920 POP EBP
2921 JMP [_UuidCreateSequential]
2922 end;
2923 end;
2924
2925 var
2926 _UuidFromStringA: Pointer;
2927
UuidFromStringAnull2928 function UuidFromStringA;
2929 begin
2930 GetProcedureAddress(_UuidFromStringA, rpclib, 'UuidFromStringA');
2931 asm
2932 MOV ESP, EBP
2933 POP EBP
2934 JMP [_UuidFromStringA]
2935 end;
2936 end;
2937
2938 var
2939 _UuidFromStringW: Pointer;
2940
UuidFromStringWnull2941 function UuidFromStringW;
2942 begin
2943 GetProcedureAddress(_UuidFromStringW, rpclib, 'UuidFromStringW');
2944 asm
2945 MOV ESP, EBP
2946 POP EBP
2947 JMP [_UuidFromStringW]
2948 end;
2949 end;
2950
2951 var
2952 _UuidFromString: Pointer;
2953
UuidFromStringnull2954 function UuidFromString;
2955 begin
2956 GetProcedureAddress(_UuidFromString, rpclib, 'UuidFromString' + AWSuffix);
2957 asm
2958 MOV ESP, EBP
2959 POP EBP
2960 JMP [_UuidFromString]
2961 end;
2962 end;
2963
2964 var
2965 _UuidToStringA: Pointer;
2966
UuidToStringAnull2967 function UuidToStringA;
2968 begin
2969 GetProcedureAddress(_UuidToStringA, rpclib, 'UuidToStringA');
2970 asm
2971 MOV ESP, EBP
2972 POP EBP
2973 JMP [_UuidToStringA]
2974 end;
2975 end;
2976
2977 var
2978 _UuidToStringW: Pointer;
2979
UuidToStringWnull2980 function UuidToStringW;
2981 begin
2982 GetProcedureAddress(_UuidToStringW, rpclib, 'UuidToStringW');
2983 asm
2984 MOV ESP, EBP
2985 POP EBP
2986 JMP [_UuidToStringW]
2987 end;
2988 end;
2989
2990 var
2991 _UuidToString: Pointer;
2992
UuidToStringnull2993 function UuidToString;
2994 begin
2995 GetProcedureAddress(_UuidToString, rpclib, 'UuidToString' + AWSuffix);
2996 asm
2997 MOV ESP, EBP
2998 POP EBP
2999 JMP [_UuidToString]
3000 end;
3001 end;
3002
3003 var
3004 _UuidCompare: Pointer;
3005
UuidComparenull3006 function UuidCompare;
3007 begin
3008 GetProcedureAddress(_UuidCompare, rpclib, 'UuidCompare');
3009 asm
3010 MOV ESP, EBP
3011 POP EBP
3012 JMP [_UuidCompare]
3013 end;
3014 end;
3015
3016 var
3017 _UuidCreateNil: Pointer;
3018
UuidCreateNilnull3019 function UuidCreateNil;
3020 begin
3021 GetProcedureAddress(_UuidCreateNil, rpclib, 'UuidCreateNil');
3022 asm
3023 MOV ESP, EBP
3024 POP EBP
3025 JMP [_UuidCreateNil]
3026 end;
3027 end;
3028
3029 var
3030 _UuidEqual: Pointer;
3031
UuidEqualnull3032 function UuidEqual;
3033 begin
3034 GetProcedureAddress(_UuidEqual, rpclib, 'UuidEqual');
3035 asm
3036 MOV ESP, EBP
3037 POP EBP
3038 JMP [_UuidEqual]
3039 end;
3040 end;
3041
3042 var
3043 _UuidHash: Pointer;
3044
UuidHashnull3045 function UuidHash;
3046 begin
3047 GetProcedureAddress(_UuidHash, rpclib, 'UuidHash');
3048 asm
3049 MOV ESP, EBP
3050 POP EBP
3051 JMP [_UuidHash]
3052 end;
3053 end;
3054
3055 var
3056 _UuidIsNil: Pointer;
3057
UuidIsNilnull3058 function UuidIsNil;
3059 begin
3060 GetProcedureAddress(_UuidIsNil, rpclib, 'UuidIsNil');
3061 asm
3062 MOV ESP, EBP
3063 POP EBP
3064 JMP [_UuidIsNil]
3065 end;
3066 end;
3067
3068 var
3069 _RpcEpRegisterNoReplaceA: Pointer;
3070
RpcEpRegisterNoReplaceAnull3071 function RpcEpRegisterNoReplaceA;
3072 begin
3073 GetProcedureAddress(_RpcEpRegisterNoReplaceA, rpclib, 'RpcEpRegisterNoReplaceA');
3074 asm
3075 MOV ESP, EBP
3076 POP EBP
3077 JMP [_RpcEpRegisterNoReplaceA]
3078 end;
3079 end;
3080
3081 var
3082 _RpcEpRegisterNoReplaceW: Pointer;
3083
RpcEpRegisterNoReplaceWnull3084 function RpcEpRegisterNoReplaceW;
3085 begin
3086 GetProcedureAddress(_RpcEpRegisterNoReplaceW, rpclib, 'RpcEpRegisterNoReplaceW');
3087 asm
3088 MOV ESP, EBP
3089 POP EBP
3090 JMP [_RpcEpRegisterNoReplaceW]
3091 end;
3092 end;
3093
3094 var
3095 _RpcEpRegisterNoReplace: Pointer;
3096
RpcEpRegisterNoReplacenull3097 function RpcEpRegisterNoReplace;
3098 begin
3099 GetProcedureAddress(_RpcEpRegisterNoReplace, rpclib, 'RpcEpRegisterNoReplace' + AWSuffix);
3100 asm
3101 MOV ESP, EBP
3102 POP EBP
3103 JMP [_RpcEpRegisterNoReplace]
3104 end;
3105 end;
3106
3107 var
3108 _RpcEpRegisterA: Pointer;
3109
RpcEpRegisterAnull3110 function RpcEpRegisterA;
3111 begin
3112 GetProcedureAddress(_RpcEpRegisterA, rpclib, 'RpcEpRegisterA');
3113 asm
3114 MOV ESP, EBP
3115 POP EBP
3116 JMP [_RpcEpRegisterA]
3117 end;
3118 end;
3119
3120 var
3121 _RpcEpRegisterW: Pointer;
3122
RpcEpRegisterWnull3123 function RpcEpRegisterW;
3124 begin
3125 GetProcedureAddress(_RpcEpRegisterW, rpclib, 'RpcEpRegisterW');
3126 asm
3127 MOV ESP, EBP
3128 POP EBP
3129 JMP [_RpcEpRegisterW]
3130 end;
3131 end;
3132
3133 var
3134 _RpcEpRegister: Pointer;
3135
RpcEpRegisternull3136 function RpcEpRegister;
3137 begin
3138 GetProcedureAddress(_RpcEpRegister, rpclib, 'RpcEpRegister' + AWSuffix);
3139 asm
3140 MOV ESP, EBP
3141 POP EBP
3142 JMP [_RpcEpRegister]
3143 end;
3144 end;
3145
3146 var
3147 _RpcEpUnregister: Pointer;
3148
RpcEpUnregisternull3149 function RpcEpUnregister;
3150 begin
3151 GetProcedureAddress(_RpcEpUnregister, rpclib, 'RpcEpUnregister');
3152 asm
3153 MOV ESP, EBP
3154 POP EBP
3155 JMP [_RpcEpUnregister]
3156 end;
3157 end;
3158
3159 var
3160 _DceErrorInqTextA: Pointer;
3161
DceErrorInqTextAnull3162 function DceErrorInqTextA;
3163 begin
3164 GetProcedureAddress(_DceErrorInqTextA, rpclib, 'DceErrorInqTextA');
3165 asm
3166 MOV ESP, EBP
3167 POP EBP
3168 JMP [_DceErrorInqTextA]
3169 end;
3170 end;
3171
3172 var
3173 _DceErrorInqTextW: Pointer;
3174
DceErrorInqTextWnull3175 function DceErrorInqTextW;
3176 begin
3177 GetProcedureAddress(_DceErrorInqTextW, rpclib, 'DceErrorInqTextW');
3178 asm
3179 MOV ESP, EBP
3180 POP EBP
3181 JMP [_DceErrorInqTextW]
3182 end;
3183 end;
3184
3185 var
3186 _DceErrorInqText: Pointer;
3187
DceErrorInqTextnull3188 function DceErrorInqText;
3189 begin
3190 GetProcedureAddress(_DceErrorInqText, rpclib, 'DceErrorInqText' + AWSuffix);
3191 asm
3192 MOV ESP, EBP
3193 POP EBP
3194 JMP [_DceErrorInqText]
3195 end;
3196 end;
3197
3198 var
3199 _RpcMgmtEpEltInqBegin: Pointer;
3200
RpcMgmtEpEltInqBeginnull3201 function RpcMgmtEpEltInqBegin;
3202 begin
3203 GetProcedureAddress(_RpcMgmtEpEltInqBegin, rpclib, 'RpcMgmtEpEltInqBegin');
3204 asm
3205 MOV ESP, EBP
3206 POP EBP
3207 JMP [_RpcMgmtEpEltInqBegin]
3208 end;
3209 end;
3210
3211 var
3212 _RpcMgmtEpEltInqDone: Pointer;
3213
RpcMgmtEpEltInqDonenull3214 function RpcMgmtEpEltInqDone;
3215 begin
3216 GetProcedureAddress(_RpcMgmtEpEltInqDone, rpclib, 'RpcMgmtEpEltInqDone');
3217 asm
3218 MOV ESP, EBP
3219 POP EBP
3220 JMP [_RpcMgmtEpEltInqDone]
3221 end;
3222 end;
3223
3224 var
3225 _RpcMgmtEpEltInqNextA: Pointer;
3226
RpcMgmtEpEltInqNextAnull3227 function RpcMgmtEpEltInqNextA;
3228 begin
3229 GetProcedureAddress(_RpcMgmtEpEltInqNextA, rpclib, 'RpcMgmtEpEltInqNextA');
3230 asm
3231 MOV ESP, EBP
3232 POP EBP
3233 JMP [_RpcMgmtEpEltInqNextA]
3234 end;
3235 end;
3236
3237 var
3238 _RpcMgmtEpEltInqNextW: Pointer;
3239
RpcMgmtEpEltInqNextWnull3240 function RpcMgmtEpEltInqNextW;
3241 begin
3242 GetProcedureAddress(_RpcMgmtEpEltInqNextW, rpclib, 'RpcMgmtEpEltInqNextW');
3243 asm
3244 MOV ESP, EBP
3245 POP EBP
3246 JMP [_RpcMgmtEpEltInqNextW]
3247 end;
3248 end;
3249
3250 var
3251 _RpcMgmtEpEltInqNext: Pointer;
3252
RpcMgmtEpEltInqNextnull3253 function RpcMgmtEpEltInqNext;
3254 begin
3255 GetProcedureAddress(_RpcMgmtEpEltInqNext, rpclib, 'RpcMgmtEpEltInqNext' + AWSuffix);
3256 asm
3257 MOV ESP, EBP
3258 POP EBP
3259 JMP [_RpcMgmtEpEltInqNext]
3260 end;
3261 end;
3262
3263 var
3264 _RpcMgmtEpUnregister: Pointer;
3265
RpcMgmtEpUnregisternull3266 function RpcMgmtEpUnregister;
3267 begin
3268 GetProcedureAddress(_RpcMgmtEpUnregister, rpclib, 'RpcMgmtEpUnregister');
3269 asm
3270 MOV ESP, EBP
3271 POP EBP
3272 JMP [_RpcMgmtEpUnregister]
3273 end;
3274 end;
3275
3276 var
3277 _RpcMgmtSetAuthorizationFn: Pointer;
3278
RpcMgmtSetAuthorizationFnnull3279 function RpcMgmtSetAuthorizationFn;
3280 begin
3281 GetProcedureAddress(_RpcMgmtSetAuthorizationFn, rpclib, 'RpcMgmtSetAuthorizationFn');
3282 asm
3283 MOV ESP, EBP
3284 POP EBP
3285 JMP [_RpcMgmtSetAuthorizationFn]
3286 end;
3287 end;
3288
3289 {$ELSE}
3290
RpcBindingCopynull3291 function RpcBindingCopy; external rpclib name 'RpcBindingCopy';
RpcBindingFreenull3292 function RpcBindingFree; external rpclib name 'RpcBindingFree';
RpcBindingSetOptionnull3293 function RpcBindingSetOption; external rpclib name 'RpcBindingSetOption';
RpcBindingInqOptionnull3294 function RpcBindingInqOption; external rpclib name 'RpcBindingInqOption';
RpcBindingFromStringBindingAnull3295 function RpcBindingFromStringBindingA; external rpclib name 'RpcBindingFromStringBindingA';
RpcBindingFromStringBindingWnull3296 function RpcBindingFromStringBindingW; external rpclib name 'RpcBindingFromStringBindingW';
RpcBindingFromStringBindingnull3297 function RpcBindingFromStringBinding; external rpclib name 'RpcBindingFromStringBinding' + AWSuffix;
RpcSsGetContextBindingnull3298 function RpcSsGetContextBinding; external rpclib name 'RpcSsGetContextBinding';
RpcBindingInqObjectnull3299 function RpcBindingInqObject; external rpclib name 'RpcBindingInqObject';
RpcBindingResetnull3300 function RpcBindingReset; external rpclib name 'RpcBindingReset';
RpcBindingSetObjectnull3301 function RpcBindingSetObject; external rpclib name 'RpcBindingSetObject';
RpcMgmtInqDefaultProtectLevelnull3302 function RpcMgmtInqDefaultProtectLevel; external rpclib name 'RpcMgmtInqDefaultProtectLevel';
RpcBindingToStringBindingAnull3303 function RpcBindingToStringBindingA; external rpclib name 'RpcBindingToStringBindingA';
RpcBindingToStringBindingWnull3304 function RpcBindingToStringBindingW; external rpclib name 'RpcBindingToStringBindingW';
RpcBindingToStringBindingnull3305 function RpcBindingToStringBinding; external rpclib name 'RpcBindingToStringBinding' + AWSuffix;
RpcBindingVectorFreenull3306 function RpcBindingVectorFree; external rpclib name 'RpcBindingVectorFree';
RpcStringBindingComposeAnull3307 function RpcStringBindingComposeA; external rpclib name 'RpcStringBindingComposeA';
RpcStringBindingComposeWnull3308 function RpcStringBindingComposeW; external rpclib name 'RpcStringBindingComposeW';
RpcStringBindingComposenull3309 function RpcStringBindingCompose; external rpclib name 'RpcStringBindingCompose' + AWSuffix;
RpcStringBindingParseAnull3310 function RpcStringBindingParseA; external rpclib name 'RpcStringBindingParseA';
RpcStringBindingParseWnull3311 function RpcStringBindingParseW; external rpclib name 'RpcStringBindingParseW';
RpcStringBindingParsenull3312 function RpcStringBindingParse; external rpclib name 'RpcStringBindingParse' + AWSuffix;
RpcStringFreeAnull3313 function RpcStringFreeA; external rpclib name 'RpcStringFreeA';
RpcStringFreeWnull3314 function RpcStringFreeW; external rpclib name 'RpcStringFreeW';
RpcStringFreenull3315 function RpcStringFree; external rpclib name 'RpcStringFree' + AWSuffix;
RpcIfInqIdnull3316 function RpcIfInqId; external rpclib name 'RpcIfInqId';
RpcNetworkIsProtseqValidAnull3317 function RpcNetworkIsProtseqValidA; external rpclib name 'RpcNetworkIsProtseqValidA';
RpcNetworkIsProtseqValidWnull3318 function RpcNetworkIsProtseqValidW; external rpclib name 'RpcNetworkIsProtseqValidW';
RpcMgmtInqComTimeoutnull3319 function RpcMgmtInqComTimeout; external rpclib name 'RpcMgmtInqComTimeout';
RpcMgmtSetComTimeoutnull3320 function RpcMgmtSetComTimeout; external rpclib name 'RpcMgmtSetComTimeout';
RpcMgmtSetCancelTimeoutnull3321 function RpcMgmtSetCancelTimeout; external rpclib name 'RpcMgmtSetCancelTimeout';
RpcNetworkInqProtseqsAnull3322 function RpcNetworkInqProtseqsA; external rpclib name 'RpcNetworkInqProtseqsA';
RpcNetworkInqProtseqsWnull3323 function RpcNetworkInqProtseqsW; external rpclib name 'RpcNetworkInqProtseqsW';
RpcNetworkInqProtseqsnull3324 function RpcNetworkInqProtseqs; external rpclib name 'RpcNetworkInqProtseqs' + AWSuffix;
RpcObjectInqTypenull3325 function RpcObjectInqType; external rpclib name 'RpcObjectInqType';
RpcObjectSetInqFnnull3326 function RpcObjectSetInqFn; external rpclib name 'RpcObjectSetInqFn';
RpcObjectSetTypenull3327 function RpcObjectSetType; external rpclib name 'RpcObjectSetType';
RpcProtseqVectorFreeAnull3328 function RpcProtseqVectorFreeA; external rpclib name 'RpcProtseqVectorFreeA';
RpcProtseqVectorFreeWnull3329 function RpcProtseqVectorFreeW; external rpclib name 'RpcProtseqVectorFreeW';
RpcProtseqVectorFreenull3330 function RpcProtseqVectorFree; external rpclib name 'RpcProtseqVectorFree' + AWSuffix;
RpcServerInqBindingsnull3331 function RpcServerInqBindings; external rpclib name 'RpcServerInqBindings';
RpcServerInqIfnull3332 function RpcServerInqIf; external rpclib name 'RpcServerInqIf';
RpcServerListennull3333 function RpcServerListen; external rpclib name 'RpcServerListen';
RpcServerRegisterIfnull3334 function RpcServerRegisterIf; external rpclib name 'RpcServerRegisterIf';
RpcServerRegisterIfExnull3335 function RpcServerRegisterIfEx; external rpclib name 'RpcServerRegisterIfEx';
RpcServerRegisterIf2null3336 function RpcServerRegisterIf2; external rpclib name 'RpcServerRegisterIf2';
RpcServerUnregisterIfnull3337 function RpcServerUnregisterIf; external rpclib name 'RpcServerUnregisterIf';
RpcServerUnregisterIfExnull3338 function RpcServerUnregisterIfEx; external rpclib name 'RpcServerUnregisterIfEx';
RpcServerUseAllProtseqsnull3339 function RpcServerUseAllProtseqs; external rpclib name 'RpcServerUseAllProtseqs';
RpcServerUseAllProtseqsExnull3340 function RpcServerUseAllProtseqsEx; external rpclib name 'RpcServerUseAllProtseqsEx';
RpcServerUseAllProtseqsIfnull3341 function RpcServerUseAllProtseqsIf; external rpclib name 'RpcServerUseAllProtseqsIf';
RpcServerUseAllProtseqsIfExnull3342 function RpcServerUseAllProtseqsIfEx; external rpclib name 'RpcServerUseAllProtseqsIfEx';
RpcServerUseProtseqAnull3343 function RpcServerUseProtseqA; external rpclib name 'RpcServerUseProtseqA';
RpcServerUseProtseqWnull3344 function RpcServerUseProtseqW; external rpclib name 'RpcServerUseProtseqW';
RpcServerUseProtseqnull3345 function RpcServerUseProtseq; external rpclib name 'RpcServerUseProtseq' + AWSuffix;
RpcServerUseProtseqExAnull3346 function RpcServerUseProtseqExA; external rpclib name 'RpcServerUseProtseqExA';
RpcServerUseProtseqExWnull3347 function RpcServerUseProtseqExW; external rpclib name 'RpcServerUseProtseqExW';
RpcServerUseProtseqExnull3348 function RpcServerUseProtseqEx; external rpclib name 'RpcServerUseProtseqEx' + AWSuffix;
RpcServerUseProtseqEpAnull3349 function RpcServerUseProtseqEpA; external rpclib name 'RpcServerUseProtseqEpA';
RpcServerUseProtseqEpWnull3350 function RpcServerUseProtseqEpW; external rpclib name 'RpcServerUseProtseqEpW';
RpcServerUseProtseqEpnull3351 function RpcServerUseProtseqEp; external rpclib name 'RpcServerUseProtseqEp' + AWSuffix;
RpcServerUseProtseqEpExAnull3352 function RpcServerUseProtseqEpExA; external rpclib name 'RpcServerUseProtseqEpExA';
RpcServerUseProtseqEpExWnull3353 function RpcServerUseProtseqEpExW; external rpclib name 'RpcServerUseProtseqEpExW';
RpcServerUseProtseqEpExnull3354 function RpcServerUseProtseqEpEx; external rpclib name 'RpcServerUseProtseqEpEx' + AWSuffix;
RpcServerUseProtseqIfAnull3355 function RpcServerUseProtseqIfA; external rpclib name 'RpcServerUseProtseqIfA';
RpcServerUseProtseqIfWnull3356 function RpcServerUseProtseqIfW; external rpclib name 'RpcServerUseProtseqIfW';
RpcServerUseProtseqIfExAnull3357 function RpcServerUseProtseqIfExA; external rpclib name 'RpcServerUseProtseqIfExA';
RpcServerUseProtseqIfExWnull3358 function RpcServerUseProtseqIfExW; external rpclib name 'RpcServerUseProtseqIfExW';
RpcServerUseProtseqIfExnull3359 function RpcServerUseProtseqIfEx; external rpclib name 'RpcServerUseProtseqIfEx' + AWSuffix;
3360 procedure RpcServerYield; external rpclib name 'RpcServerYield';
RpcMgmtStatsVectorFreenull3361 function RpcMgmtStatsVectorFree; external rpclib name 'RpcMgmtStatsVectorFree';
RpcMgmtInqStatsnull3362 function RpcMgmtInqStats; external rpclib name 'RpcMgmtInqStats';
RpcMgmtIsServerListeningnull3363 function RpcMgmtIsServerListening; external rpclib name 'RpcMgmtIsServerListening';
RpcMgmtStopServerListeningnull3364 function RpcMgmtStopServerListening; external rpclib name 'RpcMgmtStopServerListening';
RpcMgmtWaitServerListennull3365 function RpcMgmtWaitServerListen; external rpclib name 'RpcMgmtWaitServerListen';
RpcMgmtSetServerStackSizenull3366 function RpcMgmtSetServerStackSize; external rpclib name 'RpcMgmtSetServerStackSize';
3367 procedure RpcSsDontSerializeContext; external rpclib name 'RpcSsDontSerializeContext';
RpcMgmtEnableIdleCleanupnull3368 function RpcMgmtEnableIdleCleanup; external rpclib name 'RpcMgmtEnableIdleCleanup';
RpcMgmtInqIfIdsnull3369 function RpcMgmtInqIfIds; external rpclib name 'RpcMgmtInqIfIds';
RpcIfIdVectorFreenull3370 function RpcIfIdVectorFree; external rpclib name 'RpcIfIdVectorFree';
RpcMgmtInqServerPrincNameAnull3371 function RpcMgmtInqServerPrincNameA; external rpclib name 'RpcMgmtInqServerPrincNameA';
RpcMgmtInqServerPrincNameWnull3372 function RpcMgmtInqServerPrincNameW; external rpclib name 'RpcMgmtInqServerPrincNameW';
RpcMgmtInqServerPrincNamenull3373 function RpcMgmtInqServerPrincName; external rpclib name 'RpcMgmtInqServerPrincName' + AWSuffix;
RpcServerInqDefaultPrincNameAnull3374 function RpcServerInqDefaultPrincNameA; external rpclib name 'RpcServerInqDefaultPrincNameA';
RpcServerInqDefaultPrincNameWnull3375 function RpcServerInqDefaultPrincNameW; external rpclib name 'RpcServerInqDefaultPrincNameW';
RpcServerInqDefaultPrincNamenull3376 function RpcServerInqDefaultPrincName; external rpclib name 'RpcServerInqDefaultPrincName' + AWSuffix;
RpcEpResolveBindingnull3377 function RpcEpResolveBinding; external rpclib name 'RpcEpResolveBinding';
RpcNsBindingInqEntryNameAnull3378 function RpcNsBindingInqEntryNameA; external rpclib name 'RpcNsBindingInqEntryNameA';
RpcNsBindingInqEntryNameWnull3379 function RpcNsBindingInqEntryNameW; external rpclib name 'RpcNsBindingInqEntryNameW';
RpcNsBindingInqEntryNamenull3380 function RpcNsBindingInqEntryName; external rpclib name 'RpcNsBindingInqEntryName' + AWSuffix;
RpcImpersonateClientnull3381 function RpcImpersonateClient; external rpclib name 'RpcImpersonateClient';
RpcRevertToSelfExnull3382 function RpcRevertToSelfEx; external rpclib name 'RpcRevertToSelfEx';
RpcRevertToSelfnull3383 function RpcRevertToSelf; external rpclib name 'RpcRevertToSelf';
RpcBindingInqAuthClientAnull3384 function RpcBindingInqAuthClientA; external rpclib name 'RpcBindingInqAuthClientA';
RpcBindingInqAuthClientWnull3385 function RpcBindingInqAuthClientW; external rpclib name 'RpcBindingInqAuthClientW';
RpcBindingInqAuthClientExAnull3386 function RpcBindingInqAuthClientExA; external rpclib name 'RpcBindingInqAuthClientExA';
RpcBindingInqAuthClientExWnull3387 function RpcBindingInqAuthClientExW; external rpclib name 'RpcBindingInqAuthClientExW';
RpcBindingInqAuthInfoAnull3388 function RpcBindingInqAuthInfoA; external rpclib name 'RpcBindingInqAuthInfoA';
RpcBindingInqAuthInfoWnull3389 function RpcBindingInqAuthInfoW; external rpclib name 'RpcBindingInqAuthInfoW';
RpcBindingSetAuthInfoAnull3390 function RpcBindingSetAuthInfoA; external rpclib name 'RpcBindingSetAuthInfoA';
RpcBindingSetAuthInfoWnull3391 function RpcBindingSetAuthInfoW; external rpclib name 'RpcBindingSetAuthInfoW';
RpcBindingSetAuthInfoExAnull3392 function RpcBindingSetAuthInfoExA; external rpclib name 'RpcBindingSetAuthInfoExA';
RpcBindingSetAuthInfoExWnull3393 function RpcBindingSetAuthInfoExW; external rpclib name 'RpcBindingSetAuthInfoExW';
RpcBindingInqAuthInfoExAnull3394 function RpcBindingInqAuthInfoExA; external rpclib name 'RpcBindingInqAuthInfoExA';
RpcBindingInqAuthInfoExWnull3395 function RpcBindingInqAuthInfoExW; external rpclib name 'RpcBindingInqAuthInfoExW';
RpcServerRegisterAuthInfoAnull3396 function RpcServerRegisterAuthInfoA; external rpclib name 'RpcServerRegisterAuthInfoA';
RpcServerRegisterAuthInfoWnull3397 function RpcServerRegisterAuthInfoW; external rpclib name 'RpcServerRegisterAuthInfoW';
RpcBindingInqAuthClientnull3398 function RpcBindingInqAuthClient; external rpclib name 'RpcBindingInqAuthClient' + AWSuffix;
RpcBindingInqAuthClientExnull3399 function RpcBindingInqAuthClientEx; external rpclib name 'RpcBindingInqAuthClientEx' + AWSuffix;
RpcBindingInqAuthInfonull3400 function RpcBindingInqAuthInfo; external rpclib name 'RpcBindingInqAuthInfo' + AWSuffix;
RpcBindingSetAuthInfonull3401 function RpcBindingSetAuthInfo; external rpclib name 'RpcBindingSetAuthInfo' + AWSuffix;
RpcBindingSetAuthInfoExnull3402 function RpcBindingSetAuthInfoEx; external rpclib name 'RpcBindingSetAuthInfoEx' + AWSuffix;
RpcBindingInqAuthInfoExnull3403 function RpcBindingInqAuthInfoEx; external rpclib name 'RpcBindingInqAuthInfoEx' + AWSuffix;
RpcServerRegisterAuthInfonull3404 function RpcServerRegisterAuthInfo; external rpclib name 'RpcServerRegisterAuthInfo' + AWSuffix;
RpcBindingServerFromClientnull3405 function RpcBindingServerFromClient; external rpclib name 'RpcBindingServerFromClient';
3406 procedure RpcRaiseException; external rpclib name 'RpcRaiseException';
RpcTestCancelnull3407 function RpcTestCancel; external rpclib name 'RpcTestCancel';
RpcServerTestCancelnull3408 function RpcServerTestCancel; external rpclib name 'RpcServerTestCancel';
RpcCancelThreadnull3409 function RpcCancelThread; external rpclib name 'RpcCancelThread';
RpcCancelThreadExnull3410 function RpcCancelThreadEx; external rpclib name 'RpcCancelThreadEx';
UuidCreatenull3411 function UuidCreate; external rpclib name 'UuidCreate';
UuidCreateSequentialnull3412 function UuidCreateSequential; external rpclib name 'UuidCreateSequential';
UuidFromStringAnull3413 function UuidFromStringA; external rpclib name 'UuidFromStringA';
UuidFromStringWnull3414 function UuidFromStringW; external rpclib name 'UuidFromStringW';
UuidFromStringnull3415 function UuidFromString; external rpclib name 'UuidFromString' + AWSuffix;
UuidToStringAnull3416 function UuidToStringA; external rpclib name 'UuidToStringA';
UuidToStringWnull3417 function UuidToStringW; external rpclib name 'UuidToStringW';
UuidToStringnull3418 function UuidToString; external rpclib name 'UuidToString' + AWSuffix;
UuidComparenull3419 function UuidCompare; external rpclib name 'UuidCompare';
UuidCreateNilnull3420 function UuidCreateNil; external rpclib name 'UuidCreateNil';
UuidEqualnull3421 function UuidEqual; external rpclib name 'UuidEqual';
UuidHashnull3422 function UuidHash; external rpclib name 'UuidHash';
UuidIsNilnull3423 function UuidIsNil; external rpclib name 'UuidIsNil';
RpcEpRegisterNoReplaceAnull3424 function RpcEpRegisterNoReplaceA; external rpclib name 'RpcEpRegisterNoReplaceA';
RpcEpRegisterNoReplaceWnull3425 function RpcEpRegisterNoReplaceW; external rpclib name 'RpcEpRegisterNoReplaceW';
RpcEpRegisterNoReplacenull3426 function RpcEpRegisterNoReplace; external rpclib name 'RpcEpRegisterNoReplace' + AWSuffix;
RpcEpRegisterAnull3427 function RpcEpRegisterA; external rpclib name 'RpcEpRegisterA';
RpcEpRegisterWnull3428 function RpcEpRegisterW; external rpclib name 'RpcEpRegisterW';
RpcEpRegisternull3429 function RpcEpRegister; external rpclib name 'RpcEpRegister' + AWSuffix;
RpcEpUnregisternull3430 function RpcEpUnregister; external rpclib name 'RpcEpUnregister';
DceErrorInqTextAnull3431 function DceErrorInqTextA; external rpclib name 'DceErrorInqTextA';
DceErrorInqTextWnull3432 function DceErrorInqTextW; external rpclib name 'DceErrorInqTextW';
DceErrorInqTextnull3433 function DceErrorInqText; external rpclib name 'DceErrorInqText' + AWSuffix;
RpcMgmtEpEltInqBeginnull3434 function RpcMgmtEpEltInqBegin; external rpclib name 'RpcMgmtEpEltInqBegin';
RpcMgmtEpEltInqDonenull3435 function RpcMgmtEpEltInqDone; external rpclib name 'RpcMgmtEpEltInqDone';
RpcMgmtEpEltInqNextAnull3436 function RpcMgmtEpEltInqNextA; external rpclib name 'RpcMgmtEpEltInqNextA';
RpcMgmtEpEltInqNextWnull3437 function RpcMgmtEpEltInqNextW; external rpclib name 'RpcMgmtEpEltInqNextW';
RpcMgmtEpEltInqNextnull3438 function RpcMgmtEpEltInqNext; external rpclib name 'RpcMgmtEpEltInqNext' + AWSuffix;
RpcMgmtEpUnregisternull3439 function RpcMgmtEpUnregister; external rpclib name 'RpcMgmtEpUnregister';
RpcMgmtSetAuthorizationFnnull3440 function RpcMgmtSetAuthorizationFn; external rpclib name 'RpcMgmtSetAuthorizationFn';
3441
3442 {$ENDIF DYNAMIC_LINK}
3443
3444 {$ENDIF JWA_INTERFACESECTION}
3445
3446
3447 {$IFNDEF JWA_OMIT_SECTIONS}
3448 end.
3449 {$ENDIF JWA_OMIT_SECTIONS}
3450