Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

1352 lines
40 KiB

/*****************************************************************************
*
* DInput.c
*
* Copyright (c) 1996 Microsoft Corporation. All Rights Reserved.
*
* Abstract:
*
*
*
* Contents:
*
* DirectInputCreateA()
* DirectInputCreateW()
*
*****************************************************************************/
#include "dinputpr.h"
/*****************************************************************************
*
* The sqiffle for this file.
*
*****************************************************************************/
#define sqfl sqflDll
/***************************************************************************
*
* @doc INTERNAL
*
* @topic The DirectInput synchronization hierarchy |
*
* Extreme caution must be exercised to ensure that the synchronization
* hierarchy is preserved. Failure to observe these rules will result
* in a deadlock.
*
* @ex
*
* In the following list, locks must be taken in the order specified.
* Furthermore, the Dll critical section and the cross-process mutexes
* may never be taken simultaneously. (They should be considered
* to be at the bottom of the hierarchy.)
*
* |
*
* DirectInputEffect
* DirectInputDevice
* Dll critical section
* The cross-process global mutex
* The cross-process joystick mutex
*
***************************************************************************/
/*****************************************************************************
*
* @doc INTERNAL
*
* @global DWORD | g_cRef |
*
* DLL reference count.
*
* @global HINSTANCE | g_hinst |
*
* DLL instance handle.
*
* @global LONG | g_lLoadLibrary |
*
* Number of times we have been artificially <f LoadLibrary>'d
* to prevent ourselves from being unloaded by a non-OLE
* application. Actually, it's the number of times minus one,
* so we can use the interlocked functions to tell whether
* the first <f LoadLibrary> is happening or the last
* <f FreeLibrary> is happening.
*
* We perform a physical <f LoadLibrary> or <f FreeLibrary>
* only on the transition, so as to avoid overflowing the
* counter in KERNEL32.
*
* @global HANDLE | g_hVxD |
*
* Handle to VxD, if available. Win9x only!
*
* @global OPENVXDHANDLE | OpenVxDHandle |
*
* Address of Win9x-only KERNEL32 entry point to convert
* a process handle into a VxD handle. Win9x only!
*
* @global CRITICAL_SECTION | g_crstDll |
*
* Per-process critical section to protect process-global
* variables.
*
* @global DWORD | g_flEmulation |
*
* Flags that describe what levels of forced emulation are
* active.
*
* @global HHOOK | g_hhkLLHookCheck |
*
* Used only temporarily to test whether low-level hooks
* are supported on the system.
*
* @global HANDLE | g_hmtxGlobal |
*
* System-global mutex that protects shared memory blocks
* which describe device exclusive acquisition information.
*
* @global HANDLE | g_hfm |
*
* Handle to the file mapping that describes the shared
* memory block. NT requires us to keep the handle open
* so that the associated name remains in the namespace.
*
* @global PSHAREDOBJECTPAGE | g_psop |
*
* Pointer to the shared memory block itself.
*
* @global HANDLE | g_hmtxJoy |
*
* System-global mutex that protects shared memory blocks
* which describe joystick effects.
*
* @global UINT | g_wmJoyChanged |
*
* Registered window message which is broadcast when joysticks
* are reconfigured.
*
* @global LONG | g_lWheelGranularity |
*
* The wheel granularity. One hardware "click" of the mouse
* wheel results in this much reported motion.
*
*****************************************************************************/
DWORD g_cRef;
HINSTANCE g_hinst;
LONG g_lLoadLibrary = -1;
#ifndef WINNT
HANDLE g_hVxD = INVALID_HANDLE_VALUE;
OPENVXDHANDLE _OpenVxDHandle;
#endif
CRITICAL_SECTION g_crstDll;
DWORD g_flEmulation;
LPDWORD g_pdwSequence;
#ifdef USE_SLOW_LL_HOOKS
HHOOK g_hhkLLHookCheck;
#endif
HANDLE g_hmtxGlobal;
HANDLE g_hfm;
struct SHAREDOBJECTPAGE *g_psop;
HANDLE g_hmtxJoy;
UINT g_wmJoyChanged;
HINSTANCE g_hinstRPCRT4;
LONG g_lWheelGranularity;
BOOL fWinnt; //whether we are running in Winnt
BOOL g_fCritInited;
#ifdef WORKER_THREAD
MSGWAITFORMULTIPLEOBJECTSEX _MsgWaitForMultipleObjectsEx =
FakeMsgWaitForMultipleObjectsEx;
#endif
CANCELIO _CancelIO = FakeCancelIO;
#ifdef XDEBUG
TRYENTERCRITICALSECTION _TryEnterCritSec = FakeTryEnterCriticalSection;
int g_cCrit = -1;
UINT g_thidCrit;
HANDLE g_thhandleCrit;
#endif
#ifdef DEBUG
TCHAR g_tszLogFile[MAX_PATH];
#endif
BOOL g_fRawInput;
#ifdef USE_WM_INPUT
HWND g_hwndThread;
HANDLE g_hEventAcquire;
HANDLE g_hEventThread;
HANDLE g_hEventHid;
#endif
#ifdef WINNT
HANDLE g_hEventWinmm;
#endif
/*****************************************************************************
*
* @doc INTERNAL
*
* @func void | DllEnterCrit |
*
* Take the DLL critical section.
*
* The DLL critical section is the lowest level critical section.
* You may not attempt to acquire any other critical sections or
* yield while the DLL critical section is held. Failure to
* comply is a violation of the semaphore hierarchy and will
* lead to deadlocks.
*
*****************************************************************************/
void EXTERNAL
DllEnterCrit_(LPCTSTR lptszFile, UINT line)
{
#ifdef XDEBUG
if( ! _TryEnterCritSec(&g_crstDll) )
{
SquirtSqflPtszV(sqflCrit, TEXT("Dll CritSec blocked @%s,%d"), lptszFile, line);
EnterCriticalSection(&g_crstDll);
}
if (++g_cCrit == 0) {
g_thidCrit = GetCurrentThreadId();
g_thhandleCrit = GetCurrentThread();
SquirtSqflPtszV(sqflCrit, TEXT("Dll CritSec Entered @%s,%d"), lptszFile, line);
}
AssertF(g_thidCrit == GetCurrentThreadId());
#else
EnterCriticalSection(&g_crstDll);
#endif
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func BOOL | IsThreadActive |
*
* Check if the thread is still active.
*
*****************************************************************************/
BOOL IsThreadActive( HANDLE hThread )
{
DWORD dwExitCode = 0;
return (NULL != hThread
&& GetExitCodeThread(hThread, &dwExitCode)
&& STILL_ACTIVE == dwExitCode
);
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func void | DllLeaveCrit |
*
* Leave the DLL critical section.
*
*****************************************************************************/
void EXTERNAL
DllLeaveCrit_(LPCTSTR lptszFile, UINT line)
{
#ifdef XDEBUG
if( IsThreadActive(g_thhandleCrit) ) {
AssertF(g_thidCrit == GetCurrentThreadId());
} else {
SquirtSqflPtszV(sqflCrit, TEXT("Current thread has died."));
}
AssertF(g_cCrit >= 0);
if (--g_cCrit < 0) {
g_thidCrit = 0;
}
SquirtSqflPtszV(sqflCrit, TEXT("Dll CritSec Leaving @%s,%d"), lptszFile, line);
#endif
LeaveCriticalSection(&g_crstDll);
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func void | DllInCrit |
*
* Nonzero if we are in the DLL critical section.
*
*****************************************************************************/
#ifdef DEBUG
BOOL INTERNAL
DllInCrit(void)
{
return g_cCrit >= 0 && g_thidCrit == GetCurrentThreadId();
}
#endif
/*****************************************************************************
*
* @doc INTERNAL
*
* @func void | DllAddRef |
*
* Increment the reference count on the DLL.
*
*****************************************************************************/
void EXTERNAL
DllAddRef(void)
{
InterlockedIncrement((LPLONG)&g_cRef);
SquirtSqflPtszV(sqfl, TEXT("DllAddRef -> %d"), g_cRef);
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func void | DllRelease |
*
* Decrement the reference count on the DLL.
*
*****************************************************************************/
void EXTERNAL
DllRelease(void)
{
InterlockedDecrement((LPLONG)&g_cRef);
SquirtSqflPtszV(sqfl, TEXT("DllRelease -> %d"), g_cRef);
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func void | DllLoadLibrary |
*
* Increment the DLL load count.
*
* This is to prevent a non-OLE application from unloading us
* while we still have windows subclassed.
*
*****************************************************************************/
void EXTERNAL
DllLoadLibrary(void)
{
if (InterlockedIncrement(&g_lLoadLibrary) == 0) {
TCHAR tsz[MAX_PATH - 1];
/*
* See hresValidInstanceVer_ for an explanation of why
* we need to pass cA() - 1 instead of cA().
*/
GetModuleFileName(g_hinst, tsz, cA(tsz) - 1);
LoadLibrary(tsz);
}
SquirtSqflPtszV(sqfl, TEXT("DllLoadLibrary -> %d"), g_lLoadLibrary);
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func void | DllFreeLibraryAndExitThread |
*
* Worker thread which frees the library in a less dangerous
* (I'm loathe to say "safe") manner.
*
* ThreadProcs are prototyped to return a void but since the return
* would follow some form of ExitThread, it will never be reached so
* this function is declared to return void and cast.
*
* @parm LPVOID | pvContext |
*
* Unused context information.
*
*****************************************************************************/
void INTERNAL
DllFreeLibraryAndExitThread(LPVOID pvContext)
{
/*
* Sleep for one extra second to make extra sure that the
* DllFreeLibrary thread is out and gone.
*/
SleepEx(1000, FALSE);
FreeLibraryAndExitThread(g_hinst, 0);
/*NOTREACHED*/
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func void | DllFreeLibrary |
*
* Decrement the DLL load count.
*
* This undoes a previous <f DllLoadLibrary>.
*
* We can't blindly do a <f FreeLibrary>, because we might
* be freeing our last reference, and then we will die because
* we won't exist when the <f FreeLibrary> returns.
*
* If we are in the wacky case, then we spin a low-priority
* thread whose job is to free us. We create it at low priority
* so it will lose the race with this thread, which is busy
* getting out of the way.
*
*****************************************************************************/
void EXTERNAL
DllFreeLibrary(void)
{
if (InterlockedDecrement(&g_lLoadLibrary) < 0) {
if (g_cRef) {
/*
* There are other references to us, so we can just
* go away quietly.
*/
FreeLibrary(g_hinst);
} else {
/*
* This is the last reference, so we need to create a
* worker thread which will call <f FreeLibraryAndExitThread>.
*/
DWORD thid;
HANDLE hth;
hth = CreateThread(0, 0, (LPTHREAD_START_ROUTINE)DllFreeLibraryAndExitThread,
0, CREATE_SUSPENDED, &thid);
if (hth) {
SetThreadPriority(hth, THREAD_PRIORITY_IDLE);
ResumeThread(hth);
CloseHandle(hth);
}
}
}
SquirtSqflPtszV(sqfl, TEXT("DllFreeLibrary -> %d"), g_lLoadLibrary);
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func HRESULT | DllGetClassObject |
*
* Create an <i IClassFactory> instance for this DLL.
*
* @parm REFCLSID | rclsid |
*
* The object being requested.
*
* @parm RIID | riid |
*
* The desired interface on the object.
*
* @parm PPV | ppvOut |
*
* Output pointer.
*
* @comm
* The artificial refcount inside <f DllClassObject> helps
* to avoid the race condition described in <f DllCanUnloadNow>.
* It's not perfect, but it makes the race window smaller.
*
*****************************************************************************/
#pragma BEGIN_CONST_DATA
#ifdef DEMONSTRATION_FFDRIVER
/*
* Build the fake force feedback driver for internal testing.
*/
GUID CLSID_EffectDriver = {
0x25E609E2,0xB259,0x11CF,0xBF,0xC7,0x44,0x45,0x53,0x54,0x00,0x00
};
#endif
CLSIDMAP c_rgclsidmap[cclsidmap] = {
{ &CLSID_DirectInput, CDIObj_New, IDS_DIRECTINPUT, },
{ &CLSID_DirectInputDevice, CDIDev_New, IDS_DIRECTINPUTDEVICE, },
#ifdef DEMONSTRATION_FFDRIVER
{ &CLSID_EffectDriver, CJoyEff_New, 0, },
#endif
};
#pragma END_CONST_DATA
STDAPI
DllGetClassObject(REFCLSID rclsid, RIID riid, PPV ppvObj)
{
HRESULT hres;
UINT iclsidmap;
EnterProcR(DllGetClassObject, (_ "G", rclsid));
if( g_fCritInited )
{
DllAddRef();
for (iclsidmap = 0; iclsidmap < cA(c_rgclsidmap); iclsidmap++) {
if (IsEqualIID(rclsid, c_rgclsidmap[iclsidmap].rclsid)) {
hres = CDIFactory_New(c_rgclsidmap[iclsidmap].pfnCreate,
riid, ppvObj);
goto done;
}
}
SquirtSqflPtszV(sqfl | sqflError, TEXT("%S: Wrong CLSID"), s_szProc);
*ppvObj = 0;
hres = CLASS_E_CLASSNOTAVAILABLE;
done:;
ExitOleProcPpv(ppvObj);
DllRelease();
}
else
{
hres = E_OUTOFMEMORY;
RPF( "Failing DllGetClassObject due to lack of DLL critical section" );
}
return hres;
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func HRESULT | DllCanUnloadNow |
*
* Determine whether the DLL has any outstanding interfaces.
*
* There is an unavoidable race condition between
* <f DllCanUnloadNow> and the creation of a new
* <i IClassFactory>: Between the time we return from
* <f DllCanUnloaDNow> and the caller inspects the value,
* another thread in the same process may decide to call
* <f DllGetClassObject>, thus suddenly creating an object
* in this DLL when there previously was none.
*
* It is the caller's responsibility to prepare for this
* possibility; there is nothing we can do about it.
*
* @returns
*
* Returns <c S_OK> if the DLL can unload, <c S_FALSE> if
* it is not safe to unload.
*
*****************************************************************************/
STDMETHODIMP
DllCanUnloadNow(void)
{
HRESULT hres;
#ifdef DEBUG
if (IsSqflSet(sqfl)) {
SquirtSqflPtszV(sqfl, TEXT("DllCanUnloadNow() - g_cRef = %d"), g_cRef);
Common_DumpObjects();
}
#endif
hres = g_cRef ? S_FALSE : S_OK;
return hres;
}
#ifdef USE_SLOW_LL_HOOKS
/*****************************************************************************
*
* @doc INTERNAL
*
* @func LRESULT | DllLlHookTest |
*
* Tiny hook procedure used to test whether LL hooks are
* supported by the operating system.
*
* This function is almost never called. We install the
* hook and immediately remove it. The only time it
* manages to get called is if the user moves the mouse
* or presses a key during the microsecond that we exist.
*
* Wait! In fact, this function is *never* called. We
* do not process messages at any point the hook is installed,
* so in fact nothing happens at all.
*
* @parm int | nCode |
*
* Hook code.
*
* @parm WPARAM | wp |
*
* Hook-specific code.
*
* @parm LPARAM | lp |
*
* Hook-specific code.
*
* @returns
*
* Always chains to previous hook.
*
*****************************************************************************/
LRESULT CALLBACK
DllLlHookTest(int nCode, WPARAM wp, LPARAM lp)
{
/*
* Note that there is not actually anything wrong here,
* but it is a theoretically impossible condition, so I want to
* know when it happens.
*/
AssertF(!TEXT("DllLlHookTest - Unexpected hook"));
return CallNextHookEx(g_hhkLLHookCheck, nCode, wp, lp);
}
#endif
/*****************************************************************************
*
* @doc INTERNAL
*
* @func void | DllProcessAttach |
*
* Called when the DLL is loaded.
*
* We are not interested in thread attaches and detaches,
* so we disable thread notifications for performance reasons.
*
*****************************************************************************/
#pragma BEGIN_CONST_DATA
TCHAR c_tszKernel32[] = TEXT("KERNEL32");
#ifndef WINNT
char c_szOpenVxDHandle[] = "OpenVxDHandle";
#endif
void INTERNAL
DllProcessAttach(void)
{
HINSTANCE hinstK32;
#ifdef DEBUG
WriteProfileString(0, 0, 0); /* Flush the win.ini cache */
Sqfl_Init();
GetProfileString(TEXT("DEBUG"), TEXT("LogFile"), TEXT(""),
g_tszLogFile, cA(g_tszLogFile));
SquirtSqflPtszV(sqfl, TEXT("LoadDll - DInput"));
SquirtSqflPtszV(sqfl, TEXT("Version %x"), DIRECTINPUT_VERSION );
SquirtSqflPtszV(sqfl, TEXT("Built %s at %s\n"), TEXT(__DATE__), TEXT(__TIME__) );
#endif
/*
* Disabling thread library calls is important so that
* we don't deadlock with ourselves over the critical
* section when we spin up the worker thread to handle
* low-level hooks.
*/
DisableThreadLibraryCalls(g_hinst);
g_fCritInited = fInitializeCriticalSection(&g_crstDll);
if( !g_fCritInited )
{
RPF( "Failed to initialize DLL critical section" );
}
hinstK32 = GetModuleHandle( c_tszKernel32 );
{
CANCELIO tmp;
tmp = (CANCELIO)GetProcAddress(hinstK32, "CancelIo");
if (tmp) {
_CancelIO = tmp;
} else {
AssertF(_CancelIO == FakeCancelIO);
}
}
#ifdef WINNT
{
/*
* For now, only look for TryEnterCriticalSection on NT as it is not
* implemented on 9x but the stub is annoying on 98 with dbg kernels.
*/
#ifdef XDEBUG
TRYENTERCRITICALSECTION tmpCrt;
tmpCrt = (TRYENTERCRITICALSECTION)GetProcAddress(hinstK32, "TryEnterCriticalSection");
if(tmpCrt)
{
_TryEnterCritSec = tmpCrt;
}else
{
AssertF(_TryEnterCritSec == FakeTryEnterCriticalSection);
}
#endif
fWinnt = TRUE;
}
#else
_OpenVxDHandle = (OPENVXDHANDLE)GetProcAddress(hinstK32, c_szOpenVxDHandle);
fWinnt = FALSE;
#endif
#ifdef WORKER_THREAD
{
MSGWAITFORMULTIPLEOBJECTSEX tmp;
tmp = (MSGWAITFORMULTIPLEOBJECTSEX)
GetProcAddress(GetModuleHandle(TEXT("USER32")),
"MsgWaitForMultipleObjectsEx");
if (tmp) {
_MsgWaitForMultipleObjectsEx = tmp;
} else {
AssertF(_MsgWaitForMultipleObjectsEx ==
FakeMsgWaitForMultipleObjectsEx);
}
}
/*
* We cannot initialize g_hmtxGlobal here, because we
* have no way to report the error back to the caller.
*/
#endif
#ifdef USE_SLOW_LL_HOOKS
/*
* Determine whether low-level input hooks are supported.
*/
g_hhkLLHookCheck = SetWindowsHookEx(WH_MOUSE_LL, DllLlHookTest,
g_hinst, 0);
if (g_hhkLLHookCheck) {
UnhookWindowsHookEx(g_hhkLLHookCheck);
}
#endif
/*
* Warning! Do not call ExtDll_Init during PROCESS_ATTACH!
*/
g_wmJoyChanged = RegisterWindowMessage(MSGSTR_JOYCHANGED);
#ifdef USE_WM_INPUT
g_fRawInput = (DIGetOSVersion() == WINWH_OS);
if( g_fRawInput ) {
g_hEventAcquire = CreateEvent(0x0, 0, 0, 0x0);
g_hEventThread = CreateEvent(0x0, 0, 0, 0x0);
g_hEventHid = CreateEvent(0x0, 0, 0, 0x0);
}
#endif
#ifdef WINNT
g_hEventWinmm = OpenEvent(EVENT_MODIFY_STATE, 0, TEXT("DINPUTWINMM"));
if( !g_hEventWinmm ) {
RPF("Open named event fails (0x%08lx).", GetLastError());
}
#endif
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func void | DllProcessDetach |
*
* Called when the DLL is unloaded.
*
*****************************************************************************/
void INTERNAL
DllProcessDetach(void)
{
extern PLLTHREADSTATE g_plts;
#ifdef USE_WM_INPUT
if (g_hEventAcquire)
{
CloseHandle(g_hEventAcquire);
}
if (g_hEventThread)
{
CloseHandle(g_hEventThread);
}
if (g_hEventHid)
{
CloseHandle(g_hEventHid);
}
#endif
#ifndef WINNT
if (g_hVxD != INVALID_HANDLE_VALUE) {
CloseHandle(g_hVxD);
}
#endif
if (g_psop) {
UnmapViewOfFile(g_psop);
}
if (g_hfm) {
CloseHandle(g_hfm);
}
if (g_hmtxGlobal) {
CloseHandle(g_hmtxGlobal);
}
#ifdef IDirectInputDevice2Vtbl
if (g_hmtxJoy) {
CloseHandle(g_hmtxJoy);
}
#endif
#ifdef NOTYET
if (g_hinstRPCRT4) {
FreeLibrary(g_hinstRPCRT4);
}
#endif
#ifdef HID_SUPPORT
ExtDll_Term();
#endif
if( g_fCritInited )
{
DeleteCriticalSection(&g_crstDll);
}
/*
* Output message last so that anything that follows in known to be bad.
*/
if (g_cRef )
{
#ifdef WINNT
if( g_hEventWinmm ) {
SetEvent(g_hEventWinmm);
Sleep(10);
}
#endif
RPF("unloaded before all objects released. (cRef:%d)\r\n", g_cRef);
}
#ifdef WINNT
if( g_hEventWinmm ) {
CloseHandle(g_hEventWinmm);
}
#endif
}
/*****************************************************************************
*
* @doc INTERNAL
*
* @func BOOL | DllMain |
*
* Called to notify the DLL about various things that can happen.
*
* @parm HINSTANCE | hinst |
*
* The instance handle of this DLL.
*
* @parm DWORD | dwReason |
*
* Notification code.
*
* @parm LPVOID | lpReserved |
*
* Not used.
*
* @returns
*
* Returns <c TRUE> to allow the DLL to load.
*
*****************************************************************************/
BOOL APIENTRY
DllMain(HINSTANCE hinst, DWORD dwReason, LPVOID lpReserved)
{
switch (dwReason) {
case DLL_PROCESS_ATTACH:
g_hinst = hinst;
DllProcessAttach();
// 7/19/2000(a-JiTay): IA64: Use %p format specifier for 32/64-bit pointers.
SquirtSqflPtszV(sqfl | sqflMajor,
TEXT("DINPUT: DLL_PROCESS_ATTACH hinst=0x%p, lpReserved=0x%p"),
hinst, lpReserved );
break;
case DLL_PROCESS_DETACH:
DllProcessDetach();
// 7/19/2000(a-JiTay): IA64: Use %p format specifier for 32/64-bit pointers.
SquirtSqflPtszV(sqfl | sqflMajor,
TEXT("DINPUT: DLL_PROCESS_DETACH hinst=0x%p, lpReserved=0x%p"),
hinst, lpReserved );
break;
}
return 1;
}
/*****************************************************************************
*
* @doc EXTERNAL
*
* @topic Definitions and Ground Rules |
*
* The phrase "undefined behavior" refers to behavior which is not
* covered by this specification due to violations of a constraint.
* No constraint is imposed by the specification as to the result of
* undefined behavior. It may range from silently ignoring the
* situation to a complete system crash.
*
* If this specification does not prescribe a behavior for a particular
* situation, the behavior is "undefined".
*
* The phrase "It is an error" indicates that failure to comply
* is a violation of the DirectInput specification and results
* in "undefined behavior".
*
* The word "shall" is to be interpreted as a
* requirement on an application; conversely, "shall not" is to be
* interpreted as a prohibition. Violation of a requirement or
* prohibition "is an error".
*
* The word "may" indicates that the indicated behavior is possible
* but is not required.
*
* The word "should" indicates a strong suggestion.
* If the application violates a "should" requirement, then DirectInput
* "may" fail the operation.
*
* Pointer parameters to functions "shall not" be NULL unless explicitly
* documented as OPTIONAL. "It is an error" to pass a pointer to an object
* of the wrong type, to an object which is not allocated, or to an
* object which has been freed or <f Release>d.
*
* Unless indicated otherwise,
* an object pointed to by a pointer parameter documented as an
* IN parameter "shall not" be modified by the called procedure.
* Conversely, a pointer parameter documented
* as an OUT parameter "shall" point to a modifiable object.
*
* When a bitmask of flags is defined, all bits not defined by this
* specification are reserved. Applications "shall not" set reserved
* bits and "shall" ignore reserved bits should they be received.
*
*****************************************************************************/
/*****************************************************************************
*
* @doc EXTERNAL
*
* @topic Initialization and Versions |
*
* In several places, DirectInput requires you to pass an instance
* handle and a version number.
*
* The instance handle must correspond to the application or
* DLL that is initializing the DirectInput object.
*
* DirectInput uses this value to determine whether the
* application or DLL has been certified and to establish
* any special behaviors that may be necessary for
* backwards-compatibility.
*
* It is an error for a DLL to pass the handle of the
* parent application. For example, an ActiveX control
* embedded in a web page which uses DirectInput must
* pass its own instance handle and not the handle of the
* web browser. This ensures that DirectInput recognizes
* the control and can enable any special behaviors
* for the control the behave properly.
*
* The version number parameter specifies which version of
* DirectInput the DirectInput subsystem should emulate.
*
* Applications designed for the latest version of DirectInput
* should pass the value <c DIRECTINPUT_VERSION> as defined
* in dinput.h.
*
* Applications designed for previous versions of DirectInput
* should pass a value corresponding to the version of
* DirectInput they were designed for. For example, an
* application that was designed to run on DirectInput 3.0
* should pass a value of 0x0300.
*
* If you #define <c DIRECTINPUT_VERSION> to 0x0300 before
* including the dinput.h header file, then the dinput.h
* header file will generate DirectInput 3.0-compatible
* structure definitions.
*
*****************************************************************************/
/*****************************************************************************
*
* @doc INTERNAL
*
* @func HRESULT | DirectInputCreateHelper |
*
* <bnew>This function creates a new DirectInput object
* which supports the <i IDirectInput> COM interface.
*
* On success, the function returns a pointer to the new object in
* *<p lplpDirectInput>.
* <enew>
*
* @parm IN HINSTANCE | hinst |
*
* Instance handle of the application or DLL that is creating
* the DirectInput object.
*
* @parm DWORD | dwVersion |
*
* Version number of the dinput.h header file that was used.
*
* @parm OUT PPV | ppvObj |
* Points to where to return
* the pointer to the <i IDirectInput> interface, if successful.
*
* @parm IN LPUNKNOWN | punkOuter | Pointer to controlling unknown.
*
* @parm RIID | riid |
*
* The interface the application wants to create. This will
* be either <i IDirectInputA> or <i IDirectInputW>.
* If the object is aggregated, then this parameter is ignored.
*
* @returns
*
* Returns a COM error code. The following error codes are
* intended to be illustrative and not necessarily comprehensive.
*
* <c DI_OK> = <c S_OK>: The operation completed successfully.
*
* <c DIERR_INVALIDPARAM>
*
* <c DIERR_OUTOFMEMORY> = <c E_OUTOFMEMORY>:
* Out of memory.
*
*****************************************************************************/
STDMETHODIMP
DirectInputCreateHelper(HINSTANCE hinst, DWORD dwVer,
PPV ppvObj, PUNK punkOuter, RIID riid)
{
HRESULT hres;
EnterProc(DirectInputCreateHelper,
(_ "xxxG", hinst, dwVer, punkOuter, riid));
if (SUCCEEDED(hres = hresFullValidPcbOut(ppvObj, cbX(*ppvObj), 3)))
{
if( g_fCritInited )
{
LPVOID pvTry = NULL;
hres = CDIObj_New(punkOuter,
punkOuter ? &IID_IUnknown : riid, &pvTry);
if (SUCCEEDED(hres) && punkOuter == 0) {
LPDIRECTINPUT pdi = pvTry;
hres = pdi->lpVtbl->Initialize(pdi, hinst, dwVer);
if (SUCCEEDED(hres)) {
*ppvObj = pvTry;
} else {
Invoke_Release(&pvTry);
*ppvObj = NULL;
}
}
}
else
{
RPF( "Failing DirectInputCreate due to lack of DLL critical section" );
hres = E_OUTOFMEMORY;
}
}
ExitOleProcPpv(ppvObj);
return hres;
}
/*****************************************************************************
*
* @doc EXTERNAL
*
* @func HRESULT | DirectInputCreate |
*
* <bnew>This function creates a new DirectInput object
* which supports the <i IDirectInput> COM interface.
*
* On success, the function returns a pointer to the new object in
* *<p lplpDirectInput>.
* <enew>
*
* @parm IN HINSTANCE | hinst |
*
* Instance handle of the application or DLL that is creating
* the DirectInput object.
*
* See the section titled "Initialization and Versions"
* for more information.
*
* @parm DWORD | dwVersion |
*
* Version number of the dinput.h header file that was used.
*
* See the section titled "Initialization and Versions"
* for more information.
*
* @parm OUT LPDIRECTINPUT * | lplpDirectInput |
*
* Points to where to return
* the pointer to the <i IDirectInput> interface, if successful.
*
* @parm IN LPUNKNOWN | punkOuter | Pointer to controlling unknown
* for OLE aggregation, or 0 if the interface is not aggregated.
* Most callers will pass 0.
*
* Note that if aggregation is requested, the object returned
* in *<p lplpDirectInput> will be a pointer to an
* <i IUnknown> rather than an <i IDirectInput>, as required
* by OLE aggregation.
*
* @returns
*
* Returns a COM error code. The following error codes are
* intended to be illustrative and not necessarily comprehensive.
*
* <c DI_OK> = <c S_OK>: The operation completed successfully.
*
* <c DIERR_INVALIDPARAM> = <c E_INVALIDARG>: The
* <p lplpDirectInput> parameter is not a valid pointer.
*
* <c DIERR_OUTOFMEMORY> = <c E_OUTOFMEMORY>:
* Out of memory.
*
* <c DIERR_DIERR_OLDDIRECTINPUTVERSION>: The application
* requires a newer version of DirectInput.
*
* <c DIERR_DIERR_BETADIRECTINPUTVERSION>: The application
* was written for an unsupported prerelease version
* of DirectInput.
*
* @comm Calling this function with <p punkOuter> = NULL
* is equivalent to creating the object via
* <f CoCreateInstance>(&CLSID_DirectInput, <p punkOuter>,
* CLSCTX_INPROC_SERVER, &IID_IDirectInput, <p lplpDirectInput>);
* then initializing it with <f Initialize>.
*
* Calling this function with <p punkOuter> != NULL
* is equivalent to creating the object via
* <f CoCreateInstance>(&CLSID_DirectInput, <p punkOuter>,
* CLSCTX_INPROC_SERVER, &IID_IUnknown, <p lplpDirectInput>).
* The aggregated object must be initialized manually.
*
* Note that there are separate ANSI and UNICODE versions of
* this service. The ANSI version creates and initializes
* an object which
* supports the <i IDirectInputA> interface, whereas
* the UNICODE version creates and initializes
* an object which supports
* the <i IDirectInputW> interface. As with other system
* services which are sensitive to character set issues,
* macros in the header file map <f DirectInputCreate> to
* the appropriate character set variation.
*
*****************************************************************************/
STDMETHODIMP
DirectInputCreateA(HINSTANCE hinst, DWORD dwVer, PPDIA ppdiA, PUNK punkOuter)
{
HRESULT hres;
EnterProc(DirectInputCreateA, (_ "xxx", hinst, dwVer, punkOuter));
/* Need to maintain a refcount to keep the Dll Around */
DllAddRef();
hres = DirectInputCreateHelper(hinst, dwVer, (PPV)ppdiA, punkOuter,
&IID_IDirectInputA);
DllRelease();
ExitOleProcPpv(ppdiA);
return hres;
}
STDMETHODIMP
DirectInputCreateW(HINSTANCE hinst, DWORD dwVer, PPDIW ppdiW, PUNK punkOuter)
{
HRESULT hres;
EnterProc(DirectInputCreateW, (_ "xx", ppdiW, punkOuter));
/* Need to maintain a refcount to keep the Dll Around */
DllAddRef();
hres = DirectInputCreateHelper(hinst, dwVer, (PPV)ppdiW, punkOuter,
&IID_IDirectInputW);
DllRelease();
ExitOleProcPpv(ppdiW);
return hres;
}
/*****************************************************************************
*
* @doc EXTERNAL
*
* @func HRESULT | DirectInputCreateEx |
*
* <bnew>This function creates a new DirectInput object
* which supports the <i IDirectInput> COM interface. This function
* allows the app to pass an IID so it does not have to do an extra
* QI off the <i IDirectInput> interface in order to obtain an
* <i IDirectInput2> or <i IDirectInput7> interface.
*
* We don't need a DirectInputCreateExW and DirectInputCreateExA because
* you can QI for the IDirectInput#A from this function.
*
* On success, the function returns a pointer to the new object in
* *<p ppvOut>.
* <enew>
*
* @parm IN HINSTANCE | hinst |
*
* Instance handle of the application or DLL that is creating
* the DirectInput object.
*
* See the section titled "Initialization and Versions"
* for more information.
*
* @parm DWORD | dwVersion |
*
* Version number of the dinput.h header file that was used.
*
* See the section titled "Initialization and Versions"
* for more information.
*
* @parm REFIID | riidtlf |
*
* The desired interface interface.
* Currently, valid fields are IID_IDirectInput, IID_IDirectInput2 and IID_IDirectInput7.
* OR IID_IDirectInputA, IID_IDirectInputW, .... IID_IDirectInput7W
*
* @parm OUT LPVOID | *ppvOut |
*
* Points to where to return
* the pointer to the <i IDirectInput#> interface, if successful.
*
* @parm IN LPUNKNOWN | punkOuter | Pointer to controlling unknown
* for OLE aggregation, or 0 if the interface is not aggregated.
* Most callers will pass 0.
*
* Note that if aggregation is requested, the object returned
* in *<p lplpDirectInput> will be a pointer to an
* <i IUnknown> rather than an <i IDirectInput>, as required
* by OLE aggregation.
*
* @returns
*
* Returns a COM error code. The following error codes are
* intended to be illustrative and not necessarily comprehensive.
*
* <c DI_OK> = <c S_OK>: The operation completed successfully.
*
* <c DIERR_INVALIDPARAM> = <c E_INVALIDARG>: The
* <p lplpDirectInput> parameter is not a valid pointer.
*
* <c DIERR_OUTOFMEMORY> = <c E_OUTOFMEMORY>:
* Out of memory.
*
* <c DIERR_DIERR_OLDDIRECTINPUTVERSION>: The application
* requires a newer version of DirectInput.
*
* <c DIERR_DIERR_BETADIRECTINPUTVERSION>: The application
* was written for an unsupported prerelease version
* of DirectInput.
*
* @comm Calling this function with <p punkOuter> = NULL
* is equivalent to creating the object via
* <f CoCreateInstance>(&CLSID_DirectInput, <p punkOuter>,
* CLSCTX_INPROC_SERVER, &IID_IDirectInput, <p lplpDirectInput>);
* then initializing it with <f Initialize>.
*
* Calling this function with <p punkOuter> != NULL
* is equivalent to creating the object via
* <f CoCreateInstance>(&CLSID_DirectInput, <p punkOuter>,
* CLSCTX_INPROC_SERVER, &IID_IUnknown, <p lplpDirectInput>).
* The aggregated object must be initialized manually.
*
* Note that there are separate ANSI and UNICODE versions of
* this service. The ANSI version creates and initializes
* an object which
* supports the <i IDirectInputA> interface, whereas
* the UNICODE version creates and initializes
* an object which supports
* the <i IDirectInputW> interface. As with other system
* services which are sensitive to character set issues,
* macros in the header file map <f DirectInputCreate> to
* the appropriate character set variation.
*
*****************************************************************************/
STDMETHODIMP
DirectInputCreateEx(HINSTANCE hinst, DWORD dwVer, REFIID riidltf, LPVOID *ppvOut, LPUNKNOWN punkOuter)
{
HRESULT hres;
EnterProc(DirectInputCreateEx, (_ "xxGx", hinst, dwVer, riidltf, ppvOut, punkOuter));
/* Need to maintain a refcount to keep the Dll Around */
DllAddRef();
// Only supports incarnations of IDirectInput interface
if( IsEqualIID(riidltf, &IID_IDirectInputA) ||
IsEqualIID(riidltf, &IID_IDirectInputW) ||
IsEqualIID(riidltf, &IID_IDirectInput2A)||
IsEqualIID(riidltf, &IID_IDirectInput2W)||
IsEqualIID(riidltf, &IID_IDirectInput7A)||
IsEqualIID(riidltf, &IID_IDirectInput7W)
)
{
hres = DirectInputCreateHelper(hinst, dwVer, ppvOut, punkOuter,
riidltf);
}else
{
hres = E_NOINTERFACE;
}
DllRelease();
ExitOleProcPpv(ppvOut);
return hres;
}