📄 jwarpcdce.pas
字号:
function RpcServerInqDefaultPrincNameA(AuthnSvc: Cardinal; var PrincName: PChar): RPC_STATUS; stdcall;
{$EXTERNALSYM RpcServerInqDefaultPrincNameA}
function RpcServerInqDefaultPrincNameW(AuthnSvc: Cardinal; var PrincName: PWideChar): RPC_STATUS; stdcall;
{$EXTERNALSYM RpcServerInqDefaultPrincNameW}
{$IFDEF UNICODE}
function RpcServerInqDefaultPrincName(AuthnSvc: Cardinal; var PrincName: PWideChar): RPC_STATUS; stdcall;
{$EXTERNALSYM RpcServerInqDefaultPrincName}
{$ELSE}
function RpcServerInqDefaultPrincName(AuthnSvc: Cardinal; var PrincName: PChar): RPC_STATUS; stdcall;
{$EXTERNALSYM RpcServerInqDefaultPrincName}
{$ENDIF}
function RpcEpResolveBinding(Binding: RPC_BINDING_HANDLE; IfSpe: RPC_IF_HANDLE): RPC_STATUS; stdcall;
{$EXTERNALSYM RpcEpResolveBinding}
function RpcNsBindingInqEntryNameA(Binding: RPC_BINDING_HANDLE;
EntryNameSyntax: Cardinal; var EntryName: PChar): RPC_STATUS; stdcall;
{$EXTERNALSYM RpcNsBindingInqEntryNameA}
function RpcNsBindingInqEntryNameW(Binding: RPC_BINDING_HANDLE;
EntryNameSyntax: Cardinal; var EntryName: PWideChar): RPC_STATUS; stdcall;
{$EXTERNALSYM RpcNsBindingInqEntryNameW}
{$IFDEF UNICODE}
function RpcNsBindingInqEntryName(Binding: RPC_BINDING_HANDLE;
EntryNameSyntax: Cardinal; var EntryName: PWideChar): RPC_STATUS; stdcall;
{$EXTERNALSYM RpcNsBindingInqEntryName}
{$ELSE}
function RpcNsBindingInqEntryName(Binding: RPC_BINDING_HANDLE;
EntryNameSyntax: Cardinal; var EntryName: PChar): RPC_STATUS; stdcall;
{$EXTERNALSYM RpcNsBindingInqEntryName}
{$ENDIF}
type
RPC_AUTH_IDENTITY_HANDLE = Pointer;
{$EXTERNALSYM RPC_AUTH_IDENTITY_HANDLE}
RPC_AUTHZ_HANDLE = Pointer;
{$EXTERNALSYM RPC_AUTHZ_HANDLE}
PRPC_AUTHZ_HANDLE = ^RPC_AUTHZ_HANDLE;
{$NODEFINE PRPC_AUTHZ_HANDLE}
PRPC_AUTH_IDENTITY_HANDLE = ^RPC_AUTH_IDENTITY_HANDLE;
{$NODEFINE PRPC_AUTH_IDENTITY_HANDLE}
const
RPC_C_AUTHN_LEVEL_DEFAULT = 0;
{$EXTERNALSYM RPC_C_AUTHN_LEVEL_DEFAULT}
RPC_C_AUTHN_LEVEL_NONE = 1;
{$EXTERNALSYM RPC_C_AUTHN_LEVEL_NONE}
RPC_C_AUTHN_LEVEL_CONNECT = 2;
{$EXTERNALSYM RPC_C_AUTHN_LEVEL_CONNECT}
RPC_C_AUTHN_LEVEL_CALL = 3;
{$EXTERNALSYM RPC_C_AUTHN_LEVEL_CALL}
RPC_C_AUTHN_LEVEL_PKT = 4;
{$EXTERNALSYM RPC_C_AUTHN_LEVEL_PKT}
RPC_C_AUTHN_LEVEL_PKT_INTEGRITY = 5;
{$EXTERNALSYM RPC_C_AUTHN_LEVEL_PKT_INTEGRITY}
RPC_C_AUTHN_LEVEL_PKT_PRIVACY = 6;
{$EXTERNALSYM RPC_C_AUTHN_LEVEL_PKT_PRIVACY}
RPC_C_IMP_LEVEL_DEFAULT = 0;
{$EXTERNALSYM RPC_C_IMP_LEVEL_DEFAULT}
RPC_C_IMP_LEVEL_ANONYMOUS = 1;
{$EXTERNALSYM RPC_C_IMP_LEVEL_ANONYMOUS}
RPC_C_IMP_LEVEL_IDENTIFY = 2;
{$EXTERNALSYM RPC_C_IMP_LEVEL_IDENTIFY}
RPC_C_IMP_LEVEL_IMPERSONATE = 3;
{$EXTERNALSYM RPC_C_IMP_LEVEL_IMPERSONATE}
RPC_C_IMP_LEVEL_DELEGATE = 4;
{$EXTERNALSYM RPC_C_IMP_LEVEL_DELEGATE}
RPC_C_QOS_IDENTITY_STATIC = 0;
{$EXTERNALSYM RPC_C_QOS_IDENTITY_STATIC}
RPC_C_QOS_IDENTITY_DYNAMIC = 1;
{$EXTERNALSYM RPC_C_QOS_IDENTITY_DYNAMIC}
RPC_C_QOS_CAPABILITIES_DEFAULT = $0;
{$EXTERNALSYM RPC_C_QOS_CAPABILITIES_DEFAULT}
RPC_C_QOS_CAPABILITIES_MUTUAL_AUTH = $1;
{$EXTERNALSYM RPC_C_QOS_CAPABILITIES_MUTUAL_AUTH}
RPC_C_QOS_CAPABILITIES_MAKE_FULLSIC = $2;
{$EXTERNALSYM RPC_C_QOS_CAPABILITIES_MAKE_FULLSIC}
RPC_C_QOS_CAPABILITIES_ANY_AUTHORITY = $4;
{$EXTERNALSYM RPC_C_QOS_CAPABILITIES_ANY_AUTHORITY}
RPC_C_QOS_CAPABILITIES_IGNORE_DELEGATE_FAILURE = $8;
{$EXTERNALSYM RPC_C_QOS_CAPABILITIES_IGNORE_DELEGATE_FAILURE}
RPC_C_QOS_CAPABILITIES_LOCAL_MA_HINT = $10;
{$EXTERNALSYM RPC_C_QOS_CAPABILITIES_LOCAL_MA_HINT}
RPC_C_PROTECT_LEVEL_DEFAULT = (RPC_C_AUTHN_LEVEL_DEFAULT);
{$EXTERNALSYM RPC_C_PROTECT_LEVEL_DEFAULT}
RPC_C_PROTECT_LEVEL_NONE = (RPC_C_AUTHN_LEVEL_NONE);
{$EXTERNALSYM RPC_C_PROTECT_LEVEL_NONE}
RPC_C_PROTECT_LEVEL_CONNECT = (RPC_C_AUTHN_LEVEL_CONNECT);
{$EXTERNALSYM RPC_C_PROTECT_LEVEL_CONNECT}
RPC_C_PROTECT_LEVEL_CALL = (RPC_C_AUTHN_LEVEL_CALL);
{$EXTERNALSYM RPC_C_PROTECT_LEVEL_CALL}
RPC_C_PROTECT_LEVEL_PKT = (RPC_C_AUTHN_LEVEL_PKT);
{$EXTERNALSYM RPC_C_PROTECT_LEVEL_PKT}
RPC_C_PROTECT_LEVEL_PKT_INTEGRITY = (RPC_C_AUTHN_LEVEL_PKT_INTEGRITY);
{$EXTERNALSYM RPC_C_PROTECT_LEVEL_PKT_INTEGRITY}
RPC_C_PROTECT_LEVEL_PKT_PRIVACY = (RPC_C_AUTHN_LEVEL_PKT_PRIVACY);
{$EXTERNALSYM RPC_C_PROTECT_LEVEL_PKT_PRIVACY}
RPC_C_AUTHN_NONE = 0;
{$EXTERNALSYM RPC_C_AUTHN_NONE}
RPC_C_AUTHN_DCE_PRIVATE = 1;
{$EXTERNALSYM RPC_C_AUTHN_DCE_PRIVATE}
RPC_C_AUTHN_DCE_PUBLIC = 2;
{$EXTERNALSYM RPC_C_AUTHN_DCE_PUBLIC}
RPC_C_AUTHN_DEC_PUBLIC = 4;
{$EXTERNALSYM RPC_C_AUTHN_DEC_PUBLIC}
RPC_C_AUTHN_GSS_NEGOTIATE = 9;
{$EXTERNALSYM RPC_C_AUTHN_GSS_NEGOTIATE}
RPC_C_AUTHN_WINNT = 10;
{$EXTERNALSYM RPC_C_AUTHN_WINNT}
RPC_C_AUTHN_GSS_SCHANNEL = 14;
{$EXTERNALSYM RPC_C_AUTHN_GSS_SCHANNEL}
RPC_C_AUTHN_GSS_KERBEROS = 16;
{$EXTERNALSYM RPC_C_AUTHN_GSS_KERBEROS}
RPC_C_AUTHN_DPA = 17;
{$EXTERNALSYM RPC_C_AUTHN_DPA}
RPC_C_AUTHN_MSN = 18;
{$EXTERNALSYM RPC_C_AUTHN_MSN}
RPC_C_AUTHN_DIGEST = 21;
{$EXTERNALSYM RPC_C_AUTHN_DIGEST}
RPC_C_AUTHN_MQ = 100;
{$EXTERNALSYM RPC_C_AUTHN_MQ}
RPC_C_AUTHN_DEFAULT = DWORD($FFFFFFFF);
{$EXTERNALSYM RPC_C_AUTHN_DEFAULT}
RPC_C_NO_CREDENTIALS = RPC_AUTH_IDENTITY_HANDLE(MAXUINT_PTR);
{$EXTERNALSYM RPC_C_NO_CREDENTIALS}
RPC_C_SECURITY_QOS_VERSION = 1;
{$EXTERNALSYM RPC_C_SECURITY_QOS_VERSION}
RPC_C_SECURITY_QOS_VERSION_1 = 1;
{$EXTERNALSYM RPC_C_SECURITY_QOS_VERSION_1}
type
_RPC_SECURITY_QOS = record
Version: Longint;
Capabilities: Longint;
IdentityTracking: Longint;
ImpersonationType: Longint;
end;
{$EXTERNALSYM _RPC_SECURITY_QOS}
RPC_SECURITY_QOS = _RPC_SECURITY_QOS;
{$EXTERNALSYM RPC_SECURITY_QOS}
PRPC_SECURITY_QOS = ^RPC_SECURITY_QOS;
{$EXTERNALSYM PRPC_SECURITY_QOS}
TRpcSecurityQos = RPC_SECURITY_QOS;
PRpcSecurityQos = PRPC_SECURITY_QOS;
const
SEC_WINNT_AUTH_IDENTITY_ANSI = $1;
{$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY_ANSI}
SEC_WINNT_AUTH_IDENTITY_UNICODE = $2;
{$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY_UNICODE}
type
_SEC_WINNT_AUTH_IDENTITY_W = record
User: PWideChar;
UserLength: Longint;
Domain: PWideChar;
DomainLength: Longint;
Password: PWideChar;
PasswordLength: Longint;
Flags: Longint;
end;
{$EXTERNALSYM _SEC_WINNT_AUTH_IDENTITY_W}
SEC_WINNT_AUTH_IDENTITY_W = _SEC_WINNT_AUTH_IDENTITY_W;
{$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY_W}
PSEC_WINNT_AUTH_IDENTITY_W = ^SEC_WINNT_AUTH_IDENTITY_W;
{$EXTERNALSYM PSEC_WINNT_AUTH_IDENTITY_W}
TSecWinNTAuthIdentityW = SEC_WINNT_AUTH_IDENTITY_W;
PSecWinNTAuthIdentityW = PSEC_WINNT_AUTH_IDENTITY_W;
_SEC_WINNT_AUTH_IDENTITY_A = record
User: PChar;
UserLength: Longint;
Domain: PChar;
DomainLength: Longint;
Password: PChar;
PasswordLength: Longint;
Flags: Longint;
end;
{$EXTERNALSYM _SEC_WINNT_AUTH_IDENTITY_A}
SEC_WINNT_AUTH_IDENTITY_A = _SEC_WINNT_AUTH_IDENTITY_A;
{$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY_A}
PSEC_WINNT_AUTH_IDENTITY_A = ^SEC_WINNT_AUTH_IDENTITY_A;
{$EXTERNALSYM PSEC_WINNT_AUTH_IDENTITY_A}
TSecWinNTAuthIdentityA = SEC_WINNT_AUTH_IDENTITY_A;
PSecWinNTAuthIdentityA = PSEC_WINNT_AUTH_IDENTITY_A;
{$IFDEF UNICODE}
SEC_WINNT_AUTH_IDENTITY = SEC_WINNT_AUTH_IDENTITY_W;
{$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY}
PSEC_WINNT_AUTH_IDENTITY = PSEC_WINNT_AUTH_IDENTITY_W;
{$EXTERNALSYM PSEC_WINNT_AUTH_IDENTITY}
_SEC_WINNT_AUTH_IDENTITY = _SEC_WINNT_AUTH_IDENTITY_W;
{$EXTERNALSYM _SEC_WINNT_AUTH_IDENTITY}
TSecWinNTAuthIdentity = TSecWinNTAuthIdentityW;
PSecWinNTAuthIdentity = PSecWinNTAuthIdentityW;
{$ELSE}
SEC_WINNT_AUTH_IDENTITY = SEC_WINNT_AUTH_IDENTITY_A;
{$EXTERNALSYM SEC_WINNT_AUTH_IDENTITY}
PSEC_WINNT_AUTH_IDENTITY = PSEC_WINNT_AUTH_IDENTITY_A;
{$EXTERNALSYM PSEC_WINNT_AUTH_IDENTITY}
_SEC_WINNT_AUTH_IDENTITY = _SEC_WINNT_AUTH_IDENTITY_A;
{$EXTERNALSYM _SEC_WINNT_AUTH_IDENTITY}
TSecWinNTAuthIdentity = TSecWinNTAuthIdentityA;
PSecWinNTAuthIdentity = PSecWinNTAuthIdentityA;
{$ENDIF}
const
RPC_C_SECURITY_QOS_VERSION_2 = 2;
{$EXTERNALSYM RPC_C_SECURITY_QOS_VERSION_2}
RPC_C_AUTHN_INFO_TYPE_HTTP = 1;
{$EXTERNALSYM RPC_C_AUTHN_INFO_TYPE_HTTP}
RPC_C_HTTP_AUTHN_TARGET_SERVER = 1;
{$EXTERNALSYM RPC_C_HTTP_AUTHN_TARGET_SERVER}
RPC_C_HTTP_AUTHN_TARGET_PROXY = 2;
{$EXTERNALSYM RPC_C_HTTP_AUTHN_TARGET_PROXY}
RPC_C_HTTP_AUTHN_SCHEME_BASIC = $00000001;
{$EXTERNALSYM RPC_C_HTTP_AUTHN_SCHEME_BASIC}
RPC_C_HTTP_AUTHN_SCHEME_NTLM = $00000002;
{$EXTERNALSYM RPC_C_HTTP_AUTHN_SCHEME_NTLM}
RPC_C_HTTP_AUTHN_SCHEME_PASSPORT = $00000004;
{$EXTERNALSYM RPC_C_HTTP_AUTHN_SCHEME_PASSPORT}
RPC_C_HTTP_AUTHN_SCHEME_DIGEST = $00000008;
{$EXTERNALSYM RPC_C_HTTP_AUTHN_SCHEME_DIGEST}
RPC_C_HTTP_AUTHN_SCHEME_NEGOTIATE = $00000010;
{$EXTERNALSYM RPC_C_HTTP_AUTHN_SCHEME_NEGOTIATE}
RPC_C_HTTP_FLAG_USE_SSL = 1;
{$EXTERNALSYM RPC_C_HTTP_FLAG_USE_SSL}
RPC_C_HTTP_FLAG_USE_FIRST_AUTH_SCHEME = 2;
{$EXTERNALSYM RPC_C_HTTP_FLAG_USE_FIRST_AUTH_SCHEME}
type
_RPC_HTTP_TRANSPORT_CREDENTIALS_W = record
TransportCredentials: PSEC_WINNT_AUTH_IDENTITY_W;
Flags: Cardinal;
AuthenticationTarget: Cardinal;
NumberOfAuthnSchemes: Cardinal;
AuthnSchemes: PCardinal;
ServerCertificateSubject: PWord;
end;
{$EXTERNALSYM RPC_HTTP_TRANSPORT_CREDENTIALS_W}
RPC_HTTP_TRANSPORT_CREDENTIALS_W = _RPC_HTTP_TRANSPORT_CREDENTIALS_W;
{$EXTERNALSYM RPC_HTTP_TRANSPORT_CREDENTIALS_W}
PRPC_HTTP_TRANSPORT_CREDENTIALS_W = ^RPC_HTTP_TRANSPORT_CREDENTIALS_W;
{$EXTERNALSYM PRPC_HTTP_TRANSPORT_CREDENTIALS_W}
TRpcHttpTransportCredentialsW = RPC_HTTP_TRANSPORT_CREDENTIALS_W;
PRpcHttpTransportCredentialsW = PRPC_HTTP_TRANSPORT_CREDENTIALS_W;
_RPC_HTTP_TRANSPORT_CREDENTIALS_A = record
TransportCredentials: PSEC_WINNT_AUTH_IDENTITY_A;
Flags: Cardinal;
AuthenticationTarget: Cardinal;
NumberOfAuthnSchemes: Cardinal;
AuthnSchemes: PCardinal;
ServerCertificateSubject: PByte;
end;
{$EXTERNALSYM RPC_HTTP_TRANSPORT_CREDENTIALS_A}
RPC_HTTP_TRANSPORT_CREDENTIALS_A = _RPC_HTTP_TRANSPORT_CREDENTIALS_A;
{$EXTERNALSYM RPC_HTTP_TRANSPORT_CREDENTIALS_A}
PRPC_HTTP_TRANSPORT_CREDENTIALS_A = ^RPC_HTTP_TRANSPORT_CREDENTIALS_A;
{$EXTERNALSYM PRPC_HTTP_TRANSPORT_CREDENTIALS_A}
TRpcHttpTransportCredentialsA = RPC_HTTP_TRANSPORT_CREDENTIALS_A;
PRpcHttpTransportCredentialsA = PRPC_HTTP_TRANSPORT_CREDENTIALS_A;
_RPC_SECURITY_QOS_V2_W = record
Version: Cardinal;
Capabilities: Cardinal;
IdentityTracking: Cardinal;
ImpersonationType: Cardinal;
AdditionalSecurityInfoType: Cardinal;
case Integer of
0: (HttpCredentials: PRPC_HTTP_TRANSPORT_CREDENTIALS_W);
end;
{$EXTERNALSYM _RPC_SECURITY_QOS_V2_W}
RPC_SECURITY_QOS_V2_W = _RPC_SECURITY_QOS_V2_W;
{$EXTERNALSYM RPC_SECURITY_QOS_V2_W}
PRPC_SECURITY_QOS_V2_W = ^RPC_SECURITY_QOS_V2_W;
{$EXTERNALSYM PRPC_SECURITY_QOS_V2_W}
TRpcSecurityQosV2W = RPC_SECURITY_QOS_V2_W;
PRpcSecurityQosV2W = PRPC_SECURITY_QOS_V2_W;
_RPC_SECURITY_QOS_V2_A = record
Version: Cardinal;
Capabilities: Cardinal;
IdentityTracking: Cardinal;
ImpersonationType: Cardinal;
AdditionalSecurityInfoType: Cardinal;
case Integer of
0: (HttpCredentials: PRPC_HTTP_TRANSPORT_CREDENTIALS_A);
end;
{$EXTERNALSYM _RPC_SECURITY_QOS_V2_A}
RPC_SECURITY_QOS_V2_A = _RPC_SECURITY_QOS_V2_A;
{$EXTERNALSYM RPC_SECURITY_QOS_V2_A}
PRPC_SECURITY_QOS_V2_A = ^RPC_SECURITY_QOS_V2_A;
{$EXTERNALSYM PRPC_SECURITY_QOS_V2_A}
TRpcSecurityQosV2A = RPC_SECURITY_QOS_V2_A;
PRpcSecurityQosV2A = PRPC_SECURITY_QOS_V2_A;
const
RPC_C_SECURITY_QOS_VERSION_3 = 3;
{$EXTERNALSYM RPC_C_SECURITY_QOS_VERSION_3}
type
_RPC_SECURITY_QOS_V3_W = record
Version: Cardinal;
Capabilities: Cardinal;
IdentityTracking: Cardinal;
ImpersonationType: Cardinal;
AdditionalSecurityInfoType: Cardinal;
u: record
case Integer of
0: (HttpCredentials: PRPC_HTTP_TRANSPORT_CREDENTIALS_W);
end;
Sid: Pointer;
end;
{$EXTERNALSYM _RPC_SECURITY_QOS_V3_W}
RPC_SECURITY_QOS_V3_W = _RPC_SECURITY_QOS_V3_W;
{$EXTERNALSYM RPC_SECURITY_QOS_V3_W}
PRPC_SECURITY_QOS_V3_W = ^RPC_SECURITY_QOS_V3_W;
{$EXTERNALSYM PRPC_SECURITY_QOS_V3_W}
TRpcSecurityQosV3W = RPC_SECURITY_QOS_V3_W;
PRpcSecurityQosV3W = PRPC_SECURITY_QOS_V3_W;
_RPC_SECURITY_QOS_V3_A = record
Version: Cardinal;
Capabilities: Cardinal;
IdentityTracking: Cardinal;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -