' ########################################################################################
' Microsoft Windows
' File: WbemTran.inc
' Copyright (c) 2011 Jos? Roca
' Portions Copyright (c) Microsoft Corporation.
' All Rights Reserved.
' THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER
' EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF
' MERCHANTABILITY AND/OR FITNESS FOR A PARTICULAR PURPOSE.
' ########################################################################################
' ########################################################################################
' Library name: WbemTransports_v1
' Version: 0.0, Locale ID = 0
' Library GUID: {027947F3-D731-11CE-A357-000000000001}
' ########################################################################################
#IF NOT %DEF(PBX_WbemTran_PBI)
#DEFINE PBX_WbemTran_PBI
%EQUATE `WBEMTRAN_INC = 1
'/* header files for imported files */
#INCLUDE ONCE "Legacy/COM/ObjIdl.inc"
#INCLUDE ONCE "Legacy/COM/OleIdl.inc"
#INCLUDE ONCE "Legacy/COM/OAIdl.inc"
#INCLUDE ONCE "Legacy/System/WbemCli.inc"
'/*******************************************************************************/
'/* */
'/* Copyright (c) Microsoft Corporation. All rights reserved. */
'/* */
'/* This IDL file contains interfaces needed only by implementors of custom */
'/* transports and custom security systems. These interfaces are not needed */
'/* for either client or provider access to CIMOM. */
'/* */
'/* See WBEMCLI.IDL for client interfaces, and WBEMPROV.IDL for provider */
'/* extensions */
'/* */
'/*******************************************************************************/
$LIBID_WbemTransports_v1 = GUID$("{027947F3-D731-11CE-A357-000000000001}")
#IF NOT %DEF(%WbemTransports_v1_LIBRARY_DEFINED)
 %WbemTransports_v1_LIBRARY_DEFINED = 1
$CLSID_WbemDCOMTransport = GUID$("{F7CE2E13-8C90-11D1-9E7B-00C04FC324A8}")
$CLSID_WbemLevel1Login = GUID$("{8BC3F05E-D86B-11D0-A075-00C04FB68820}")
$CLSID_WbemLocalAddrRes = GUID$("{A1044801-8F7E-11D1-9E7C-00C04FC324A8}")
$CLSID_WbemUninitializedClassObject = GUID$("{7A0227F6-7108-11D1-AD90-00C04FD8FDFF}")
' enum WBEM_LOGIN_TYPE
%EQUATE `WBEM_FLAG_INPROC_LOGIN = 0
%EQUATE `WBEM_FLAG_LOCAL_LOGIN = 1
%EQUATE `WBEM_FLAG_REMOTE_LOGIN = 2
%EQUATE `WBEM_AUTHENTICATION_METHOD_MASK = &Hf
%EQUATE `WBEM_FLAG_USE_MULTIPLE_CHALLENGES = &H10
'typedef /* [length_is][size_is] */ BYTE *WBEM_128BITS;
' ########################################################################################
' Interface name = IWbemTransport
' IID = {553FE584-2156-11D0-B6AE-00AA003240C7}
' Attributes = 512 [&H200] [Restricted]
' Inherited interface = IUnknown
' ########################################################################################
#IF NOT %DEF(%IWbemTransport_INTERFACE_DEFINED)
 %IWbemTransport_INTERFACE_DEFINED = 1
