886 lines
26 KiB
C
886 lines
26 KiB
C
/*
|
|
* ITfInputProcessorProfiles implementation
|
|
*
|
|
* Copyright 2009 Aric Stewart, CodeWeavers
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include <stdarg.h>
|
|
|
|
#define COBJMACROS
|
|
|
|
#include "wine/debug.h"
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "winreg.h"
|
|
#include "winuser.h"
|
|
#include "shlwapi.h"
|
|
#include "winerror.h"
|
|
#include "objbase.h"
|
|
|
|
#include "wine/unicode.h"
|
|
|
|
#include "msctf.h"
|
|
#include "msctf_internal.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(msctf);
|
|
|
|
static const WCHAR szwLngp[] = {'L','a','n','g','u','a','g','e','P','r','o','f','i','l','e',0};
|
|
static const WCHAR szwEnabled[] = {'E','n','a','b','l','e','d',0};
|
|
static const WCHAR szwTipfmt[] = {'%','s','\\','%','s',0};
|
|
static const WCHAR szwFullLangfmt[] = {'%','s','\\','%','s','\\','%','s','\\','0','x','%','0','8','x','\\','%','s',0};
|
|
|
|
typedef struct tagInputProcessorProfiles {
|
|
const ITfInputProcessorProfilesVtbl *InputProcessorProfilesVtbl;
|
|
LONG refCount;
|
|
|
|
LANGID currentLanguage;
|
|
} InputProcessorProfiles;
|
|
|
|
typedef struct tagProfilesEnumGuid {
|
|
const IEnumGUIDVtbl *Vtbl;
|
|
LONG refCount;
|
|
|
|
HKEY key;
|
|
DWORD next_index;
|
|
} ProfilesEnumGuid;
|
|
|
|
typedef struct tagEnumTfLanguageProfiles {
|
|
const IEnumTfLanguageProfilesVtbl *Vtbl;
|
|
LONG refCount;
|
|
|
|
HKEY tipkey;
|
|
DWORD tip_index;
|
|
WCHAR szwCurrentClsid[39];
|
|
|
|
HKEY langkey;
|
|
DWORD lang_index;
|
|
|
|
LANGID langid;
|
|
} EnumTfLanguageProfiles;
|
|
|
|
static HRESULT ProfilesEnumGuid_Constructor(IEnumGUID **ppOut);
|
|
static HRESULT EnumTfLanguageProfiles_Constructor(LANGID langid, IEnumTfLanguageProfiles **ppOut);
|
|
|
|
static void InputProcessorProfiles_Destructor(InputProcessorProfiles *This)
|
|
{
|
|
TRACE("destroying %p\n", This);
|
|
HeapFree(GetProcessHeap(),0,This);
|
|
}
|
|
|
|
static void add_userkey( REFCLSID rclsid, LANGID langid,
|
|
REFGUID guidProfile)
|
|
{
|
|
HKEY key;
|
|
WCHAR buf[39];
|
|
WCHAR buf2[39];
|
|
WCHAR fullkey[168];
|
|
DWORD disposition = 0;
|
|
ULONG res;
|
|
|
|
TRACE("\n");
|
|
|
|
StringFromGUID2(rclsid, buf, 39);
|
|
StringFromGUID2(guidProfile, buf2, 39);
|
|
sprintfW(fullkey,szwFullLangfmt,szwSystemTIPKey,buf,szwLngp,langid,buf2);
|
|
|
|
res = RegCreateKeyExW(HKEY_CURRENT_USER,fullkey, 0, NULL, 0,
|
|
KEY_READ | KEY_WRITE, NULL, &key, &disposition);
|
|
|
|
if (!res && disposition == REG_CREATED_NEW_KEY)
|
|
{
|
|
DWORD zero = 0x0;
|
|
RegSetValueExW(key, szwEnabled, 0, REG_DWORD, (LPBYTE)&zero, sizeof(DWORD));
|
|
}
|
|
|
|
if (!res)
|
|
RegCloseKey(key);
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_QueryInterface(ITfInputProcessorProfiles *iface, REFIID iid, LPVOID *ppvOut)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles *)iface;
|
|
*ppvOut = NULL;
|
|
|
|
if (IsEqualIID(iid, &IID_IUnknown) || IsEqualIID(iid, &IID_ITfInputProcessorProfiles))
|
|
{
|
|
*ppvOut = This;
|
|
}
|
|
|
|
if (*ppvOut)
|
|
{
|
|
IUnknown_AddRef(iface);
|
|
return S_OK;
|
|
}
|
|
|
|
WARN("unsupported interface: %s\n", debugstr_guid(iid));
|
|
return E_NOINTERFACE;
|
|
}
|
|
|
|
static ULONG WINAPI InputProcessorProfiles_AddRef(ITfInputProcessorProfiles *iface)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles *)iface;
|
|
return InterlockedIncrement(&This->refCount);
|
|
}
|
|
|
|
static ULONG WINAPI InputProcessorProfiles_Release(ITfInputProcessorProfiles *iface)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles *)iface;
|
|
ULONG ret;
|
|
|
|
ret = InterlockedDecrement(&This->refCount);
|
|
if (ret == 0)
|
|
InputProcessorProfiles_Destructor(This);
|
|
return ret;
|
|
}
|
|
|
|
/*****************************************************
|
|
* ITfInputProcessorProfiles functions
|
|
*****************************************************/
|
|
static HRESULT WINAPI InputProcessorProfiles_Register(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
HKEY tipkey;
|
|
WCHAR buf[39];
|
|
WCHAR fullkey[68];
|
|
|
|
TRACE("(%p) %s\n",This,debugstr_guid(rclsid));
|
|
|
|
StringFromGUID2(rclsid, buf, 39);
|
|
sprintfW(fullkey,szwTipfmt,szwSystemTIPKey,buf);
|
|
|
|
if (RegCreateKeyExW(HKEY_LOCAL_MACHINE,fullkey, 0, NULL, 0,
|
|
KEY_READ | KEY_WRITE, NULL, &tipkey, NULL) != ERROR_SUCCESS)
|
|
return E_FAIL;
|
|
|
|
RegCloseKey(tipkey);
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_Unregister(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid)
|
|
{
|
|
WCHAR buf[39];
|
|
WCHAR fullkey[68];
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
|
|
TRACE("(%p) %s\n",This,debugstr_guid(rclsid));
|
|
|
|
StringFromGUID2(rclsid, buf, 39);
|
|
sprintfW(fullkey,szwTipfmt,szwSystemTIPKey,buf);
|
|
|
|
RegDeleteTreeW(HKEY_LOCAL_MACHINE, fullkey);
|
|
RegDeleteTreeW(HKEY_CURRENT_USER, fullkey);
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_AddLanguageProfile(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid,
|
|
LANGID langid, REFGUID guidProfile, const WCHAR *pchDesc,
|
|
ULONG cchDesc, const WCHAR *pchIconFile, ULONG cchFile,
|
|
ULONG uIconIndex)
|
|
{
|
|
HKEY tipkey,fmtkey;
|
|
WCHAR buf[39];
|
|
WCHAR fullkey[100];
|
|
ULONG res;
|
|
DWORD disposition = 0;
|
|
|
|
static const WCHAR fmt2[] = {'%','s','\\','0','x','%','0','8','x','\\','%','s',0};
|
|
static const WCHAR desc[] = {'D','e','s','c','r','i','p','t','i','o','n',0};
|
|
static const WCHAR icnf[] = {'I','c','o','n','F','i','l','e',0};
|
|
static const WCHAR icni[] = {'I','c','o','n','I','n','d','e','x',0};
|
|
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
|
|
TRACE("(%p) %s %x %s %s %s %i\n",This,debugstr_guid(rclsid), langid,
|
|
debugstr_guid(guidProfile), debugstr_wn(pchDesc,cchDesc),
|
|
debugstr_wn(pchIconFile,cchFile),uIconIndex);
|
|
|
|
StringFromGUID2(rclsid, buf, 39);
|
|
sprintfW(fullkey,szwTipfmt,szwSystemTIPKey,buf);
|
|
|
|
if (RegOpenKeyExW(HKEY_LOCAL_MACHINE,fullkey, 0, KEY_READ | KEY_WRITE,
|
|
&tipkey ) != ERROR_SUCCESS)
|
|
return E_FAIL;
|
|
|
|
StringFromGUID2(guidProfile, buf, 39);
|
|
sprintfW(fullkey,fmt2,szwLngp,langid,buf);
|
|
|
|
res = RegCreateKeyExW(tipkey,fullkey, 0, NULL, 0, KEY_READ | KEY_WRITE,
|
|
NULL, &fmtkey, &disposition);
|
|
|
|
if (!res)
|
|
{
|
|
DWORD zero = 0x0;
|
|
RegSetValueExW(fmtkey, desc, 0, REG_SZ, (LPBYTE)pchDesc, cchDesc * sizeof(WCHAR));
|
|
RegSetValueExW(fmtkey, icnf, 0, REG_SZ, (LPBYTE)pchIconFile, cchFile * sizeof(WCHAR));
|
|
RegSetValueExW(fmtkey, icni, 0, REG_DWORD, (LPBYTE)&uIconIndex, sizeof(DWORD));
|
|
if (disposition == REG_CREATED_NEW_KEY)
|
|
RegSetValueExW(fmtkey, szwEnabled, 0, REG_DWORD, (LPBYTE)&zero, sizeof(DWORD));
|
|
RegCloseKey(fmtkey);
|
|
|
|
add_userkey(rclsid, langid, guidProfile);
|
|
}
|
|
RegCloseKey(tipkey);
|
|
|
|
if (!res)
|
|
return S_OK;
|
|
else
|
|
return E_FAIL;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_RemoveLanguageProfile(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid, LANGID langid,
|
|
REFGUID guidProfile)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
FIXME("STUB:(%p)\n",This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_EnumInputProcessorInfo(
|
|
ITfInputProcessorProfiles *iface, IEnumGUID **ppEnum)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
TRACE("(%p) %p\n",This,ppEnum);
|
|
return ProfilesEnumGuid_Constructor(ppEnum);
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_GetDefaultLanguageProfile(
|
|
ITfInputProcessorProfiles *iface, LANGID langid, REFGUID catid,
|
|
CLSID *pclsid, GUID *pguidProfile)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
FIXME("STUB:(%p)\n",This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_SetDefaultLanguageProfile(
|
|
ITfInputProcessorProfiles *iface, LANGID langid, REFCLSID rclsid,
|
|
REFGUID guidProfiles)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
FIXME("STUB:(%p)\n",This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_ActivateLanguageProfile(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid, LANGID langid,
|
|
REFGUID guidProfiles)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
FIXME("STUB:(%p)\n",This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_GetActiveLanguageProfile(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid, LANGID *plangid,
|
|
GUID *pguidProfile)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
FIXME("STUB:(%p)\n",This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_GetLanguageProfileDescription(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid, LANGID langid,
|
|
REFGUID guidProfile, BSTR *pbstrProfile)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
FIXME("STUB:(%p)\n",This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_GetCurrentLanguage(
|
|
ITfInputProcessorProfiles *iface, LANGID *plangid)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
TRACE("(%p) 0x%x\n",This,This->currentLanguage);
|
|
|
|
if (!plangid)
|
|
return E_INVALIDARG;
|
|
|
|
*plangid = This->currentLanguage;
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_ChangeCurrentLanguage(
|
|
ITfInputProcessorProfiles *iface, LANGID langid)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
FIXME("STUB:(%p)\n",This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_GetLanguageList(
|
|
ITfInputProcessorProfiles *iface, LANGID **ppLangId, ULONG *pulCount)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
FIXME("STUB:(%p)\n",This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_EnumLanguageProfiles(
|
|
ITfInputProcessorProfiles *iface, LANGID langid,
|
|
IEnumTfLanguageProfiles **ppEnum)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
TRACE("(%p) %x %p\n",This,langid,ppEnum);
|
|
return EnumTfLanguageProfiles_Constructor(langid, ppEnum);
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_EnableLanguageProfile(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid, LANGID langid,
|
|
REFGUID guidProfile, BOOL fEnable)
|
|
{
|
|
HKEY key;
|
|
WCHAR buf[39];
|
|
WCHAR buf2[39];
|
|
WCHAR fullkey[168];
|
|
ULONG res;
|
|
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
TRACE("(%p) %s %x %s %i\n",This, debugstr_guid(rclsid), langid, debugstr_guid(guidProfile), fEnable);
|
|
|
|
StringFromGUID2(rclsid, buf, 39);
|
|
StringFromGUID2(guidProfile, buf2, 39);
|
|
sprintfW(fullkey,szwFullLangfmt,szwSystemTIPKey,buf,szwLngp,langid,buf2);
|
|
|
|
res = RegOpenKeyExW(HKEY_CURRENT_USER, fullkey, 0, KEY_READ | KEY_WRITE, &key);
|
|
|
|
if (!res)
|
|
{
|
|
RegSetValueExW(key, szwEnabled, 0, REG_DWORD, (LPBYTE)&fEnable, sizeof(DWORD));
|
|
RegCloseKey(key);
|
|
}
|
|
else
|
|
return E_FAIL;
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_IsEnabledLanguageProfile(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid, LANGID langid,
|
|
REFGUID guidProfile, BOOL *pfEnable)
|
|
{
|
|
HKEY key;
|
|
WCHAR buf[39];
|
|
WCHAR buf2[39];
|
|
WCHAR fullkey[168];
|
|
ULONG res;
|
|
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
TRACE("(%p) %s, %i, %s, %p\n",This,debugstr_guid(rclsid),langid,debugstr_guid(guidProfile),pfEnable);
|
|
|
|
if (!pfEnable)
|
|
return E_INVALIDARG;
|
|
|
|
StringFromGUID2(rclsid, buf, 39);
|
|
StringFromGUID2(guidProfile, buf2, 39);
|
|
sprintfW(fullkey,szwFullLangfmt,szwSystemTIPKey,buf,szwLngp,langid,buf2);
|
|
|
|
res = RegOpenKeyExW(HKEY_CURRENT_USER, fullkey, 0, KEY_READ | KEY_WRITE, &key);
|
|
|
|
if (!res)
|
|
{
|
|
DWORD count = sizeof(DWORD);
|
|
res = RegQueryValueExW(key, szwEnabled, 0, NULL, (LPBYTE)pfEnable, &count);
|
|
RegCloseKey(key);
|
|
}
|
|
|
|
if (res) /* Try Default */
|
|
{
|
|
res = RegOpenKeyExW(HKEY_LOCAL_MACHINE, fullkey, 0, KEY_READ | KEY_WRITE, &key);
|
|
|
|
if (!res)
|
|
{
|
|
DWORD count = sizeof(DWORD);
|
|
res = RegQueryValueExW(key, szwEnabled, 0, NULL, (LPBYTE)pfEnable, &count);
|
|
RegCloseKey(key);
|
|
}
|
|
}
|
|
|
|
if (!res)
|
|
return S_OK;
|
|
else
|
|
return E_FAIL;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_EnableLanguageProfileByDefault(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid, LANGID langid,
|
|
REFGUID guidProfile, BOOL fEnable)
|
|
{
|
|
HKEY key;
|
|
WCHAR buf[39];
|
|
WCHAR buf2[39];
|
|
WCHAR fullkey[168];
|
|
ULONG res;
|
|
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
TRACE("(%p) %s %x %s %i\n",This,debugstr_guid(rclsid),langid,debugstr_guid(guidProfile),fEnable);
|
|
|
|
StringFromGUID2(rclsid, buf, 39);
|
|
StringFromGUID2(guidProfile, buf2, 39);
|
|
sprintfW(fullkey,szwFullLangfmt,szwSystemTIPKey,buf,szwLngp,langid,buf2);
|
|
|
|
res = RegOpenKeyExW(HKEY_LOCAL_MACHINE, fullkey, 0, KEY_READ | KEY_WRITE, &key);
|
|
|
|
if (!res)
|
|
{
|
|
RegSetValueExW(key, szwEnabled, 0, REG_DWORD, (LPBYTE)&fEnable, sizeof(DWORD));
|
|
RegCloseKey(key);
|
|
}
|
|
else
|
|
return E_FAIL;
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI InputProcessorProfiles_SubstituteKeyboardLayout(
|
|
ITfInputProcessorProfiles *iface, REFCLSID rclsid, LANGID langid,
|
|
REFGUID guidProfile, HKL hKL)
|
|
{
|
|
InputProcessorProfiles *This = (InputProcessorProfiles*)iface;
|
|
FIXME("STUB:(%p)\n",This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
|
|
static const ITfInputProcessorProfilesVtbl InputProcessorProfiles_InputProcessorProfilesVtbl =
|
|
{
|
|
InputProcessorProfiles_QueryInterface,
|
|
InputProcessorProfiles_AddRef,
|
|
InputProcessorProfiles_Release,
|
|
|
|
InputProcessorProfiles_Register,
|
|
InputProcessorProfiles_Unregister,
|
|
InputProcessorProfiles_AddLanguageProfile,
|
|
InputProcessorProfiles_RemoveLanguageProfile,
|
|
InputProcessorProfiles_EnumInputProcessorInfo,
|
|
InputProcessorProfiles_GetDefaultLanguageProfile,
|
|
InputProcessorProfiles_SetDefaultLanguageProfile,
|
|
InputProcessorProfiles_ActivateLanguageProfile,
|
|
InputProcessorProfiles_GetActiveLanguageProfile,
|
|
InputProcessorProfiles_GetLanguageProfileDescription,
|
|
InputProcessorProfiles_GetCurrentLanguage,
|
|
InputProcessorProfiles_ChangeCurrentLanguage,
|
|
InputProcessorProfiles_GetLanguageList,
|
|
InputProcessorProfiles_EnumLanguageProfiles,
|
|
InputProcessorProfiles_EnableLanguageProfile,
|
|
InputProcessorProfiles_IsEnabledLanguageProfile,
|
|
InputProcessorProfiles_EnableLanguageProfileByDefault,
|
|
InputProcessorProfiles_SubstituteKeyboardLayout
|
|
};
|
|
|
|
HRESULT InputProcessorProfiles_Constructor(IUnknown *pUnkOuter, IUnknown **ppOut)
|
|
{
|
|
InputProcessorProfiles *This;
|
|
if (pUnkOuter)
|
|
return CLASS_E_NOAGGREGATION;
|
|
|
|
This = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(InputProcessorProfiles));
|
|
if (This == NULL)
|
|
return E_OUTOFMEMORY;
|
|
|
|
This->InputProcessorProfilesVtbl= &InputProcessorProfiles_InputProcessorProfilesVtbl;
|
|
This->refCount = 1;
|
|
This->currentLanguage = GetUserDefaultLCID();
|
|
|
|
TRACE("returning %p\n", This);
|
|
*ppOut = (IUnknown *)This;
|
|
return S_OK;
|
|
}
|
|
|
|
/**************************************************
|
|
* IEnumGUID implementaion for ITfInputProcessorProfiles::EnumInputProcessorInfo
|
|
**************************************************/
|
|
static void ProfilesEnumGuid_Destructor(ProfilesEnumGuid *This)
|
|
{
|
|
TRACE("destroying %p\n", This);
|
|
RegCloseKey(This->key);
|
|
HeapFree(GetProcessHeap(),0,This);
|
|
}
|
|
|
|
static HRESULT WINAPI ProfilesEnumGuid_QueryInterface(IEnumGUID *iface, REFIID iid, LPVOID *ppvOut)
|
|
{
|
|
ProfilesEnumGuid *This = (ProfilesEnumGuid *)iface;
|
|
*ppvOut = NULL;
|
|
|
|
if (IsEqualIID(iid, &IID_IUnknown) || IsEqualIID(iid, &IID_IEnumGUID))
|
|
{
|
|
*ppvOut = This;
|
|
}
|
|
|
|
if (*ppvOut)
|
|
{
|
|
IUnknown_AddRef(iface);
|
|
return S_OK;
|
|
}
|
|
|
|
WARN("unsupported interface: %s\n", debugstr_guid(iid));
|
|
return E_NOINTERFACE;
|
|
}
|
|
|
|
static ULONG WINAPI ProfilesEnumGuid_AddRef(IEnumGUID *iface)
|
|
{
|
|
ProfilesEnumGuid *This = (ProfilesEnumGuid*)iface;
|
|
return InterlockedIncrement(&This->refCount);
|
|
}
|
|
|
|
static ULONG WINAPI ProfilesEnumGuid_Release(IEnumGUID *iface)
|
|
{
|
|
ProfilesEnumGuid *This = (ProfilesEnumGuid *)iface;
|
|
ULONG ret;
|
|
|
|
ret = InterlockedDecrement(&This->refCount);
|
|
if (ret == 0)
|
|
ProfilesEnumGuid_Destructor(This);
|
|
return ret;
|
|
}
|
|
|
|
/*****************************************************
|
|
* IEnumGuid functions
|
|
*****************************************************/
|
|
static HRESULT WINAPI ProfilesEnumGuid_Next( LPENUMGUID iface,
|
|
ULONG celt, GUID *rgelt, ULONG *pceltFetched)
|
|
{
|
|
ProfilesEnumGuid *This = (ProfilesEnumGuid *)iface;
|
|
ULONG fetched = 0;
|
|
|
|
TRACE("(%p)\n",This);
|
|
|
|
if (rgelt == NULL) return E_POINTER;
|
|
|
|
if (This->key) while (fetched < celt)
|
|
{
|
|
LSTATUS res;
|
|
HRESULT hr;
|
|
WCHAR catid[39];
|
|
DWORD cName = 39;
|
|
|
|
res = RegEnumKeyExW(This->key, This->next_index, catid, &cName,
|
|
NULL, NULL, NULL, NULL);
|
|
if (res != ERROR_SUCCESS && res != ERROR_MORE_DATA) break;
|
|
++(This->next_index);
|
|
|
|
hr = CLSIDFromString(catid, rgelt);
|
|
if (FAILED(hr)) continue;
|
|
|
|
++fetched;
|
|
++rgelt;
|
|
}
|
|
|
|
if (pceltFetched) *pceltFetched = fetched;
|
|
return fetched == celt ? S_OK : S_FALSE;
|
|
}
|
|
|
|
static HRESULT WINAPI ProfilesEnumGuid_Skip( LPENUMGUID iface, ULONG celt)
|
|
{
|
|
ProfilesEnumGuid *This = (ProfilesEnumGuid *)iface;
|
|
TRACE("(%p)\n",This);
|
|
|
|
This->next_index += celt;
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI ProfilesEnumGuid_Reset( LPENUMGUID iface)
|
|
{
|
|
ProfilesEnumGuid *This = (ProfilesEnumGuid *)iface;
|
|
TRACE("(%p)\n",This);
|
|
This->next_index = 0;
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI ProfilesEnumGuid_Clone( LPENUMGUID iface,
|
|
IEnumGUID **ppenum)
|
|
{
|
|
ProfilesEnumGuid *This = (ProfilesEnumGuid *)iface;
|
|
HRESULT res;
|
|
|
|
TRACE("(%p)\n",This);
|
|
|
|
if (ppenum == NULL) return E_POINTER;
|
|
|
|
res = ProfilesEnumGuid_Constructor(ppenum);
|
|
if (SUCCEEDED(res))
|
|
{
|
|
ProfilesEnumGuid *new_This = (ProfilesEnumGuid *)*ppenum;
|
|
new_This->next_index = This->next_index;
|
|
}
|
|
return res;
|
|
}
|
|
|
|
static const IEnumGUIDVtbl IEnumGUID_Vtbl ={
|
|
ProfilesEnumGuid_QueryInterface,
|
|
ProfilesEnumGuid_AddRef,
|
|
ProfilesEnumGuid_Release,
|
|
|
|
ProfilesEnumGuid_Next,
|
|
ProfilesEnumGuid_Skip,
|
|
ProfilesEnumGuid_Reset,
|
|
ProfilesEnumGuid_Clone
|
|
};
|
|
|
|
static HRESULT ProfilesEnumGuid_Constructor(IEnumGUID **ppOut)
|
|
{
|
|
ProfilesEnumGuid *This;
|
|
|
|
This = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(ProfilesEnumGuid));
|
|
if (This == NULL)
|
|
return E_OUTOFMEMORY;
|
|
|
|
This->Vtbl= &IEnumGUID_Vtbl;
|
|
This->refCount = 1;
|
|
|
|
if (RegCreateKeyExW(HKEY_LOCAL_MACHINE, szwSystemTIPKey, 0, NULL, 0,
|
|
KEY_READ | KEY_WRITE, NULL, &This->key, NULL) != ERROR_SUCCESS)
|
|
return E_FAIL;
|
|
|
|
TRACE("returning %p\n", This);
|
|
*ppOut = (IEnumGUID*)This;
|
|
return S_OK;
|
|
}
|
|
|
|
/**************************************************
|
|
* IEnumTfLanguageProfiles implementaion
|
|
**************************************************/
|
|
static void EnumTfLanguageProfiles_Destructor(EnumTfLanguageProfiles *This)
|
|
{
|
|
TRACE("destroying %p\n", This);
|
|
RegCloseKey(This->tipkey);
|
|
if (This->langkey)
|
|
RegCloseKey(This->langkey);
|
|
HeapFree(GetProcessHeap(),0,This);
|
|
}
|
|
|
|
static HRESULT WINAPI EnumTfLanguageProfiles_QueryInterface(IEnumTfLanguageProfiles *iface, REFIID iid, LPVOID *ppvOut)
|
|
{
|
|
EnumTfLanguageProfiles *This = (EnumTfLanguageProfiles *)iface;
|
|
*ppvOut = NULL;
|
|
|
|
if (IsEqualIID(iid, &IID_IUnknown) || IsEqualIID(iid, &IID_IEnumTfLanguageProfiles))
|
|
{
|
|
*ppvOut = This;
|
|
}
|
|
|
|
if (*ppvOut)
|
|
{
|
|
IUnknown_AddRef(iface);
|
|
return S_OK;
|
|
}
|
|
|
|
WARN("unsupported interface: %s\n", debugstr_guid(iid));
|
|
return E_NOINTERFACE;
|
|
}
|
|
|
|
static ULONG WINAPI EnumTfLanguageProfiles_AddRef(IEnumTfLanguageProfiles *iface)
|
|
{
|
|
EnumTfLanguageProfiles *This = (EnumTfLanguageProfiles*)iface;
|
|
return InterlockedIncrement(&This->refCount);
|
|
}
|
|
|
|
static ULONG WINAPI EnumTfLanguageProfiles_Release(IEnumTfLanguageProfiles *iface)
|
|
{
|
|
EnumTfLanguageProfiles *This = (EnumTfLanguageProfiles *)iface;
|
|
ULONG ret;
|
|
|
|
ret = InterlockedDecrement(&This->refCount);
|
|
if (ret == 0)
|
|
EnumTfLanguageProfiles_Destructor(This);
|
|
return ret;
|
|
}
|
|
|
|
/*****************************************************
|
|
* IEnumGuid functions
|
|
*****************************************************/
|
|
static INT next_LanguageProfile(EnumTfLanguageProfiles *This, CLSID clsid, TF_LANGUAGEPROFILE *tflp)
|
|
{
|
|
WCHAR fullkey[168];
|
|
ULONG res;
|
|
WCHAR profileid[39];
|
|
DWORD cName = 39;
|
|
GUID profile;
|
|
|
|
static const WCHAR fmt[] = {'%','s','\\','%','s','\\','0','x','%','0','8','x',0};
|
|
|
|
if (This->langkey == NULL)
|
|
{
|
|
sprintfW(fullkey,fmt,This->szwCurrentClsid,szwLngp,This->langid);
|
|
res = RegOpenKeyExW(This->tipkey, fullkey, 0, KEY_READ | KEY_WRITE, &This->langkey);
|
|
if (res)
|
|
{
|
|
This->langkey = NULL;
|
|
return -1;
|
|
}
|
|
This->lang_index = 0;
|
|
}
|
|
res = RegEnumKeyExW(This->langkey, This->lang_index, profileid, &cName,
|
|
NULL, NULL, NULL, NULL);
|
|
if (res != ERROR_SUCCESS && res != ERROR_MORE_DATA)
|
|
{
|
|
RegCloseKey(This->langkey);
|
|
This->langkey = NULL;
|
|
return -1;
|
|
}
|
|
++(This->lang_index);
|
|
|
|
if (tflp)
|
|
{
|
|
res = CLSIDFromString(profileid, &profile);
|
|
if (FAILED(res)) return 0;
|
|
|
|
tflp->clsid = clsid;
|
|
tflp->langid = This->langid;
|
|
/* FIXME */
|
|
tflp->fActive = FALSE;
|
|
tflp->guidProfile = profile;
|
|
/* FIXME set catid */
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
static HRESULT WINAPI EnumTfLanguageProfiles_Next(IEnumTfLanguageProfiles *iface,
|
|
ULONG ulCount, TF_LANGUAGEPROFILE *pProfile, ULONG *pcFetch)
|
|
{
|
|
EnumTfLanguageProfiles *This = (EnumTfLanguageProfiles *)iface;
|
|
ULONG fetched = 0;
|
|
|
|
TRACE("(%p)\n",This);
|
|
|
|
if (pProfile == NULL) return E_POINTER;
|
|
|
|
if (This->tipkey) while (fetched < ulCount)
|
|
{
|
|
LSTATUS res;
|
|
HRESULT hr;
|
|
DWORD cName = 39;
|
|
GUID clsid;
|
|
|
|
res = RegEnumKeyExW(This->tipkey, This->tip_index,
|
|
This->szwCurrentClsid, &cName, NULL, NULL, NULL, NULL);
|
|
if (res != ERROR_SUCCESS && res != ERROR_MORE_DATA) break;
|
|
++(This->tip_index);
|
|
hr = CLSIDFromString(This->szwCurrentClsid, &clsid);
|
|
if (FAILED(hr)) continue;
|
|
|
|
while ( fetched < ulCount)
|
|
{
|
|
INT res = next_LanguageProfile(This, clsid, pProfile);
|
|
if (res == 1)
|
|
{
|
|
++fetched;
|
|
++pProfile;
|
|
}
|
|
else if (res == -1)
|
|
break;
|
|
else
|
|
continue;
|
|
}
|
|
}
|
|
|
|
if (pcFetch) *pcFetch = fetched;
|
|
return fetched == ulCount ? S_OK : S_FALSE;
|
|
}
|
|
|
|
static HRESULT WINAPI EnumTfLanguageProfiles_Skip( IEnumTfLanguageProfiles* iface, ULONG celt)
|
|
{
|
|
EnumTfLanguageProfiles *This = (EnumTfLanguageProfiles *)iface;
|
|
FIXME("STUB (%p)\n",This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI EnumTfLanguageProfiles_Reset( IEnumTfLanguageProfiles* iface)
|
|
{
|
|
EnumTfLanguageProfiles *This = (EnumTfLanguageProfiles *)iface;
|
|
TRACE("(%p)\n",This);
|
|
This->tip_index = 0;
|
|
if (This->langkey)
|
|
RegCloseKey(This->langkey);
|
|
This->langkey = NULL;
|
|
This->lang_index = 0;
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI EnumTfLanguageProfiles_Clone( IEnumTfLanguageProfiles *iface,
|
|
IEnumTfLanguageProfiles **ppenum)
|
|
{
|
|
EnumTfLanguageProfiles *This = (EnumTfLanguageProfiles *)iface;
|
|
HRESULT res;
|
|
|
|
TRACE("(%p)\n",This);
|
|
|
|
if (ppenum == NULL) return E_POINTER;
|
|
|
|
res = EnumTfLanguageProfiles_Constructor(This->langid, ppenum);
|
|
if (SUCCEEDED(res))
|
|
{
|
|
EnumTfLanguageProfiles *new_This = (EnumTfLanguageProfiles *)*ppenum;
|
|
new_This->tip_index = This->tip_index;
|
|
lstrcpynW(new_This->szwCurrentClsid,This->szwCurrentClsid,39);
|
|
|
|
if (This->langkey)
|
|
{
|
|
WCHAR fullkey[168];
|
|
static const WCHAR fmt[] = {'%','s','\\','%','s','\\','0','x','%','0','8','x',0};
|
|
|
|
sprintfW(fullkey,fmt,This->szwCurrentClsid,szwLngp,This->langid);
|
|
res = RegOpenKeyExW(new_This->tipkey, fullkey, 0, KEY_READ | KEY_WRITE, &This->langkey);
|
|
new_This->lang_index = This->lang_index;
|
|
}
|
|
}
|
|
return res;
|
|
}
|
|
|
|
static const IEnumTfLanguageProfilesVtbl IEnumTfLanguageProfiles_Vtbl ={
|
|
EnumTfLanguageProfiles_QueryInterface,
|
|
EnumTfLanguageProfiles_AddRef,
|
|
EnumTfLanguageProfiles_Release,
|
|
|
|
EnumTfLanguageProfiles_Clone,
|
|
EnumTfLanguageProfiles_Next,
|
|
EnumTfLanguageProfiles_Reset,
|
|
EnumTfLanguageProfiles_Skip
|
|
};
|
|
|
|
static HRESULT EnumTfLanguageProfiles_Constructor(LANGID langid, IEnumTfLanguageProfiles **ppOut)
|
|
{
|
|
EnumTfLanguageProfiles *This;
|
|
|
|
This = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(EnumTfLanguageProfiles));
|
|
if (This == NULL)
|
|
return E_OUTOFMEMORY;
|
|
|
|
This->Vtbl= &IEnumTfLanguageProfiles_Vtbl;
|
|
This->refCount = 1;
|
|
This->langid = langid;
|
|
|
|
if (RegCreateKeyExW(HKEY_LOCAL_MACHINE, szwSystemTIPKey, 0, NULL, 0,
|
|
KEY_READ | KEY_WRITE, NULL, &This->tipkey, NULL) != ERROR_SUCCESS)
|
|
return E_FAIL;
|
|
|
|
TRACE("returning %p\n", This);
|
|
*ppOut = (IEnumTfLanguageProfiles*)This;
|
|
return S_OK;
|
|
}
|