$IID_IWbemTransport = GUID$("{553FE584-2156-11D0-B6AE-00AA003240C7}")
INTERFACE IWbemTransport $IID_IWbemTransport
 INHERIT IUnknown
 ' =====================================================================================
 METHOD Initialize ( ' VTable offset = 12
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __IWbemTransport_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = IWbemLevel1Login
' IID = {F309AD18-D86A-11D0-A075-00C04FB68820}
' Attributes = 512 [&H200] [Restricted]
' Inherited interface = IUnknown
' ########################################################################################
#IF NOT %DEF(%IWbemLevel1Login_INTERFACE_DEFINED)
 %IWbemLevel1Login_INTERFACE_DEFINED = 1
$IID_IWbemLevel1Login = GUID$("{F309AD18-D86A-11D0-A075-00C04FB68820}")
INTERFACE IWbemLevel1Login $IID_IWbemLevel1Login
 INHERIT IUnknown
 ' =====================================================================================
 METHOD EstablishPosition ( ' VTable offset = 12
 BYREF wszLocaleList AS WSTRINGZ
 , BYVAL dwNumLocales AS DWORD
 , BYREF reserved AS DWORD
 ) AS LONG
 ' =====================================================================================
 METHOD RequestChallenge ( ' VTable offset = 16
 BYREF wszNetworkResource AS WSTRINGZ
 , BYREF wszUser AS WSTRINGZ
 , BYREF Nonce AS BYTE
 ) AS LONG
 ' =====================================================================================
 METHOD WBEMLogin ( ' VTable offset = 20
 BYREF wszPreferredLocale AS WSTRINGZ
 , BYREF AccessToken AS BYTE
 , BYVAL lFlags AS LONG
 , BYVAL pCtx AS IWbemContext
 , BYREF ppNamespace AS IWbemServices
 ) AS LONG
 ' =====================================================================================
 METHOD NTLMLogin ( ' VTable offset = 24
 BYREF wszNetworkResource AS WSTRINGZ
 , BYREF wszPreferredLocale AS WSTRINGZ
 , BYVAL lFlags AS LONG
 , BYVAL pCtx AS IWbemContext
 , BYREF ppNamespace AS IWbemServices
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __IWbemLevel1Login_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = IWbemConnectorLogin
' IID = {D8EC9CB1-B135-4F10-8B1B-C7188BB0D186}
' Attributes = 512 [&H200] [Restricted]
' Inherited interface = IUnknown
' ########################################################################################
#IF NOT %DEF(%IWbemConnectorLogin_INTERFACE_DEFINED)
 %IWbemConnectorLogin_INTERFACE_DEFINED = 1
$IID_IWbemConnectorLogin = GUID$("{D8EC9CB1-B135-4F10-8B1B-C7188BB0D186}")
INTERFACE IWbemConnectorLogin $IID_IWbemConnectorLogin
 INHERIT IUnknown
 ' =====================================================================================
 METHOD ConnectorLogin ( ' VTable offset = 12
 BYREF wszNetworkResource AS WSTRINGZ
 , BYREF wszPreferredLocale AS WSTRINGZ
 , BYVAL lFlags AS LONG
 , BYVAL pCtx AS IWbemContext
 , BYREF riid AS GUID
 , BYREF pInterface AS DWORD
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __IWbemConnectorLogin_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = IWbemAddressResolution
' IID = {F7CE2E12-8C90-11D1-9E7B-00C04FC324A8}
' Attributes = 512 [&H200] [Restricted]
' Inherited interface = IUnknown
' ########################################################################################
#IF NOT %DEF(%IWbemAddressResolution_INTERFACE_DEFINED)
 %IWbemAddressResolution_INTERFACE_DEFINED = 1
$IID_IWbemAddressResolution = GUID$("{F7CE2E12-8C90-11D1-9E7B-00C04FC324A8}")
INTERFACE IWbemAddressResolution $IID_IWbemAddressResolution
 INHERIT IUnknown
 ' =====================================================================================
 METHOD Resolve ( ' VTable offset = 12
 BYREF wszNamespacePath AS WSTRINGZ
 , BYREF wszAddressType AS WSTRINGZ
 , BYREF pdwAddressLength AS DWORD
 , BYREF pabBinaryAddress AS DWORD
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __IWbemAddressResolution_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = IWbemClientTransport
' IID = {F7CE2E11-8C90-11D1-9E7B-00C04FC324A8}
' Attributes = 512 [&H200] [Restricted]
' Inherited interface = IUnknown
' ########################################################################################
#IF NOT %DEF(%IWbemClientTransport_INTERFACE_DEFINED)
 %IWbemClientTransport_INTERFACE_DEFINED = 1
$IID_IWbemClientTransport = GUID$("{F7CE2E11-8C90-11D1-9E7B-00C04FC324A8}")
INTERFACE IWbemClientTransport $IID_IWbemClientTransport
 INHERIT IUnknown
 ' =====================================================================================
 METHOD ConnectServer ( ' VTable offset = 12
 BYVAL strAddressType AS WSTRING
 , BYVAL dwBinaryAddressLength AS DWORD
 , BYREF abBinaryAddress AS BYTE
 , BYVAL strNetworkResource AS WSTRING
 , BYVAL strUser AS WSTRING
 , BYVAL strPassword AS WSTRING
 , BYVAL strLocale AS WSTRING
 , BYVAL lSecurityFlags AS LONG
 , BYVAL strAuthority AS WSTRING
 , BYVAL pCtx AS IWbemContext
 , BYREF ppNamespace AS IWbemServices
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __IWbemClientTransport_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = IWbemClientConnectionTransport
' IID = {A889C72A-FCC1-4A9E-AF61-ED071333FB5B}
' Attributes = 512 [&H200] [Restricted]
' Inherited interface = IUnknown
' ########################################################################################
#IF NOT %DEF(%IWbemClientConnectionTransport_INTERFACE_DEFINED)
 %IWbemClientConnectionTransport_INTERFACE_DEFINED = 1
$IID_IWbemClientConnectionTransport = GUID$("{A889C72A-FCC1-4A9E-AF61-ED071333FB5B}")
INTERFACE IWbemClientConnectionTransport $IID_IWbemClientConnectionTransport
 INHERIT IUnknown
 ' =====================================================================================
 METHOD Open ( ' VTable offset = 12
 BYVAL strAddressType AS WSTRING
 , BYVAL dwBinaryAddressLength AS DWORD
 , BYREF abBinaryAddress AS BYTE
 , BYVAL strObject AS WSTRING
 , BYVAL strUser AS WSTRING
 , BYVAL strPassword AS WSTRING
 , BYVAL strLocale AS WSTRING
 , BYVAL lFlags AS LONG
 , BYVAL pCtx AS IWbemContext
 , BYREF riid AS GUID
 , BYREF pInterface AS DWORD
 , BYREF pCallRes AS IWbemCallResult
 ) AS LONG
 ' =====================================================================================
 METHOD OpenAsync ( ' VTable offset = 16
 BYVAL strAddressType AS WSTRING
 , BYVAL dwBinaryAddressLength AS DWORD
 , BYREF abBinaryAddress AS BYTE
 , BYVAL strObject AS WSTRING
 , BYVAL strUser AS WSTRING
 , BYVAL strPassword AS WSTRING
 , BYVAL strLocale AS WSTRING
 , BYVAL lFlags AS LONG
 , BYVAL pCtx AS IWbemContext
 , BYREF riid AS GUID
 , BYVAL pResponseHandler AS IWbemObjectSink
 ) AS LONG
 ' =====================================================================================
 METHOD Cancel ( ' VTable offset = 20
 BYVAL lFlags AS LONG
 , BYVAL pHandler AS IWbemObjectSink
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __IWbemClientConnectionTransport_INTERFACE_DEFINED__ */
#ENDIF ' #IF NOT %DEF(%WbemTransports_v1_LIBRARY_DEFINED)
' ########################################################################################
' Interface name = IWbemConstructClassObject
' IID = {9EF76194-70D5-11D1-AD90-00C04FD8FDFF}
' Attributes = 512 [&H200] [Restricted]
' Inherited interface = IUnknown
' ########################################################################################
#IF NOT %DEF(%IWbemConstructClassObject_INTERFACE_DEFINED)
 %IWbemConstructClassObject_INTERFACE_DEFINED = 1
$IID_IWbemConstructClassObject = GUID$("{9EF76194-70D5-11D1-AD90-00C04FD8FDFF}")
INTERFACE IWbemConstructClassObject $IID_IWbemConstructClassObject
 INHERIT IUnknown
 ' =====================================================================================
 METHOD SetInheritanceChain ( ' VTable offset = 12
 BYVAL lNumAntecedents AS LONG
 , BYREF awszAntecedents AS DWORD
 ) AS LONG
 ' =====================================================================================
 METHOD SetPropertyOrigin ( ' VTable offset = 16
 BYREF wszPropertyName AS WSTRINGZ
 , BYVAL lOriginIndex AS LONG
 ) AS LONG
 ' =====================================================================================
 METHOD SetMethodOrigin ( ' VTable offset = 20
 BYREF wszMethodName AS WSTRINGZ
 , BYVAL lOriginIndex AS LONG
 ) AS LONG
 ' =====================================================================================
 METHOD SetServerNamespace ( ' VTable offset = 24
 BYREF wszServer AS WSTRINGZ
 , BYREF wszNamespace AS WSTRINGZ
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __IWbemConstructClassObject_INTERFACE_DEFINED__ */
#ENDIF
