slouken@1895: /*
slouken@1895:     SDL - Simple DirectMedia Layer
slouken@3697:     Copyright (C) 1997-2010 Sam Lantinga
slouken@1895: 
slouken@1895:     This library is free software; you can redistribute it and/or
slouken@1895:     modify it under the terms of the GNU Lesser General Public
slouken@1895:     License as published by the Free Software Foundation; either
slouken@1895:     version 2.1 of the License, or (at your option) any later version.
slouken@1895: 
slouken@1895:     This library is distributed in the hope that it will be useful,
slouken@1895:     but WITHOUT ANY WARRANTY; without even the implied warranty of
slouken@1895:     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
slouken@1895:     Lesser General Public License for more details.
slouken@1895: 
slouken@1895:     You should have received a copy of the GNU Lesser General Public
slouken@1895:     License along with this library; if not, write to the Free Software
slouken@1895:     Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
slouken@1895: 
slouken@1895:     Sam Lantinga
slouken@1895:     slouken@libsdl.org
slouken@1895: */
slouken@1895: #include "SDL_config.h"
slouken@1895: 
slouken@5086: #ifdef _WIN32_WCE
slouken@5086: #define SDL_DISABLE_WINDOWS_IME
slouken@5086: #endif
slouken@5086: 
slouken@5062: #include "SDL_windowsvideo.h"
slouken@1895: 
slouken@1895: #include "../../events/SDL_keyboard_c.h"
slouken@5062: #include "../../events/scancodes_windows.h"
slouken@1895: 
dewyatt@4752: #include <imm.h>
dewyatt@4759: #include <oleauto.h>
dewyatt@4759: 
slouken@5086: #ifndef SDL_DISABLE_WINDOWS_IME
dewyatt@4759: static void IME_Init(SDL_VideoData *videodata, HWND hwnd);
dewyatt@4759: static void IME_Enable(SDL_VideoData *videodata, HWND hwnd);
dewyatt@4759: static void IME_Disable(SDL_VideoData *videodata, HWND hwnd);
dewyatt@4759: static void IME_Quit(SDL_VideoData *videodata);
slouken@5086: #endif /* !SDL_DISABLE_WINDOWS_IME */
dewyatt@4752: 
slouken@2311: #ifndef MAPVK_VK_TO_VSC
slouken@2311: #define MAPVK_VK_TO_VSC     0
slouken@2311: #endif
slouken@2311: #ifndef MAPVK_VSC_TO_VK
slouken@2311: #define MAPVK_VSC_TO_VK     1
slouken@2311: #endif
slouken@2311: #ifndef MAPVK_VK_TO_CHAR
slouken@2311: #define MAPVK_VK_TO_CHAR    2
slouken@2311: #endif
slouken@2311: 
slouken@2311: /* Alphabetic scancodes for PC keyboards */
slouken@2311: BYTE alpha_scancodes[26] = {
slouken@2311:     30, 48, 46, 32, 18, 33, 34, 35, 23, 36, 37, 38, 50, 49, 24,
slouken@2311:     25, 16, 19, 31, 20, 22, 47, 17, 45, 21, 44
slouken@2311: };
slouken@2735: 
slouken@2317: BYTE keypad_scancodes[10] = {
slouken@2317:     82, 79, 80, 81, 75, 76, 77, 71, 72, 73
slouken@2317: };
slouken@2311: 
slouken@1895: void
slouken@1895: WIN_InitKeyboard(_THIS)
slouken@1895: {
slouken@1895:     SDL_VideoData *data = (SDL_VideoData *) _this->driverdata;
slouken@2311:     int i;
slouken@2311: 
slouken@2311:     /* Make sure the alpha scancodes are correct.  T isn't usually remapped */
bob@2324:     if (MapVirtualKey('T', MAPVK_VK_TO_VSC) != alpha_scancodes['T' - 'A']) {
slouken@2724: #if 0
slouken@2726:         printf
slouken@2726:             ("Fixing alpha scancode map, assuming US QWERTY layout!\nPlease send the following 26 lines of output to the SDL mailing list <sdl@libsdl.org>, including a description of your keyboard hardware.\n");
slouken@2724: #endif
slouken@2311:         for (i = 0; i < SDL_arraysize(alpha_scancodes); ++i) {
bob@2324:             alpha_scancodes[i] = MapVirtualKey('A' + i, MAPVK_VK_TO_VSC);
slouken@2724: #if 0
bob@2324:             printf("%d = %d\n", i, alpha_scancodes[i]);
slouken@2724: #endif
slouken@2311:         }
slouken@2311:     }
slouken@2317:     if (MapVirtualKey(VK_NUMPAD0, MAPVK_VK_TO_VSC) != keypad_scancodes[0]) {
slouken@2724: #if 0
slouken@2726:         printf
slouken@2726:             ("Fixing keypad scancode map!\nPlease send the following 10 lines of output to the SDL mailing list <sdl@libsdl.org>, including a description of your keyboard hardware.\n");
slouken@2724: #endif
slouken@2317:         for (i = 0; i < SDL_arraysize(keypad_scancodes); ++i) {
bob@2324:             keypad_scancodes[i] =
bob@2324:                 MapVirtualKey(VK_NUMPAD0 + i, MAPVK_VK_TO_VSC);
slouken@2724: #if 0
bob@2324:             printf("%d = %d\n", i, keypad_scancodes[i]);
slouken@2724: #endif
slouken@2317:         }
slouken@2317:     }
slouken@1895: 
slouken@5062:     data->key_layout = windows_scancode_table;
slouken@2308: 
dewyatt@4752:     data->ime_com_initialized = SDL_FALSE;
dewyatt@4759:     data->ime_threadmgr = 0;
dewyatt@4752:     data->ime_initialized = SDL_FALSE;
dewyatt@4752:     data->ime_enabled = SDL_FALSE;
dewyatt@4752:     data->ime_available = SDL_FALSE;
dewyatt@4752:     data->ime_hwnd_main = 0;
dewyatt@4752:     data->ime_hwnd_current = 0;
dewyatt@4752:     data->ime_himc = 0;
dewyatt@4759:     data->ime_composition[0] = 0;
dewyatt@4759:     data->ime_readingstring[0] = 0;
dewyatt@4759:     data->ime_cursor = 0;
Daniel@4913: 
Daniel@4913:     data->ime_candlist = SDL_FALSE;
Daniel@4913:     SDL_memset(data->ime_candidates, 0, sizeof(data->ime_candidates));
Daniel@4913:     data->ime_candcount = 0;
Daniel@4913:     data->ime_candref = 0;
Daniel@4913:     data->ime_candsel = 0;
Daniel@4913:     data->ime_candpgsize = 0;
Daniel@4913:     data->ime_candlistindexbase = 0;
Daniel@4913:     data->ime_candvertical = SDL_TRUE;
Daniel@4913: 
Daniel@4913:     data->ime_candtex = NULL;
Daniel@4913:     data->ime_dirty = SDL_FALSE;
Daniel@4913:     SDL_memset(&data->ime_rect, 0, sizeof(data->ime_rect));
Daniel@4913:     SDL_memset(&data->ime_candlistrect, 0, sizeof(data->ime_candlistrect));
Daniel@4913:     data->ime_winwidth = 0;
Daniel@4913:     data->ime_winheight = 0;
Daniel@4913: 
dewyatt@4759:     data->ime_hkl = 0;
dewyatt@4759:     data->ime_himm32 = 0;
dewyatt@4759:     data->GetReadingString = 0;
dewyatt@4759:     data->ShowReadingWindow = 0;
dewyatt@4759:     data->ImmLockIMC = 0;
dewyatt@4759:     data->ImmUnlockIMC = 0;
dewyatt@4759:     data->ImmLockIMCC = 0;
dewyatt@4759:     data->ImmUnlockIMCC = 0;
dewyatt@4759:     data->ime_uiless = SDL_FALSE;
dewyatt@4759:     data->ime_threadmgrex = 0;
dewyatt@4759:     data->ime_uielemsinkcookie = TF_INVALID_COOKIE;
dewyatt@4759:     data->ime_alpnsinkcookie = TF_INVALID_COOKIE;
dewyatt@4759:     data->ime_openmodesinkcookie = TF_INVALID_COOKIE;
dewyatt@4759:     data->ime_convmodesinkcookie = TF_INVALID_COOKIE;
dewyatt@4759:     data->ime_uielemsink = 0;
dewyatt@4759:     data->ime_ippasink = 0;
dewyatt@4752: 
slouken@4465:     WIN_UpdateKeymap();
slouken@2308: 
slouken@2308:     SDL_SetScancodeName(SDL_SCANCODE_APPLICATION, "Menu");
slouken@2308:     SDL_SetScancodeName(SDL_SCANCODE_LGUI, "Left Windows");
slouken@2308:     SDL_SetScancodeName(SDL_SCANCODE_RGUI, "Right Windows");
slouken@2308: }
slouken@2308: 
slouken@2308: void
slouken@4465: WIN_UpdateKeymap()
slouken@2308: {
slouken@2308:     int i;
krogoway@5081:     SDL_ScanCode scancode;
slouken@2308:     SDLKey keymap[SDL_NUM_SCANCODES];
slouken@2308: 
slouken@2308:     SDL_GetDefaultKeymap(keymap);
slouken@2308: 
slouken@5062:     for (i = 0; i < SDL_arraysize(windows_scancode_table); i++) {
slouken@2308: 
slouken@2308:         /* Make sure this scancode is a valid character scancode */
slouken@5062:         scancode = windows_scancode_table[i];
slouken@4561:         if (scancode == SDL_SCANCODE_UNKNOWN || keymap[scancode] >= 127) {
slouken@2308:             continue;
slouken@2308:         }
slouken@2311: 
slouken@2311:         /* Alphabetic keys are handled specially, since Windows remaps them */
slouken@2311:         if (i >= 'A' && i <= 'Z') {
bob@2324:             BYTE vsc = alpha_scancodes[i - 'A'];
slouken@2311:             keymap[scancode] = MapVirtualKey(vsc, MAPVK_VSC_TO_VK) + 0x20;
slouken@2311:         } else {
slouken@2311:             keymap[scancode] = (MapVirtualKey(i, MAPVK_VK_TO_CHAR) & 0x7FFF);
slouken@2311:         }
slouken@2308:     }
slouken@4465:     SDL_SetKeymap(0, keymap, SDL_NUM_SCANCODES);
slouken@1895: }
slouken@1895: 
slouken@1895: void
slouken@1895: WIN_QuitKeyboard(_THIS)
slouken@1895: {
slouken@5086: #ifndef SDL_DISABLE_WINDOWS_IME
dewyatt@4752:     IME_Quit((SDL_VideoData *)_this->driverdata);
slouken@5086: #endif
slouken@1895: }
slouken@1895: 
dewyatt@4747: void
dewyatt@4753: WIN_StartTextInput(_THIS)
dewyatt@4747: {
slouken@5086: #ifndef SDL_DISABLE_WINDOWS_IME
dewyatt@4753:     SDL_Window *window = SDL_GetKeyboardFocus();
dewyatt@4759:     if (window) {
dewyatt@4753:         HWND hwnd = ((SDL_WindowData *) window->driverdata)->hwnd;
dewyatt@4753:         SDL_VideoData *videodata = (SDL_VideoData *)_this->driverdata;
Daniel@4913:         SDL_GetWindowSize(window, &videodata->ime_winwidth, &videodata->ime_winheight);
dewyatt@4753:         IME_Init(videodata, hwnd);
dewyatt@4753:         IME_Enable(videodata, hwnd);
dewyatt@4753:     }
slouken@5086: #endif /* !SDL_DISABLE_WINDOWS_IME */
dewyatt@4747: }
dewyatt@4747: 
dewyatt@4747: void
dewyatt@4753: WIN_StopTextInput(_THIS)
dewyatt@4747: {
slouken@5086: #ifndef SDL_DISABLE_WINDOWS_IME
dewyatt@4753:     SDL_Window *window = SDL_GetKeyboardFocus();
dewyatt@4759:     if (window) {
dewyatt@4753:         HWND hwnd = ((SDL_WindowData *) window->driverdata)->hwnd;
dewyatt@4753:         SDL_VideoData *videodata = (SDL_VideoData *)_this->driverdata;
dewyatt@4753:         IME_Init(videodata, hwnd);
dewyatt@4753:         IME_Disable(videodata, hwnd);
dewyatt@4753:     }
slouken@5086: #endif /* !SDL_DISABLE_WINDOWS_IME */
dewyatt@4747: }
dewyatt@4747: 
dewyatt@4747: void
dewyatt@4747: WIN_SetTextInputRect(_THIS, SDL_Rect *rect)
dewyatt@4747: {
Daniel@4913:     SDL_VideoData *videodata = (SDL_VideoData *)_this->driverdata;
Daniel@4913:     videodata->ime_rect = *rect;
dewyatt@4747: }
dewyatt@4747: 
slouken@5086: #ifdef SDL_DISABLE_WINDOWS_IME
slouken@5086: 
slouken@5086: 
slouken@5086: SDL_bool
slouken@5086: IME_HandleMessage(HWND hwnd, UINT msg, WPARAM wParam, LPARAM *lParam, SDL_VideoData *videodata)
slouken@5086: {
slouken@5086:     return SDL_FALSE;
slouken@5086: }
slouken@5086: 
slouken@5086: void IME_Present(SDL_VideoData *videodata)
slouken@5086: {
slouken@5086: }
slouken@5086: 
slouken@5086: #else
slouken@5086: 
Daniel@4893: #ifdef __GNUC__
Daniel@4893: #undef DEFINE_GUID
slouken@4894: #define DEFINE_GUID(n,l,w1,w2,b1,b2,b3,b4,b5,b6,b7,b8) static const GUID n = {l,w1,w2,{b1,b2,b3,b4,b5,b6,b7,b8}}
Daniel@4893: DEFINE_GUID(IID_ITfInputProcessorProfileActivationSink,        0x71C6E74E,0x0F28,0x11D8,0xA8,0x2A,0x00,0x06,0x5B,0x84,0x43,0x5C);
Daniel@4893: DEFINE_GUID(IID_ITfUIElementSink,                              0xEA1EA136,0x19DF,0x11D7,0xA6,0xD2,0x00,0x06,0x5B,0x84,0x43,0x5C);
Daniel@4893: DEFINE_GUID(GUID_TFCAT_TIP_KEYBOARD,                           0x34745C63,0xB2F0,0x4784,0x8B,0x67,0x5E,0x12,0xC8,0x70,0x1A,0x31);
Daniel@4893: DEFINE_GUID(IID_ITfSource,                                     0x4EA48A35,0x60AE,0x446F,0x8F,0xD6,0xE6,0xA8,0xD8,0x24,0x59,0xF7);
Daniel@4893: DEFINE_GUID(IID_ITfUIElementMgr,                               0xEA1EA135,0x19DF,0x11D7,0xA6,0xD2,0x00,0x06,0x5B,0x84,0x43,0x5C);
Daniel@4913: DEFINE_GUID(IID_ITfCandidateListUIElement,                     0xEA1EA138,0x19DF,0x11D7,0xA6,0xD2,0x00,0x06,0x5B,0x84,0x43,0x5C);
Daniel@4893: DEFINE_GUID(IID_ITfReadingInformationUIElement,                0xEA1EA139,0x19DF,0x11D7,0xA6,0xD2,0x00,0x06,0x5B,0x84,0x43,0x5C);
Daniel@4893: DEFINE_GUID(IID_ITfThreadMgr,                                  0xAA80E801,0x2021,0x11D2,0x93,0xE0,0x00,0x60,0xB0,0x67,0xB8,0x6E);
Daniel@4893: DEFINE_GUID(CLSID_TF_ThreadMgr,                                0x529A9E6B,0x6587,0x4F23,0xAB,0x9E,0x9C,0x7D,0x68,0x3E,0x3C,0x50);
Daniel@4893: DEFINE_GUID(IID_ITfThreadMgrEx,                                0x3E90ADE3,0x7594,0x4CB0,0xBB,0x58,0x69,0x62,0x8F,0x5F,0x45,0x8C);
Daniel@4893: #endif
Daniel@4893: 
dewyatt@4759: #define LANG_CHT MAKELANGID(LANG_CHINESE, SUBLANG_CHINESE_TRADITIONAL)
dewyatt@4759: #define LANG_CHS MAKELANGID(LANG_CHINESE, SUBLANG_CHINESE_SIMPLIFIED)
dewyatt@4759: 
dewyatt@4759: #define MAKEIMEVERSION(major,minor) ((DWORD) (((BYTE)(major) << 24) | ((BYTE)(minor) << 16) ))
dewyatt@4759: #define IMEID_VER(id) ((id) & 0xffff0000)
dewyatt@4759: #define IMEID_LANG(id) ((id) & 0x0000ffff)
dewyatt@4759: 
dewyatt@4759: #define CHT_HKL_DAYI            ((HKL)0xE0060404)
dewyatt@4759: #define CHT_HKL_NEW_PHONETIC    ((HKL)0xE0080404)
dewyatt@4759: #define CHT_HKL_NEW_CHANG_JIE   ((HKL)0xE0090404)
dewyatt@4759: #define CHT_HKL_NEW_QUICK       ((HKL)0xE00A0404)
dewyatt@4759: #define CHT_HKL_HK_CANTONESE    ((HKL)0xE00B0404)
dewyatt@4759: #define CHT_IMEFILENAME1        "TINTLGNT.IME"
dewyatt@4759: #define CHT_IMEFILENAME2        "CINTLGNT.IME"
dewyatt@4759: #define CHT_IMEFILENAME3        "MSTCIPHA.IME"
dewyatt@4759: #define IMEID_CHT_VER42         (LANG_CHT | MAKEIMEVERSION(4, 2))
dewyatt@4759: #define IMEID_CHT_VER43         (LANG_CHT | MAKEIMEVERSION(4, 3))
dewyatt@4759: #define IMEID_CHT_VER44         (LANG_CHT | MAKEIMEVERSION(4, 4))
dewyatt@4759: #define IMEID_CHT_VER50         (LANG_CHT | MAKEIMEVERSION(5, 0))
dewyatt@4759: #define IMEID_CHT_VER51         (LANG_CHT | MAKEIMEVERSION(5, 1))
dewyatt@4759: #define IMEID_CHT_VER52         (LANG_CHT | MAKEIMEVERSION(5, 2))
dewyatt@4759: #define IMEID_CHT_VER60         (LANG_CHT | MAKEIMEVERSION(6, 0))
dewyatt@4759: #define IMEID_CHT_VER_VISTA     (LANG_CHT | MAKEIMEVERSION(7, 0))
dewyatt@4759: 
dewyatt@4759: #define CHS_HKL                 ((HKL)0xE00E0804)
dewyatt@4759: #define CHS_IMEFILENAME1        "PINTLGNT.IME"
dewyatt@4759: #define CHS_IMEFILENAME2        "MSSCIPYA.IME"
dewyatt@4759: #define IMEID_CHS_VER41         (LANG_CHS | MAKEIMEVERSION(4, 1))
dewyatt@4759: #define IMEID_CHS_VER42         (LANG_CHS | MAKEIMEVERSION(4, 2))
dewyatt@4759: #define IMEID_CHS_VER53         (LANG_CHS | MAKEIMEVERSION(5, 3))
dewyatt@4759: 
dewyatt@4759: #define LANG() LOWORD((videodata->ime_hkl))
dewyatt@4759: #define PRIMLANG() ((WORD)PRIMARYLANGID(LANG()))
dewyatt@4759: #define SUBLANG() SUBLANGID(LANG())
dewyatt@4759: 
dewyatt@4759: static void IME_UpdateInputLocale(SDL_VideoData *videodata);
dewyatt@4759: static void IME_ClearComposition(SDL_VideoData *videodata);
dewyatt@4759: static void IME_SetWindow(SDL_VideoData* videodata, HWND hwnd);
dewyatt@4759: static void IME_SetupAPI(SDL_VideoData *videodata);
dewyatt@4759: static DWORD IME_GetId(SDL_VideoData *videodata, UINT uIndex);
dewyatt@4759: static void IME_SendEditingEvent(SDL_VideoData *videodata);
Daniel@4913: static void IME_DestroyTextures(SDL_VideoData *videodata);
Daniel@4913: 
dewyatt@4759: #define SDL_IsEqualIID(riid1, riid2) SDL_IsEqualGUID(riid1, riid2)
dewyatt@4759: #define SDL_IsEqualGUID(rguid1, rguid2) (!SDL_memcmp(rguid1, rguid2, sizeof(GUID)))
dewyatt@4759: 
dewyatt@4759: static SDL_bool UILess_SetupSinks(SDL_VideoData *videodata);
dewyatt@4759: static void UILess_ReleaseSinks(SDL_VideoData *videodata);
dewyatt@4759: static void UILess_EnableUIUpdates(SDL_VideoData *videodata);
dewyatt@4759: static void UILess_DisableUIUpdates(SDL_VideoData *videodata);
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: IME_Init(SDL_VideoData *videodata, HWND hwnd)
dewyatt@4752: {
dewyatt@4759:     if (videodata->ime_initialized)
dewyatt@4752:         return;
dewyatt@4752: 
dewyatt@4759:     videodata->ime_hwnd_main = hwnd;
dewyatt@4759:     if (SUCCEEDED(CoInitializeEx(NULL, COINIT_APARTMENTTHREADED))) {
dewyatt@4759:         videodata->ime_com_initialized = SDL_TRUE;
Daniel@4893:         CoCreateInstance(&CLSID_TF_ThreadMgr, NULL, CLSCTX_INPROC_SERVER, &IID_ITfThreadMgr, (LPVOID *)&videodata->ime_threadmgr);
dewyatt@4759:     }
dewyatt@4759:     videodata->ime_initialized = SDL_TRUE;
dewyatt@4759:     videodata->ime_himm32 = LoadLibraryA("imm32.dll");
dewyatt@4759:     if (!videodata->ime_himm32) {
dewyatt@4759:         videodata->ime_available = SDL_FALSE;
dewyatt@4759:         return;
dewyatt@4759:     }
dewyatt@4759:     videodata->ImmLockIMC = (LPINPUTCONTEXT2 (WINAPI *)(HIMC))GetProcAddress(videodata->ime_himm32, "ImmLockIMC");
dewyatt@4759:     videodata->ImmUnlockIMC = (BOOL (WINAPI *)(HIMC))GetProcAddress(videodata->ime_himm32, "ImmUnlockIMC");
dewyatt@4759:     videodata->ImmLockIMCC = (LPVOID (WINAPI *)(HIMCC))GetProcAddress(videodata->ime_himm32, "ImmLockIMCC");
dewyatt@4759:     videodata->ImmUnlockIMCC = (BOOL (WINAPI *)(HIMCC))GetProcAddress(videodata->ime_himm32, "ImmUnlockIMCC");
dewyatt@4752: 
dewyatt@4759:     IME_SetWindow(videodata, hwnd);
dewyatt@4759:     videodata->ime_himc = ImmGetContext(hwnd);
dewyatt@4759:     ImmReleaseContext(hwnd, videodata->ime_himc);
dewyatt@4759:     if (!videodata->ime_himc) {
dewyatt@4759:         videodata->ime_available = SDL_FALSE;
dewyatt@4759:         IME_Disable(videodata, hwnd);
dewyatt@4759:         return;
dewyatt@4759:     }
dewyatt@4759:     videodata->ime_available = SDL_TRUE;
dewyatt@4759:     IME_UpdateInputLocale(videodata);
dewyatt@4759:     IME_SetupAPI(videodata);
dewyatt@4759:     videodata->ime_uiless = UILess_SetupSinks(videodata);
dewyatt@4759:     IME_UpdateInputLocale(videodata);
dewyatt@4759:     IME_Disable(videodata, hwnd);
dewyatt@4752: }
dewyatt@4752: 
dewyatt@4759: static void
dewyatt@4752: IME_Enable(SDL_VideoData *videodata, HWND hwnd)
dewyatt@4752: {
dewyatt@4752:     if (!videodata->ime_initialized || !videodata->ime_hwnd_current)
dewyatt@4752:         return;
dewyatt@4752: 
dewyatt@4752:     if (!videodata->ime_available) {
dewyatt@4752:         IME_Disable(videodata, hwnd);
dewyatt@4752:         return;
dewyatt@4752:     }
dewyatt@4752:     if (videodata->ime_hwnd_current == videodata->ime_hwnd_main)
dewyatt@4752:         ImmAssociateContext(videodata->ime_hwnd_current, videodata->ime_himc);
dewyatt@4752: 
dewyatt@4752:     videodata->ime_enabled = SDL_TRUE;
dewyatt@4759:     IME_UpdateInputLocale(videodata);
dewyatt@4759:     UILess_EnableUIUpdates(videodata);
dewyatt@4752: }
dewyatt@4752: 
dewyatt@4759: static void
dewyatt@4759: IME_Disable(SDL_VideoData *videodata, HWND hwnd)
dewyatt@4752: {
dewyatt@4759:     if (!videodata->ime_initialized || !videodata->ime_hwnd_current)
dewyatt@4752:         return;
dewyatt@4752: 
dewyatt@4759:     IME_ClearComposition(videodata);
dewyatt@4759:     if (videodata->ime_hwnd_current == videodata->ime_hwnd_main)
Daniel@4893:         ImmAssociateContext(videodata->ime_hwnd_current, (HIMC)0);
dewyatt@4759: 
dewyatt@4759:     videodata->ime_enabled = SDL_FALSE;
dewyatt@4759:     UILess_DisableUIUpdates(videodata);
dewyatt@4752: }
dewyatt@4752: 
dewyatt@4759: static void
dewyatt@4752: IME_Quit(SDL_VideoData *videodata)
dewyatt@4752: {
dewyatt@4752:     if (!videodata->ime_initialized)
dewyatt@4752:         return;
dewyatt@4752: 
dewyatt@4759:     UILess_ReleaseSinks(videodata);
dewyatt@4752:     if (videodata->ime_hwnd_main)
dewyatt@4752:         ImmAssociateContext(videodata->ime_hwnd_main, videodata->ime_himc);
dewyatt@4752: 
dewyatt@4752:     videodata->ime_hwnd_main = 0;
dewyatt@4752:     videodata->ime_himc = 0;
dewyatt@4760:     if (videodata->ime_himm32) {
dewyatt@4759:         FreeLibrary(videodata->ime_himm32);
dewyatt@4759:         videodata->ime_himm32 = 0;
dewyatt@4759:     }
dewyatt@4760:     if (videodata->ime_threadmgr) {
dewyatt@4759:         videodata->ime_threadmgr->lpVtbl->Release(videodata->ime_threadmgr);
dewyatt@4759:         videodata->ime_threadmgr = 0;
dewyatt@4752:     }
dewyatt@4760:     if (videodata->ime_com_initialized) {
dewyatt@4752:         CoUninitialize();
dewyatt@4752:         videodata->ime_com_initialized = SDL_FALSE;
dewyatt@4752:     }
Daniel@4913:     IME_DestroyTextures(videodata);
dewyatt@4752:     videodata->ime_initialized = SDL_FALSE;
dewyatt@4752: }
dewyatt@4752: 
dewyatt@4759: static void
dewyatt@4759: IME_GetReadingString(SDL_VideoData *videodata, HWND hwnd)
dewyatt@4759: {
dewyatt@4759:     DWORD id = 0;
dewyatt@4759:     HIMC himc = 0;
dewyatt@4759:     WCHAR buffer[16];
dewyatt@4759:     WCHAR *s = buffer;
dewyatt@4759:     DWORD len = 0;
Daniel@4893:     INT err = 0;
dewyatt@4759:     BOOL vertical = FALSE;
dewyatt@4759:     UINT maxuilen = 0;
dewyatt@4759:     static OSVERSIONINFOA osversion = {0};
dewyatt@4759:     if (videodata->ime_uiless)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4759:     videodata->ime_readingstring[0] = 0;
dewyatt@4760:     if (!osversion.dwOSVersionInfoSize) {
dewyatt@4759:         osversion.dwOSVersionInfoSize = sizeof(osversion);
dewyatt@4759:         GetVersionExA(&osversion);
dewyatt@4759:     }
dewyatt@4759:     id = IME_GetId(videodata, 0);
dewyatt@4759:     if (!id)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4759:     himc = ImmGetContext(hwnd);
dewyatt@4759:     if (!himc)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4760:     if (videodata->GetReadingString) {
dewyatt@4759:         len = videodata->GetReadingString(himc, 0, 0, &err, &vertical, &maxuilen);
dewyatt@4760:         if (len) {
dewyatt@4759:             if (len > SDL_arraysize(buffer))
dewyatt@4759:                 len = SDL_arraysize(buffer);
dewyatt@4759: 
dewyatt@4759:             len = videodata->GetReadingString(himc, len, s, &err, &vertical, &maxuilen);
dewyatt@4759:         }
dewyatt@4759:         SDL_wcslcpy(videodata->ime_readingstring, s, len);
dewyatt@4759:     }
dewyatt@4760:     else {
dewyatt@4759:         LPINPUTCONTEXT2 lpimc = videodata->ImmLockIMC(himc);
dewyatt@4759:         LPBYTE p = 0;
dewyatt@4759:         s = 0;
dewyatt@4759:         switch (id)
dewyatt@4759:         {
dewyatt@4759:         case IMEID_CHT_VER42:
dewyatt@4759:         case IMEID_CHT_VER43:
dewyatt@4759:         case IMEID_CHT_VER44:
dewyatt@4759:             p = *(LPBYTE *)((LPBYTE)videodata->ImmLockIMCC(lpimc->hPrivate) + 24);
dewyatt@4759:             if (!p)
dewyatt@4759:                 break;
dewyatt@4759: 
dewyatt@4759:             len = *(DWORD *)(p + 7*4 + 32*4);
dewyatt@4759:             s = (WCHAR *)(p + 56);
dewyatt@4759:             break;
dewyatt@4759:         case IMEID_CHT_VER51:
dewyatt@4759:         case IMEID_CHT_VER52:
dewyatt@4759:         case IMEID_CHS_VER53:
dewyatt@4759:             p = *(LPBYTE *)((LPBYTE)videodata->ImmLockIMCC(lpimc->hPrivate) + 4);
dewyatt@4759:             if (!p)
dewyatt@4759:                 break;
dewyatt@4759: 
dewyatt@4759:             p = *(LPBYTE *)((LPBYTE)p + 1*4 + 5*4);
dewyatt@4759:             if (!p)
dewyatt@4759:                 break;
dewyatt@4759: 
dewyatt@4759:             len = *(DWORD *)(p + 1*4 + (16*2+2*4) + 5*4 + 16*2);
dewyatt@4759:             s = (WCHAR *)(p + 1*4 + (16*2+2*4) + 5*4);
dewyatt@4759:             break;
dewyatt@4759:         case IMEID_CHS_VER41:
dewyatt@4759:             {
dewyatt@4759:                 int offset = (IME_GetId(videodata, 1) >= 0x00000002) ? 8 : 7;
dewyatt@4759:                 p = *(LPBYTE *)((LPBYTE)videodata->ImmLockIMCC(lpimc->hPrivate) + offset * 4);
dewyatt@4759:                 if (!p)
dewyatt@4759:                     break;
dewyatt@4759: 
dewyatt@4759:                 len = *(DWORD *)(p + 7*4 + 16*2*4);
dewyatt@4759:                 s = (WCHAR *)(p + 6*4 + 16*2*1);
dewyatt@4759:             }
dewyatt@4759:             break;
dewyatt@4759:         case IMEID_CHS_VER42:
dewyatt@4759:             if (osversion.dwPlatformId != VER_PLATFORM_WIN32_NT)
dewyatt@4759:                 break;
dewyatt@4759: 
dewyatt@4759:             p = *(LPBYTE *)((LPBYTE)videodata->ImmLockIMCC(lpimc->hPrivate) + 1*4 + 1*4 + 6*4);
dewyatt@4759:             if (!p)
dewyatt@4759:                 break;
dewyatt@4759: 
dewyatt@4759:             len = *(DWORD *)(p + 1*4 + (16*2+2*4) + 5*4 + 16*2);
dewyatt@4759:             s = (WCHAR *)(p + 1*4 + (16*2+2*4) + 5*4);
dewyatt@4759:             break;
dewyatt@4759:         }
dewyatt@4759:         if (s)
dewyatt@4759:             SDL_wcslcpy(videodata->ime_readingstring, s, len + 1);
dewyatt@4760: 
dewyatt@4759:         videodata->ImmUnlockIMCC(lpimc->hPrivate);
dewyatt@4759:         videodata->ImmUnlockIMC(himc);
dewyatt@4759:     }
dewyatt@4759:     ImmReleaseContext(hwnd, himc);
dewyatt@4759:     IME_SendEditingEvent(videodata);
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: IME_InputLangChanged(SDL_VideoData *videodata)
dewyatt@4759: {
dewyatt@4760:     UINT lang = PRIMLANG();
dewyatt@4759:     IME_UpdateInputLocale(videodata);
Daniel@4913:     if (!videodata->ime_uiless)
Daniel@4913:         videodata->ime_candlistindexbase = (videodata->ime_hkl == CHT_HKL_DAYI) ? 0 : 1;
Daniel@4913: 
dewyatt@4759:     IME_SetupAPI(videodata);
dewyatt@4760:     if (lang != PRIMLANG()) {
dewyatt@4759:         IME_ClearComposition(videodata);
dewyatt@4759:     }
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static DWORD
dewyatt@4759: IME_GetId(SDL_VideoData *videodata, UINT uIndex)
dewyatt@4759: {
dewyatt@4759:     static HKL hklprev = 0;
dewyatt@4759:     static DWORD dwRet[2] = {0};
dewyatt@4759:     DWORD dwVerSize = 0;
dewyatt@4759:     DWORD dwVerHandle = 0;
dewyatt@4759:     LPVOID lpVerBuffer = 0;
dewyatt@4759:     LPVOID lpVerData = 0;
dewyatt@4759:     UINT cbVerData = 0;
dewyatt@4759:     char szTemp[256];
dewyatt@4759:     HKL hkl = 0;
dewyatt@4759:     DWORD dwLang = 0;
dewyatt@4759:     if (uIndex >= sizeof(dwRet) / sizeof(dwRet[0]))
dewyatt@4759:         return 0;
dewyatt@4759: 
dewyatt@4759:     hkl = videodata->ime_hkl;
dewyatt@4759:     if (hklprev == hkl)
dewyatt@4759:         return dwRet[uIndex];
dewyatt@4759: 
dewyatt@4759:     hklprev = hkl;
dewyatt@4759:     dwLang = ((DWORD)hkl & 0xffff);
dewyatt@4760:     if (videodata->ime_uiless && LANG() == LANG_CHT) {
dewyatt@4759:         dwRet[0] = IMEID_CHT_VER_VISTA;
dewyatt@4759:         dwRet[1] = 0;
dewyatt@4759:         return dwRet[0];
dewyatt@4759:     }
dewyatt@4759:     if (hkl != CHT_HKL_NEW_PHONETIC
dewyatt@4759:         && hkl != CHT_HKL_NEW_CHANG_JIE
dewyatt@4759:         && hkl != CHT_HKL_NEW_QUICK
dewyatt@4759:         && hkl != CHT_HKL_HK_CANTONESE
dewyatt@4760:         && hkl != CHS_HKL) {
dewyatt@4759:         dwRet[0] = dwRet[1] = 0;
dewyatt@4759:         return dwRet[uIndex];
dewyatt@4759:     }
dewyatt@4760:     if (ImmGetIMEFileNameA(hkl, szTemp, sizeof(szTemp) - 1) <= 0) {
dewyatt@4759:         dwRet[0] = dwRet[1] = 0;
dewyatt@4759:         return dwRet[uIndex];
dewyatt@4759:     }
dewyatt@4760:     if (!videodata->GetReadingString) {
dewyatt@4759:         #define LCID_INVARIANT MAKELCID(MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), SORT_DEFAULT)
dewyatt@4759:         if (CompareStringA(LCID_INVARIANT, NORM_IGNORECASE, szTemp, -1, CHT_IMEFILENAME1, -1) != 2
dewyatt@4759:             && CompareStringA(LCID_INVARIANT, NORM_IGNORECASE, szTemp, -1, CHT_IMEFILENAME2, -1) != 2
dewyatt@4759:             && CompareStringA(LCID_INVARIANT, NORM_IGNORECASE, szTemp, -1, CHT_IMEFILENAME3, -1) != 2
dewyatt@4759:             && CompareStringA(LCID_INVARIANT, NORM_IGNORECASE, szTemp, -1, CHS_IMEFILENAME1, -1) != 2
dewyatt@4760:             && CompareStringA(LCID_INVARIANT, NORM_IGNORECASE, szTemp, -1, CHS_IMEFILENAME2, -1) != 2) {
dewyatt@4759:             dwRet[0] = dwRet[1] = 0;
dewyatt@4759:             return dwRet[uIndex];
dewyatt@4759:         }
dewyatt@4759:         #undef LCID_INVARIANT
dewyatt@4759:         dwVerSize = GetFileVersionInfoSizeA(szTemp, &dwVerHandle);
dewyatt@4760:         if (dwVerSize) {
dewyatt@4759:             lpVerBuffer = SDL_malloc(dwVerSize);
dewyatt@4760:             if (lpVerBuffer) {
dewyatt@4760:                 if (GetFileVersionInfoA(szTemp, dwVerHandle, dwVerSize, lpVerBuffer)) {
dewyatt@4760:                     if (VerQueryValueA(lpVerBuffer, "\\", &lpVerData, &cbVerData)) {
dewyatt@4759:                         #define pVerFixedInfo   ((VS_FIXEDFILEINFO FAR*)lpVerData)
dewyatt@4759:                         DWORD dwVer = pVerFixedInfo->dwFileVersionMS;
dewyatt@4759:                         dwVer = (dwVer & 0x00ff0000) << 8 | (dwVer & 0x000000ff) << 16;
dewyatt@4759:                         if (videodata->GetReadingString ||
dewyatt@4759:                             dwLang == LANG_CHT && (
dewyatt@4759:                             dwVer == MAKEIMEVERSION(4, 2) ||
dewyatt@4759:                             dwVer == MAKEIMEVERSION(4, 3) ||
dewyatt@4759:                             dwVer == MAKEIMEVERSION(4, 4) ||
dewyatt@4759:                             dwVer == MAKEIMEVERSION(5, 0) ||
dewyatt@4759:                             dwVer == MAKEIMEVERSION(5, 1) ||
dewyatt@4759:                             dwVer == MAKEIMEVERSION(5, 2) ||
dewyatt@4759:                             dwVer == MAKEIMEVERSION(6, 0))
dewyatt@4759:                             ||
dewyatt@4759:                             dwLang == LANG_CHS && (
dewyatt@4759:                             dwVer == MAKEIMEVERSION(4, 1) ||
dewyatt@4759:                             dwVer == MAKEIMEVERSION(4, 2) ||
dewyatt@4760:                             dwVer == MAKEIMEVERSION(5, 3))) {
dewyatt@4759:                             dwRet[0] = dwVer | dwLang;
dewyatt@4759:                             dwRet[1] = pVerFixedInfo->dwFileVersionLS;
dewyatt@4759:                             SDL_free(lpVerBuffer);
dewyatt@4759:                             return dwRet[0];
dewyatt@4759:                         }
dewyatt@4759:                         #undef pVerFixedInfo
dewyatt@4759:                     }
dewyatt@4759:                 }
dewyatt@4759:             }
dewyatt@4759:             SDL_free(lpVerBuffer);
dewyatt@4759:         }
dewyatt@4759:     }
dewyatt@4759:     dwRet[0] = dwRet[1] = 0;
dewyatt@4759:     return dwRet[uIndex];
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: IME_SetupAPI(SDL_VideoData *videodata)
dewyatt@4759: {
dewyatt@4759:     char ime_file[MAX_PATH + 1];
dewyatt@4759:     HMODULE hime = 0;
dewyatt@4759:     HKL hkl = 0;
dewyatt@4759:     videodata->GetReadingString = 0;
dewyatt@4759:     videodata->ShowReadingWindow = 0;
dewyatt@4759:     if (videodata->ime_uiless)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4759:     hkl = videodata->ime_hkl;
dewyatt@4759:     if (ImmGetIMEFileNameA(hkl, ime_file, sizeof(ime_file) - 1) <= 0)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4759:     hime = LoadLibraryA(ime_file);
dewyatt@4759:     if (!hime)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4759:     videodata->GetReadingString = (UINT (WINAPI *)(HIMC, UINT, LPWSTR, PINT, BOOL*, PUINT))
dewyatt@4759:         GetProcAddress(hime, "GetReadingString");
dewyatt@4759:     videodata->ShowReadingWindow = (BOOL (WINAPI *)(HIMC, BOOL))
dewyatt@4759:         GetProcAddress(hime, "ShowReadingWindow");
dewyatt@4759: 
dewyatt@4760:     if (videodata->ShowReadingWindow) {
dewyatt@4759:         HIMC himc = ImmGetContext(videodata->ime_hwnd_current);
dewyatt@4760:         if (himc) {
dewyatt@4759:             videodata->ShowReadingWindow(himc, FALSE);
dewyatt@4759:             ImmReleaseContext(videodata->ime_hwnd_current, himc);
dewyatt@4759:         }
dewyatt@4759:     }
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: IME_SetWindow(SDL_VideoData* videodata, HWND hwnd)
dewyatt@4759: {
dewyatt@4759:     videodata->ime_hwnd_current = hwnd;
dewyatt@4759:     if (videodata->ime_threadmgr) {
dewyatt@4759:         struct ITfDocumentMgr *document_mgr = 0;
dewyatt@4759:         if (SUCCEEDED(videodata->ime_threadmgr->lpVtbl->AssociateFocus(videodata->ime_threadmgr, hwnd, NULL, &document_mgr))) {
dewyatt@4759:             if (document_mgr)
dewyatt@4759:                 document_mgr->lpVtbl->Release(document_mgr);
dewyatt@4759:         }
dewyatt@4759:     }
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: IME_UpdateInputLocale(SDL_VideoData *videodata)
dewyatt@4759: {
dewyatt@4760:     static HKL hklprev = 0;
dewyatt@4759:     videodata->ime_hkl = GetKeyboardLayout(0);
dewyatt@4760:     if (hklprev == videodata->ime_hkl)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4760:     hklprev = videodata->ime_hkl;
Daniel@4914:     switch (PRIMLANG()) {
Daniel@4913:     case LANG_CHINESE:
Daniel@4913:         videodata->ime_candvertical = SDL_TRUE;
Daniel@4913:         if (SUBLANG() == SUBLANG_CHINESE_SIMPLIFIED)
Daniel@4913:             videodata->ime_candvertical = SDL_FALSE;
Daniel@4913: 
Daniel@4913:         break;
Daniel@4913:     case LANG_JAPANESE:
Daniel@4913:         videodata->ime_candvertical = SDL_TRUE;
Daniel@4913:         break;
Daniel@4913:     case LANG_KOREAN:
Daniel@4913:         videodata->ime_candvertical = SDL_FALSE;
Daniel@4913:         break;
Daniel@4913:     }
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: IME_ClearComposition(SDL_VideoData *videodata)
dewyatt@4759: {
dewyatt@4759:     HIMC himc = 0;
dewyatt@4759:     if (!videodata->ime_initialized)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4759:     himc = ImmGetContext(videodata->ime_hwnd_current);
dewyatt@4759:     if (!himc)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4759:     ImmNotifyIME(himc, NI_COMPOSITIONSTR, CPS_CANCEL, 0);
dewyatt@4759:     if (videodata->ime_uiless)
dewyatt@4759:         ImmSetCompositionString(himc, SCS_SETSTR, TEXT(""), sizeof(TCHAR), TEXT(""), sizeof(TCHAR));
dewyatt@4759: 
dewyatt@4759:     ImmNotifyIME(himc, NI_CLOSECANDIDATE, 0, 0);
dewyatt@4759:     ImmReleaseContext(videodata->ime_hwnd_current, himc);
dewyatt@4759:     SDL_SendEditingText("", 0, 0);
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: IME_GetCompositionString(SDL_VideoData *videodata, HIMC himc, DWORD string)
dewyatt@4759: {
dewyatt@4760:     LONG length = ImmGetCompositionStringW(himc, string, videodata->ime_composition, sizeof(videodata->ime_composition));
dewyatt@4760:     if (length < 0)
dewyatt@4760:         length = 0;
dewyatt@4759: 
dewyatt@4760:     length /= sizeof(videodata->ime_composition[0]);
dewyatt@4759:     videodata->ime_cursor = LOWORD(ImmGetCompositionStringW(himc, GCS_CURSORPOS, 0, 0));
dewyatt@4760:     if (videodata->ime_composition[videodata->ime_cursor] == 0x3000) {
dewyatt@4759:         int i;
dewyatt@4760:         for (i = videodata->ime_cursor + 1; i < length; ++i)
dewyatt@4759:             videodata->ime_composition[i - 1] = videodata->ime_composition[i];
dewyatt@4759: 
dewyatt@4760:         --length;
dewyatt@4759:     }
dewyatt@4760:     videodata->ime_composition[length] = 0;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: IME_SendInputEvent(SDL_VideoData *videodata)
dewyatt@4759: {
dewyatt@4759:     char *s = 0;
dewyatt@4759:     s = WIN_StringToUTF8(videodata->ime_composition);
dewyatt@4759:     SDL_SendKeyboardText(s);
dewyatt@4759:     SDL_free(s);
dewyatt@4759: 
dewyatt@4759:     videodata->ime_composition[0] = 0;
dewyatt@4759:     videodata->ime_readingstring[0] = 0;
dewyatt@4759:     videodata->ime_cursor = 0;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: IME_SendEditingEvent(SDL_VideoData *videodata)
dewyatt@4759: {
dewyatt@4759:     char *s = 0;
dewyatt@4760:     WCHAR buffer[SDL_TEXTEDITINGEVENT_TEXT_SIZE];
dewyatt@4760:     buffer[0] = 0;
dewyatt@4760:     if (videodata->ime_readingstring[0]) {
dewyatt@4759:         size_t len = SDL_min(SDL_wcslen(videodata->ime_composition), (size_t)videodata->ime_cursor);
dewyatt@4760:         SDL_wcslcpy(buffer, videodata->ime_composition, len + 1);
dewyatt@4760:         SDL_wcslcat(buffer, videodata->ime_readingstring, sizeof(buffer));
dewyatt@4760:         SDL_wcslcat(buffer, &videodata->ime_composition[len], sizeof(buffer) - len);
dewyatt@4759:     }
dewyatt@4760:     else {
dewyatt@4760:         SDL_wcslcpy(buffer, videodata->ime_composition, sizeof(videodata->ime_composition));
dewyatt@4759:     }
dewyatt@4760:     s = WIN_StringToUTF8(buffer);
dewyatt@4759:     SDL_SendEditingText(s, videodata->ime_cursor + SDL_wcslen(videodata->ime_readingstring), 0);
dewyatt@4759:     SDL_free(s);
dewyatt@4759: }
dewyatt@4759: 
Daniel@4913: static void
Daniel@4913: IME_AddCandidate(SDL_VideoData *videodata, UINT i, LPCWSTR candidate)
Daniel@4913: {
Daniel@4913:     LPWSTR dst = videodata->ime_candidates[i];
Daniel@4913:     *dst++ = (WCHAR)(TEXT('0') + ((i + videodata->ime_candlistindexbase) % 10));
Daniel@4913:     if (videodata->ime_candvertical)
Daniel@4913:         *dst++ = TEXT(' ');
Daniel@4913: 
Daniel@4913:     while (*candidate && (SDL_arraysize(videodata->ime_candidates[i]) > (dst - videodata->ime_candidates[i])))
Daniel@4913:         *dst++ = *candidate++;
Daniel@4913: 
Daniel@4913:     *dst = (WCHAR)'\0';
Daniel@4913: }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: IME_GetCandidateList(HIMC himc, SDL_VideoData *videodata)
Daniel@4913: {
Daniel@4913:     LPCANDIDATELIST cand_list = 0;
Daniel@4913:     DWORD size = ImmGetCandidateListW(himc, 0, 0, 0);
Daniel@4914:     if (size) {
Daniel@4913:         cand_list = (LPCANDIDATELIST)SDL_malloc(size);
Daniel@4914:         if (cand_list) {
Daniel@4913:             size = ImmGetCandidateListW(himc, 0, cand_list, size);
Daniel@4914:             if (size) {
Daniel@4913:                 int i = 0;
Daniel@4913:                 int j = 0;
Daniel@4913:                 int page_start = 0;
Daniel@4913:                 videodata->ime_candsel = cand_list->dwSelection;
Daniel@4913:                 videodata->ime_candcount = cand_list->dwCount;
Daniel@4913: 
Daniel@4914:                 if (LANG() == LANG_CHS && IME_GetId(videodata, 0)) {
Daniel@4913:                     const UINT maxcandchar = 18;
Daniel@4913:                     UINT i = 0;
Daniel@4913:                     UINT cchars = 0;
Daniel@4913: 
Daniel@4914:                     for (; i < videodata->ime_candcount; ++i) {
Daniel@4913:                         UINT len = SDL_wcslen((LPWSTR)((DWORD)cand_list + cand_list->dwOffset[i])) + 1;
Daniel@4914:                         if (len + cchars > maxcandchar) {
Daniel@4913:                             if (i > cand_list->dwSelection)
Daniel@4913:                                 break;
Daniel@4913: 
Daniel@4913:                             page_start = i;
Daniel@4913:                             cchars = len;
Daniel@4913:                         }
Daniel@4914:                         else {
Daniel@4913:                             cchars += len;
Daniel@4913:                         }
Daniel@4913:                     }
Daniel@4913:                     videodata->ime_candpgsize = i - page_start;
Daniel@4913:                 }
Daniel@4914:                 else {
Daniel@4913:                     videodata->ime_candpgsize = SDL_min(cand_list->dwPageSize, MAX_CANDLIST);
Daniel@4913:                     page_start = (cand_list->dwSelection / videodata->ime_candpgsize) * videodata->ime_candpgsize;
Daniel@4913:                 }
Daniel@4913:                 SDL_memset(&videodata->ime_candidates, 0, sizeof(videodata->ime_candidates));
Daniel@4914:                 for (i = page_start, j = 0; (DWORD)i < cand_list->dwCount && j < (int)videodata->ime_candpgsize; i++, j++) {
Daniel@4913:                     LPCWSTR candidate = (LPCWSTR)((DWORD)cand_list + cand_list->dwOffset[i]);
Daniel@4913:                     IME_AddCandidate(videodata, j, candidate);
Daniel@4913:                 }
Daniel@4913:                 if (PRIMLANG() == LANG_KOREAN || (PRIMLANG() == LANG_CHT && !IME_GetId(videodata, 0)))
Daniel@4913:                     videodata->ime_candsel = -1;
Daniel@4913: 
Daniel@4913:             }
Daniel@4913:             SDL_free(cand_list);
Daniel@4913:         }
Daniel@4913:     }
Daniel@4913: }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: IME_ShowCandidateList(SDL_VideoData *videodata)
Daniel@4913: {
Daniel@4913:     videodata->ime_dirty = SDL_TRUE;
Daniel@4913:     videodata->ime_candlist = SDL_TRUE;
Daniel@4913:     IME_DestroyTextures(videodata);
Daniel@4913:     IME_SendEditingEvent(videodata);
Daniel@4913: }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: IME_HideCandidateList(SDL_VideoData *videodata)
Daniel@4913: {
Daniel@4913:     videodata->ime_dirty = SDL_FALSE;
Daniel@4913:     videodata->ime_candlist = SDL_FALSE;
Daniel@4913:     IME_DestroyTextures(videodata);
Daniel@4913:     IME_SendEditingEvent(videodata);
Daniel@4913: }
Daniel@4913: 
dewyatt@4752: SDL_bool
dewyatt@4752: IME_HandleMessage(HWND hwnd, UINT msg, WPARAM wParam, LPARAM *lParam, SDL_VideoData *videodata)
dewyatt@4752: {
dewyatt@4752:     SDL_bool trap = SDL_FALSE;
dewyatt@4752:     HIMC himc = 0;
dewyatt@4752:     if (!videodata->ime_initialized || !videodata->ime_available || !videodata->ime_enabled)
dewyatt@4752:         return SDL_FALSE;
dewyatt@4752: 
Daniel@4914:     switch (msg) {
dewyatt@4752:     case WM_INPUTLANGCHANGE:
Daniel@4913:         IME_InputLangChanged(videodata);
dewyatt@4752:         break;
dewyatt@4752:     case WM_IME_SETCONTEXT:
dewyatt@4752:         *lParam = 0;
dewyatt@4752:         break;
dewyatt@4752:     case WM_IME_STARTCOMPOSITION:
dewyatt@4752:         trap = SDL_TRUE;
dewyatt@4752:         break;
dewyatt@4752:     case WM_IME_COMPOSITION:
dewyatt@4752:         trap = SDL_TRUE;
dewyatt@4752:         himc = ImmGetContext(hwnd);
dewyatt@4760:         if (*lParam & GCS_RESULTSTR) {
dewyatt@4759:             IME_GetCompositionString(videodata, himc, GCS_RESULTSTR);
dewyatt@4759:             IME_SendInputEvent(videodata);
dewyatt@4752:         }
dewyatt@4760:         if (*lParam & GCS_COMPSTR) {
dewyatt@4759:             if (!videodata->ime_uiless)
dewyatt@4759:                 videodata->ime_readingstring[0] = 0;
dewyatt@4759: 
dewyatt@4759:             IME_GetCompositionString(videodata, himc, GCS_COMPSTR);
dewyatt@4759:             IME_SendEditingEvent(videodata);
dewyatt@4752:         }
dewyatt@4752:         ImmReleaseContext(hwnd, himc);
dewyatt@4752:         break;
dewyatt@4752:     case WM_IME_ENDCOMPOSITION:
dewyatt@4759:         videodata->ime_composition[0] = 0;
dewyatt@4759:         videodata->ime_readingstring[0] = 0;
dewyatt@4759:         videodata->ime_cursor = 0;
dewyatt@4759:         SDL_SendEditingText("", 0, 0);
dewyatt@4752:         break;
dewyatt@4752:     case WM_IME_NOTIFY:
Daniel@4914:         switch (wParam) {
dewyatt@4752:         case IMN_SETCONVERSIONMODE:
dewyatt@4752:         case IMN_SETOPENSTATUS:
dewyatt@4759:             IME_UpdateInputLocale(videodata);
dewyatt@4752:             break;
dewyatt@4752:         case IMN_OPENCANDIDATE:
dewyatt@4752:         case IMN_CHANGECANDIDATE:
Daniel@4913:             if (videodata->ime_uiless)
Daniel@4913:                 break;
Daniel@4913: 
dewyatt@4752:             trap = SDL_TRUE;
Daniel@4913:             IME_ShowCandidateList(videodata);
Daniel@4913:             himc = ImmGetContext(hwnd);
Daniel@4913:             if (!himc)
Daniel@4913:                 break;
Daniel@4913: 
Daniel@4913:             IME_GetCandidateList(himc, videodata);
Daniel@4913:             ImmReleaseContext(hwnd, himc);
dewyatt@4752:             break;
dewyatt@4752:         case IMN_CLOSECANDIDATE:
dewyatt@4752:             trap = SDL_TRUE;
Daniel@4913:             IME_HideCandidateList(videodata);
dewyatt@4752:             break;
dewyatt@4752:         case IMN_PRIVATE:
dewyatt@4759:             {
dewyatt@4759:                 DWORD dwId = IME_GetId(videodata, 0);
dewyatt@4759:                 IME_GetReadingString(videodata, hwnd);
dewyatt@4759:                 switch (dwId)
dewyatt@4759:                 {
dewyatt@4759:                 case IMEID_CHT_VER42:
dewyatt@4759:                 case IMEID_CHT_VER43:
dewyatt@4759:                 case IMEID_CHT_VER44:
dewyatt@4759:                 case IMEID_CHS_VER41:
dewyatt@4759:                 case IMEID_CHS_VER42:
dewyatt@4759:                     if (*lParam == 1 || *lParam == 2)
dewyatt@4759:                         trap = SDL_TRUE;
dewyatt@4759: 
dewyatt@4759:                     break;
dewyatt@4759:                 case IMEID_CHT_VER50:
dewyatt@4759:                 case IMEID_CHT_VER51:
dewyatt@4759:                 case IMEID_CHT_VER52:
dewyatt@4759:                 case IMEID_CHT_VER60:
dewyatt@4759:                 case IMEID_CHS_VER53:
dewyatt@4759:                     if (*lParam == 16
dewyatt@4759:                         || *lParam == 17
dewyatt@4759:                         || *lParam == 26
dewyatt@4759:                         || *lParam == 27
dewyatt@4759:                         || *lParam == 28)
dewyatt@4759:                         trap = SDL_TRUE;
dewyatt@4759:                     break;
dewyatt@4759:                 }
dewyatt@4759:             }
dewyatt@4752:             break;
dewyatt@4752:         default:
dewyatt@4752:             trap = SDL_TRUE;
dewyatt@4752:             break;
dewyatt@4752:         }
dewyatt@4752:         break;
dewyatt@4752:     }
dewyatt@4752:     return trap;
dewyatt@4752: }
dewyatt@4752: 
Daniel@4913: static void
Daniel@4913: IME_CloseCandidateList(SDL_VideoData *videodata)
Daniel@4913: {
Daniel@4913:     IME_HideCandidateList(videodata);
Daniel@4913:     videodata->ime_candcount = 0;
Daniel@4913:     SDL_memset(videodata->ime_candidates, 0, sizeof(videodata->ime_candidates));
Daniel@4913: }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: UILess_GetCandidateList(SDL_VideoData *videodata, ITfCandidateListUIElement *pcandlist)
Daniel@4913: {
Daniel@4913:     UINT selection = 0;
Daniel@4913:     UINT count = 0;
Daniel@4913:     UINT page = 0;
Daniel@4913:     UINT pgcount = 0;
Daniel@4913:     DWORD pgstart = 0;
Daniel@4913:     DWORD pgsize = 0;
Daniel@4913:     UINT i, j;
Daniel@4913:     pcandlist->lpVtbl->GetSelection(pcandlist, &selection);
Daniel@4913:     pcandlist->lpVtbl->GetCount(pcandlist, &count);
Daniel@4913:     pcandlist->lpVtbl->GetCurrentPage(pcandlist, &page);
Daniel@4913: 
Daniel@4913:     videodata->ime_candsel = selection;
Daniel@4913:     videodata->ime_candcount = count;
Daniel@4913:     IME_ShowCandidateList(videodata);
Daniel@4913: 
Daniel@4913:     pcandlist->lpVtbl->GetPageIndex(pcandlist, 0, 0, &pgcount);
Daniel@4914:     if (pgcount > 0) {
Daniel@4913:         UINT *idxlist = SDL_malloc(sizeof(UINT) * pgcount);
Daniel@4914:         if (idxlist) {
Daniel@4913:             pcandlist->lpVtbl->GetPageIndex(pcandlist, idxlist, pgcount, &pgcount);
Daniel@4913:             pgstart = idxlist[page];
Daniel@4913:             if (page < pgcount - 1)
Daniel@4913:                 pgsize = SDL_min(count, idxlist[page + 1]) - pgstart;
Daniel@4913:             else
Daniel@4913:                 pgsize = count - pgstart;
Daniel@4913: 
Daniel@4913:             SDL_free(idxlist);
Daniel@4913:         }
Daniel@4913:     }
Daniel@4913:     videodata->ime_candpgsize = SDL_min(pgsize, MAX_CANDLIST);
Daniel@4913:     videodata->ime_candsel = videodata->ime_candsel - pgstart;
Daniel@4913: 
Daniel@4913:     SDL_memset(videodata->ime_candidates, 0, sizeof(videodata->ime_candidates));
Daniel@4914:     for (i = pgstart, j = 0; (DWORD)i < count && j < videodata->ime_candpgsize; i++, j++) {
Daniel@4913:         BSTR bstr;
Daniel@4914:         if (SUCCEEDED(pcandlist->lpVtbl->GetString(pcandlist, i, &bstr))) {
Daniel@4914:             if (bstr) {
Daniel@4913:                 IME_AddCandidate(videodata, j, bstr);
Daniel@4913:                 SysFreeString(bstr);
Daniel@4913:             }
Daniel@4913:         }
Daniel@4913:     }
Daniel@4913:     if (PRIMLANG() == LANG_KOREAN)
Daniel@4913:         videodata->ime_candsel = -1;
Daniel@4913: }
Daniel@4913: 
dewyatt@4759: STDMETHODIMP_(ULONG) TSFSink_AddRef(TSFSink *sink)
dewyatt@4759: {
dewyatt@4759:     return ++sink->refcount;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: STDMETHODIMP_(ULONG)TSFSink_Release(TSFSink *sink)
dewyatt@4759: {
dewyatt@4759:     --sink->refcount;
Daniel@4914:     if (sink->refcount == 0) {
dewyatt@4759:         SDL_free(sink);
dewyatt@4759:         return 0;
dewyatt@4759:     }
dewyatt@4759:     return sink->refcount;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: STDMETHODIMP UIElementSink_QueryInterface(TSFSink *sink, REFIID riid, PVOID *ppv)
dewyatt@4759: {
dewyatt@4759:     if (!ppv)
dewyatt@4759:         return E_INVALIDARG;
dewyatt@4759: 
dewyatt@4759:     *ppv = 0;
dewyatt@4759:     if (SDL_IsEqualIID(riid, &IID_IUnknown))
dewyatt@4759:         *ppv = (IUnknown *)sink;
dewyatt@4759:     else if (SDL_IsEqualIID(riid, &IID_ITfUIElementSink))
dewyatt@4759:         *ppv = (ITfUIElementSink *)sink;
dewyatt@4759: 
dewyatt@4760:     if (*ppv) {
dewyatt@4759:         TSFSink_AddRef(sink);
dewyatt@4759:         return S_OK;
dewyatt@4759:     }
dewyatt@4759:     return E_NOINTERFACE;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: ITfUIElement *UILess_GetUIElement(SDL_VideoData *videodata, DWORD dwUIElementId)
dewyatt@4759: {
dewyatt@4759:     ITfUIElementMgr *puiem = 0;
dewyatt@4759:     ITfUIElement *pelem = 0;
dewyatt@4759:     ITfThreadMgrEx *threadmgrex = videodata->ime_threadmgrex;
dewyatt@4759: 
dewyatt@4760:     if (SUCCEEDED(threadmgrex->lpVtbl->QueryInterface(threadmgrex, &IID_ITfUIElementMgr, (LPVOID *)&puiem))) {
dewyatt@4759:         puiem->lpVtbl->GetUIElement(puiem, dwUIElementId, &pelem);
dewyatt@4759:         puiem->lpVtbl->Release(puiem);
dewyatt@4759:     }
dewyatt@4759:     return pelem;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: STDMETHODIMP UIElementSink_BeginUIElement(TSFSink *sink, DWORD dwUIElementId, BOOL *pbShow)
dewyatt@4759: {
dewyatt@4760:     ITfUIElement *element = UILess_GetUIElement((SDL_VideoData *)sink->data, dwUIElementId);
dewyatt@4759:     ITfReadingInformationUIElement *preading = 0;
Daniel@4913:     ITfCandidateListUIElement *pcandlist = 0;
dewyatt@4759:     SDL_VideoData *videodata = (SDL_VideoData *)sink->data;
dewyatt@4760:     if (!element)
dewyatt@4759:         return E_INVALIDARG;
dewyatt@4759: 
dewyatt@4759:     *pbShow = FALSE;
dewyatt@4760:     if (SUCCEEDED(element->lpVtbl->QueryInterface(element, &IID_ITfReadingInformationUIElement, (LPVOID *)&preading))) {
dewyatt@4759:         BSTR bstr;
dewyatt@4760:         if (SUCCEEDED(preading->lpVtbl->GetString(preading, &bstr)) && bstr) {
dewyatt@4759:             WCHAR *s = (WCHAR *)bstr;
dewyatt@4759:             SysFreeString(bstr);
dewyatt@4759:         }
dewyatt@4759:         preading->lpVtbl->Release(preading);
dewyatt@4759:     }
Daniel@4913:     else if (SUCCEEDED(element->lpVtbl->QueryInterface(element, &IID_ITfCandidateListUIElement, (LPVOID *)&pcandlist)))	{
Daniel@4913:         videodata->ime_candref++;
Daniel@4913:         UILess_GetCandidateList(videodata, pcandlist);
Daniel@4913:         pcandlist->lpVtbl->Release(pcandlist);
Daniel@4913:     }
dewyatt@4759:     return S_OK;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: STDMETHODIMP UIElementSink_UpdateUIElement(TSFSink *sink, DWORD dwUIElementId)
dewyatt@4759: {
dewyatt@4760:     ITfUIElement *element = UILess_GetUIElement((SDL_VideoData *)sink->data, dwUIElementId);
dewyatt@4759:     ITfReadingInformationUIElement *preading = 0;
Daniel@4913:     ITfCandidateListUIElement *pcandlist = 0;
dewyatt@4759:     SDL_VideoData *videodata = (SDL_VideoData *)sink->data;
dewyatt@4760:     if (!element)
dewyatt@4759:         return E_INVALIDARG;
dewyatt@4759: 
dewyatt@4760:     if (SUCCEEDED(element->lpVtbl->QueryInterface(element, &IID_ITfReadingInformationUIElement, (LPVOID *)&preading))) {
dewyatt@4759:         BSTR bstr;
dewyatt@4760:         if (SUCCEEDED(preading->lpVtbl->GetString(preading, &bstr)) && bstr) {
dewyatt@4759:             WCHAR *s = (WCHAR *)bstr;
dewyatt@4759:             SDL_wcslcpy(videodata->ime_readingstring, s, sizeof(videodata->ime_readingstring));
dewyatt@4759:             IME_SendEditingEvent(videodata);
dewyatt@4759:             SysFreeString(bstr);
dewyatt@4759:         }
dewyatt@4759:         preading->lpVtbl->Release(preading);
dewyatt@4759:     }
Daniel@4913:     else if (SUCCEEDED(element->lpVtbl->QueryInterface(element, &IID_ITfCandidateListUIElement, (LPVOID *)&pcandlist)))	{
Daniel@4913:         UILess_GetCandidateList(videodata, pcandlist);
Daniel@4913:         pcandlist->lpVtbl->Release(pcandlist);
Daniel@4913:     }
dewyatt@4759:     return S_OK;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: STDMETHODIMP UIElementSink_EndUIElement(TSFSink *sink, DWORD dwUIElementId)
dewyatt@4759: {
dewyatt@4760:     ITfUIElement *element = UILess_GetUIElement((SDL_VideoData *)sink->data, dwUIElementId);
dewyatt@4759:     ITfReadingInformationUIElement *preading = 0;
Daniel@4913:     ITfCandidateListUIElement *pcandlist = 0;
dewyatt@4759:     SDL_VideoData *videodata = (SDL_VideoData *)sink->data;
dewyatt@4760:     if (!element)
dewyatt@4759:         return E_INVALIDARG;
dewyatt@4759: 
dewyatt@4760:     if (SUCCEEDED(element->lpVtbl->QueryInterface(element, &IID_ITfReadingInformationUIElement, (LPVOID *)&preading))) {
dewyatt@4759:         videodata->ime_readingstring[0] = 0;
dewyatt@4759:         IME_SendEditingEvent(videodata);
dewyatt@4759:         preading->lpVtbl->Release(preading);
dewyatt@4759:     }
Daniel@4913:     if (SUCCEEDED(element->lpVtbl->QueryInterface(element, &IID_ITfCandidateListUIElement, (LPVOID *)&pcandlist))) {
Daniel@4913:         videodata->ime_candref--;
Daniel@4913:         if (videodata->ime_candref == 0)
Daniel@4913:             IME_CloseCandidateList(videodata);
Daniel@4913: 
Daniel@4913:         pcandlist->lpVtbl->Release(pcandlist);
Daniel@4913:     }
dewyatt@4759:     return S_OK;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: STDMETHODIMP IPPASink_QueryInterface(TSFSink *sink, REFIID riid, PVOID *ppv)
dewyatt@4759: {
dewyatt@4759:     if (!ppv)
dewyatt@4759:         return E_INVALIDARG;
dewyatt@4759: 
dewyatt@4759:     *ppv = 0;
dewyatt@4759:     if (SDL_IsEqualIID(riid, &IID_IUnknown))
dewyatt@4759:         *ppv = (IUnknown *)sink;
dewyatt@4759:     else if (SDL_IsEqualIID(riid, &IID_ITfInputProcessorProfileActivationSink))
dewyatt@4759:         *ppv = (ITfInputProcessorProfileActivationSink *)sink;
dewyatt@4759: 
dewyatt@4760:     if (*ppv) {
dewyatt@4759:         TSFSink_AddRef(sink);
dewyatt@4759:         return S_OK;
dewyatt@4759:     }
dewyatt@4759:     return E_NOINTERFACE;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: STDMETHODIMP IPPASink_OnActivated(TSFSink *sink, DWORD dwProfileType, LANGID langid, REFCLSID clsid, REFGUID catid, REFGUID guidProfile, HKL hkl, DWORD dwFlags)
dewyatt@4759: {
Daniel@4913:     static GUID TF_PROFILE_DAYI = {0x037B2C25, 0x480C, 0x4D7F, 0xB0, 0x27, 0xD6, 0xCA, 0x6B, 0x69, 0x78, 0x8A};
Daniel@4913:     SDL_VideoData *videodata = (SDL_VideoData *)sink->data;
Daniel@4913:     videodata->ime_candlistindexbase = SDL_IsEqualGUID(&TF_PROFILE_DAYI, guidProfile) ? 0 : 1;
dewyatt@4759:     if (SDL_IsEqualIID(catid, &GUID_TFCAT_TIP_KEYBOARD) && (dwFlags & TF_IPSINK_FLAG_ACTIVE))
dewyatt@4759:         IME_InputLangChanged((SDL_VideoData *)sink->data);
dewyatt@4759: 
Daniel@4913:     IME_HideCandidateList(videodata);
dewyatt@4759:     return S_OK;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void *vtUIElementSink[] = {
dewyatt@4759:     (void *)(UIElementSink_QueryInterface),
dewyatt@4759:     (void *)(TSFSink_AddRef),
dewyatt@4759:     (void *)(TSFSink_Release),
dewyatt@4759:     (void *)(UIElementSink_BeginUIElement),
dewyatt@4759:     (void *)(UIElementSink_UpdateUIElement),
dewyatt@4759:     (void *)(UIElementSink_EndUIElement)
dewyatt@4759: };
dewyatt@4759: 
dewyatt@4759: static void *vtIPPASink[] = {
dewyatt@4759:     (void *)(IPPASink_QueryInterface),
dewyatt@4759:     (void *)(TSFSink_AddRef),
dewyatt@4759:     (void *)(TSFSink_Release),
dewyatt@4759:     (void *)(IPPASink_OnActivated)
dewyatt@4759: };
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: UILess_EnableUIUpdates(SDL_VideoData *videodata)
dewyatt@4759: {
dewyatt@4759:     ITfSource *source = 0;
dewyatt@4759:     if (!videodata->ime_threadmgrex || videodata->ime_uielemsinkcookie != TF_INVALID_COOKIE)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4760:     if (SUCCEEDED(videodata->ime_threadmgrex->lpVtbl->QueryInterface(videodata->ime_threadmgrex, &IID_ITfSource, (LPVOID *)&source))) {
dewyatt@4759:         source->lpVtbl->AdviseSink(source, &IID_ITfUIElementSink, (IUnknown *)videodata->ime_uielemsink, &videodata->ime_uielemsinkcookie);
dewyatt@4759:         source->lpVtbl->Release(source);
dewyatt@4759:     }
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: UILess_DisableUIUpdates(SDL_VideoData *videodata)
dewyatt@4759: {
dewyatt@4759:     ITfSource *source = 0;
dewyatt@4759:     if (!videodata->ime_threadmgrex || videodata->ime_uielemsinkcookie == TF_INVALID_COOKIE)
dewyatt@4759:         return;
dewyatt@4759: 
dewyatt@4760:     if (SUCCEEDED(videodata->ime_threadmgrex->lpVtbl->QueryInterface(videodata->ime_threadmgrex, &IID_ITfSource, (LPVOID *)&source))) {
dewyatt@4759:         source->lpVtbl->UnadviseSink(source, videodata->ime_uielemsinkcookie);
dewyatt@4759:         videodata->ime_uielemsinkcookie = TF_INVALID_COOKIE;
dewyatt@4759:         source->lpVtbl->Release(source);
dewyatt@4759:     }
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static SDL_bool
dewyatt@4759: UILess_SetupSinks(SDL_VideoData *videodata)
dewyatt@4759: {
dewyatt@4759:     TfClientId clientid = 0;
dewyatt@4759:     SDL_bool result = SDL_FALSE;
dewyatt@4759:     ITfSource *source = 0;
Daniel@4893:     if (FAILED(CoCreateInstance(&CLSID_TF_ThreadMgr, NULL, CLSCTX_INPROC_SERVER, &IID_ITfThreadMgrEx, (LPVOID *)&videodata->ime_threadmgrex)))
dewyatt@4759:         return SDL_FALSE;
dewyatt@4759: 
dewyatt@4759:     if (FAILED(videodata->ime_threadmgrex->lpVtbl->ActivateEx(videodata->ime_threadmgrex, &clientid, TF_TMAE_UIELEMENTENABLEDONLY)))
dewyatt@4759:         return SDL_FALSE;
dewyatt@4759: 
dewyatt@4759:     videodata->ime_uielemsink = SDL_malloc(sizeof(TSFSink));
dewyatt@4759:     videodata->ime_ippasink = SDL_malloc(sizeof(TSFSink));
dewyatt@4759: 
dewyatt@4759:     videodata->ime_uielemsink->lpVtbl = vtUIElementSink;
dewyatt@4759:     videodata->ime_uielemsink->refcount = 1;
dewyatt@4759:     videodata->ime_uielemsink->data = videodata;
dewyatt@4759: 
dewyatt@4759:     videodata->ime_ippasink->lpVtbl = vtIPPASink;
dewyatt@4759:     videodata->ime_ippasink->refcount = 1;
dewyatt@4759:     videodata->ime_ippasink->data = videodata;
dewyatt@4759: 
dewyatt@4760:     if (SUCCEEDED(videodata->ime_threadmgrex->lpVtbl->QueryInterface(videodata->ime_threadmgrex, &IID_ITfSource, (LPVOID *)&source))) {
dewyatt@4760:         if (SUCCEEDED(source->lpVtbl->AdviseSink(source, &IID_ITfUIElementSink, (IUnknown *)videodata->ime_uielemsink, &videodata->ime_uielemsinkcookie))) {
dewyatt@4760:             if (SUCCEEDED(source->lpVtbl->AdviseSink(source, &IID_ITfInputProcessorProfileActivationSink, (IUnknown *)videodata->ime_ippasink, &videodata->ime_alpnsinkcookie))) {
dewyatt@4759:                 result = SDL_TRUE;
dewyatt@4759:             }
dewyatt@4759:         }
dewyatt@4759:         source->lpVtbl->Release(source);
dewyatt@4759:     }
dewyatt@4759:     return result;
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: #define SAFE_RELEASE(p)                             \
dewyatt@4759: {                                                   \
dewyatt@4759:     if (p) {                                        \
dewyatt@4759:         (p)->lpVtbl->Release((p));                  \
dewyatt@4759:         (p) = 0;                                    \
dewyatt@4759:     }                                               \
dewyatt@4759: }
dewyatt@4759: 
dewyatt@4759: static void
dewyatt@4759: UILess_ReleaseSinks(SDL_VideoData *videodata)
dewyatt@4759: {
dewyatt@4760:     ITfSource *source = 0;
Daniel@4893:     if (videodata->ime_threadmgrex && SUCCEEDED(videodata->ime_threadmgrex->lpVtbl->QueryInterface(videodata->ime_threadmgrex, &IID_ITfSource, (LPVOID *)&source))) {
dewyatt@4760:         source->lpVtbl->UnadviseSink(source, videodata->ime_uielemsinkcookie);
dewyatt@4760:         source->lpVtbl->UnadviseSink(source, videodata->ime_alpnsinkcookie);
dewyatt@4760:         SAFE_RELEASE(source);
dewyatt@4759:         videodata->ime_threadmgrex->lpVtbl->Deactivate(videodata->ime_threadmgrex);
dewyatt@4759:         SAFE_RELEASE(videodata->ime_threadmgrex);
dewyatt@4759:         TSFSink_Release(videodata->ime_uielemsink);
dewyatt@4759:         videodata->ime_uielemsink = 0;
dewyatt@4759:         TSFSink_Release(videodata->ime_ippasink);
dewyatt@4759:         videodata->ime_ippasink = 0;
dewyatt@4759:     }
dewyatt@4759: }
dewyatt@4759: 
Daniel@4913: static void *
Daniel@4913: StartDrawToBitmap(HDC hdc, HBITMAP *hhbm, int width, int height)
Daniel@4913: {
Daniel@4913:     BITMAPINFO info = {0};
Daniel@4913:     BITMAPINFOHEADER *infoHeader = &info.bmiHeader;
Daniel@4913:     BYTE *bits = NULL;
Daniel@4914:     if (hhbm) {
Daniel@4913:         infoHeader->biSize = sizeof(BITMAPINFOHEADER);
Daniel@4913:         infoHeader->biWidth = width;
Daniel@4913:         infoHeader->biHeight = -1 * SDL_abs(height);
Daniel@4913:         infoHeader->biPlanes = 1;
Daniel@4913:         infoHeader->biBitCount = 32;
Daniel@4913:         infoHeader->biCompression = BI_RGB;
Daniel@4913:         *hhbm = CreateDIBSection(hdc, &info, DIB_RGB_COLORS, (void **)&bits, 0, 0);
Daniel@4913:         if (*hhbm)
Daniel@4913:             SelectObject(hdc, *hhbm);
Daniel@4913:     }
Daniel@4913:     return bits;
Daniel@4913: }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: StopDrawToBitmap(HDC hdc, HBITMAP *hhbm)
Daniel@4913: {
Daniel@4914:     if (hhbm && *hhbm) {
Daniel@4913:         DeleteObject(*hhbm);
Daniel@4913:         *hhbm = NULL;
Daniel@4913:     }
Daniel@4913: }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: BitmapToTexture(HBITMAP hbm, BYTE *bits, int width, int height, SDL_Texture **texture)
Daniel@4913: {
Daniel@4913:     SDL_Surface *surface = NULL;
Daniel@4913:     BITMAP bm = {0};
Daniel@4913: 
Daniel@4913:     if (GetObject(hbm, sizeof(bm), &bm) == 0)
Daniel@4913:         return;
Daniel@4913: 
Daniel@4914:     if (bits && texture) {
Daniel@4913:         /*
Daniel@4913:             For transparency:
Daniel@4913: 
Daniel@4913:             const Uint8 alpha = 130;
Daniel@4913:             unsigned long *p = (unsigned long *)bits;
Daniel@4913:             unsigned long *end = (unsigned long *)(bits + (bm.bmWidthBytes * bm.bmHeight));
Daniel@4914:             while (p < end) {
Daniel@4913:                 *p = RGB(GetRValue(*p), GetGValue(*p), GetBValue(*p)) | (alpha << 24);
Daniel@4913:                 ++p;
Daniel@4913:             }
Daniel@4913:             surface = SDL_CreateRGBSurfaceFrom(bits, width, height, bm.bmBitsPixel, bm.bmWidthBytes, 0x00ff0000, 0x0000ff00, 0x000000ff, 0xff000000);
Daniel@4913:         */
Daniel@4913:         surface = SDL_CreateRGBSurfaceFrom(bits, width, height, bm.bmBitsPixel, bm.bmWidthBytes, 0x00ff0000, 0x0000ff00, 0x000000ff, 0);
Daniel@4914:         if (surface) {
Daniel@4913:             *texture = SDL_CreateTextureFromSurface(0, surface);
Daniel@4913:             SDL_FreeSurface(surface);
Daniel@4913:         }
Daniel@4913:     }
Daniel@4913: }
Daniel@4913: 
Daniel@4913: /* This draws only within the specified area and fills the entire region. */
Daniel@4913: static void
Daniel@4913: DrawRect(HDC hdc, int left, int top, int right, int bottom, int pensize)
Daniel@4913: {
Daniel@4913:     /* The case of no pen (PenSize = 0) is automatically taken care of. */
Daniel@4913:     const int penadjust = (int)SDL_floor(pensize / 2.0f - 0.5f);
Daniel@4913:     left += pensize / 2;
Daniel@4913:     top += pensize / 2;
Daniel@4913:     right -= penadjust;
Daniel@4913:     bottom -= penadjust;
Daniel@4913:     Rectangle(hdc, left, top, right, bottom);
Daniel@4913: }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: DestroyTexture(SDL_Texture **texture)
Daniel@4913: {
Daniel@4914:     if (texture && *texture) {
Daniel@4913:         SDL_DestroyTexture(*texture);
Daniel@4913:         *texture = NULL;
Daniel@4913:     }
Daniel@4913: }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: IME_DestroyTextures(SDL_VideoData *videodata)
Daniel@4913: {
Daniel@4913:     DestroyTexture(&videodata->ime_candtex);
Daniel@4913: }
Daniel@4913: 
Daniel@4913: #define SDL_swap(a,b) { \
Daniel@4913:     int c = (a);        \
Daniel@4913:     (a) = (b);          \
Daniel@4913:     (b) = c;            \
Daniel@4913:     }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: IME_PositionCandidateList(SDL_VideoData *videodata, SIZE size)
Daniel@4913: {
Daniel@4913:     int left, top, right, bottom;
Daniel@4913:     SDL_bool ok = SDL_FALSE;
Daniel@4913:     int winw = videodata->ime_winwidth;
Daniel@4913:     int winh = videodata->ime_winheight;
Daniel@4913: 
Daniel@4913:     /* Bottom */
Daniel@4913:     left = videodata->ime_rect.x;
Daniel@4913:     top = videodata->ime_rect.y + videodata->ime_rect.h;
Daniel@4913:     right = left + size.cx;
Daniel@4913:     bottom = top + size.cy;
Daniel@4914:     if (right >= winw) {
Daniel@4913:         left -= right - winw;
Daniel@4913:         right = winw;
Daniel@4913:     }
Daniel@4913:     if (bottom < winh)
Daniel@4913:         ok = SDL_TRUE;
Daniel@4913: 
Daniel@4913:     /* Top */
Daniel@4914:     if (!ok) {
Daniel@4913:         left = videodata->ime_rect.x;
Daniel@4913:         top = videodata->ime_rect.y - size.cy;
Daniel@4913:         right = left + size.cx;
Daniel@4913:         bottom = videodata->ime_rect.y;
Daniel@4914:         if (right >= winw) {
Daniel@4913:             left -= right - winw;
Daniel@4913:             right = winw;
Daniel@4913:         }
Daniel@4913:         if (top >= 0)
Daniel@4913:             ok = SDL_TRUE;
Daniel@4913:     }
Daniel@4913: 
Daniel@4913:     /* Right */
Daniel@4914:     if (!ok) {
Daniel@4913:         left = videodata->ime_rect.x + size.cx;
Daniel@4913:         top = 0;
Daniel@4913:         right = left + size.cx;
Daniel@4913:         bottom = size.cy;
Daniel@4913:         if (right < winw)
Daniel@4913:             ok = SDL_TRUE;
Daniel@4913:     }
Daniel@4913: 
Daniel@4913:     /* Left */
Daniel@4914:     if (!ok) {
Daniel@4913:         left = videodata->ime_rect.x - size.cx;
Daniel@4913:         top = 0;
Daniel@4913:         right = videodata->ime_rect.x;
Daniel@4913:         bottom = size.cy;
Daniel@4913:         if (right >= 0)
Daniel@4913:             ok = SDL_TRUE;
Daniel@4913:     }
Daniel@4913: 
Daniel@4913:     /* Window too small, show at (0,0) */
Daniel@4914:     if (!ok) {
Daniel@4913:         left = 0;
Daniel@4913:         top = 0;
Daniel@4913:         right = size.cx;
Daniel@4913:         bottom = size.cy;
Daniel@4913:     }
Daniel@4913: 
Daniel@4913:     videodata->ime_candlistrect.x = left;
Daniel@4913:     videodata->ime_candlistrect.y = top;
Daniel@4913:     videodata->ime_candlistrect.w = right - left;
Daniel@4913:     videodata->ime_candlistrect.h = bottom - top;
Daniel@4913: }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: IME_RenderCandidateList(SDL_VideoData *videodata, HDC hdc)
Daniel@4913: {
Daniel@4916:     int i, j;
Daniel@4913:     SIZE size = {0};
Daniel@4916:     SIZE candsizes[MAX_CANDLIST];
Daniel@4913:     SIZE maxcandsize = {0};
Daniel@4913:     HBITMAP hbm = NULL;
Daniel@4913:     BYTE *bits = NULL;
Daniel@4913:     const int candcount = SDL_min(SDL_min(MAX_CANDLIST, videodata->ime_candcount), videodata->ime_candpgsize);
Daniel@4913:     SDL_bool vertical = videodata->ime_candvertical;
Daniel@4913: 
Daniel@4913:     const int listborder = 1;
Daniel@4913:     const int listpadding = 0;
Daniel@4913:     const int listbordercolor = RGB(0xB4, 0xC7, 0xAA);
Daniel@4913:     const int listfillcolor = RGB(255, 255, 255);
Daniel@4913: 
Daniel@4913:     const int candborder = 1;
Daniel@4913:     const int candpadding = 0;
Daniel@4913:     const int candmargin = 1;
Daniel@4913:     const COLORREF candbordercolor = RGB(255, 255, 255);
Daniel@4913:     const COLORREF candfillcolor = RGB(255, 255, 255);
Daniel@4913:     const COLORREF candtextcolor = RGB(0, 0, 0);
Daniel@4913:     const COLORREF selbordercolor = RGB(0x84, 0xAC, 0xDD);
Daniel@4913:     const COLORREF selfillcolor = RGB(0xD2, 0xE6, 0xFF);
Daniel@4913:     const COLORREF seltextcolor = RGB(0, 0, 0);
Daniel@4916:     const int horzcandspacing = 5;
Daniel@4913: 
Daniel@4913:     HPEN listpen = listborder != 0 ? CreatePen(PS_SOLID, listborder, listbordercolor) : (HPEN)GetStockObject(NULL_PEN);
Daniel@4913:     HBRUSH listbrush = CreateSolidBrush(listfillcolor);
Daniel@4913:     HPEN candpen = candborder != 0 ? CreatePen(PS_SOLID, candborder, candbordercolor) : (HPEN)GetStockObject(NULL_PEN);
Daniel@4913:     HBRUSH candbrush = CreateSolidBrush(candfillcolor);
Daniel@4913:     HPEN selpen = candborder != 0 ? CreatePen(PS_DOT, candborder, selbordercolor) : (HPEN)GetStockObject(NULL_PEN);
Daniel@4913:     HBRUSH selbrush = CreateSolidBrush(selfillcolor);
Daniel@4913:     HFONT font = CreateFont((int)(1 + videodata->ime_rect.h * 0.75f), 0, 0, 0, FW_NORMAL, FALSE, FALSE, FALSE, DEFAULT_CHARSET, OUT_CHARACTER_PRECIS, CLIP_DEFAULT_PRECIS, PROOF_QUALITY, VARIABLE_PITCH | FF_SWISS, TEXT("Microsoft Sans Serif"));
Daniel@4913: 
Daniel@4913:     SetBkMode(hdc, TRANSPARENT);
Daniel@4913:     SelectObject(hdc, font);
Daniel@4913: 
Daniel@4914:     for (i = 0; i < candcount; ++i) {
Daniel@4913:         const WCHAR *s = videodata->ime_candidates[i];
Daniel@4913:         if (!*s)
Daniel@4913:             break;
Daniel@4913: 
Daniel@4916:         GetTextExtentPoint32W(hdc, s, SDL_wcslen(s), &candsizes[i]);
Daniel@4916:         maxcandsize.cx = SDL_max(maxcandsize.cx, candsizes[i].cx);
Daniel@4916:         maxcandsize.cy = SDL_max(maxcandsize.cy, candsizes[i].cy);
Daniel@4913: 
Daniel@4913:     }
Daniel@4916:     if (vertical) {
Daniel@4916:         size.cx =
Daniel@4916:             (listborder * 2) +
Daniel@4916:             (listpadding * 2) +
Daniel@4916:             (candmargin * 2) +
Daniel@4916:             (candborder * 2) +
Daniel@4916:             (candpadding * 2) +
Daniel@4916:             (maxcandsize.cx)
Daniel@4916:             ;
Daniel@4916:         size.cy =
Daniel@4916:             (listborder * 2) +
Daniel@4916:             (listpadding * 2) +
Daniel@4916:             ((candcount + 1) * candmargin) +
Daniel@4916:             (candcount * candborder * 2) +
Daniel@4916:             (candcount * candpadding * 2) +
Daniel@4916:             (candcount * maxcandsize.cy)
Daniel@4916:             ;
Daniel@4916:     }
Daniel@4916:     else {
Daniel@4916:         size.cx =
Daniel@4916:             (listborder * 2) +
Daniel@4916:             (listpadding * 2) +
Daniel@4916:             ((candcount + 1) * candmargin) +
Daniel@4916:             (candcount * candborder * 2) +
Daniel@4916:             (candcount * candpadding * 2) +
Daniel@4916:             ((candcount - 1) * horzcandspacing);
Daniel@4916:         ;
Daniel@4913: 
Daniel@4916:         for (i = 0; i < candcount; ++i)
Daniel@4916:             size.cx += candsizes[i].cx;
Daniel@4916: 
Daniel@4916:         size.cy =
Daniel@4916:             (listborder * 2) +
Daniel@4916:             (listpadding * 2) +
Daniel@4916:             (candmargin * 2) +
Daniel@4916:             (candborder * 2) +
Daniel@4916:             (candpadding * 2) +
Daniel@4916:             (maxcandsize.cy)
Daniel@4916:             ;
Daniel@4916:     }
Daniel@4913: 
Daniel@4913:     bits = StartDrawToBitmap(hdc, &hbm, size.cx, size.cy);
Daniel@4913: 
Daniel@4913:     SelectObject(hdc, listpen);
Daniel@4913:     SelectObject(hdc, listbrush);
Daniel@4913:     DrawRect(hdc, 0, 0, size.cx, size.cy, listborder);
Daniel@4913: 
Daniel@4913:     SelectObject(hdc, candpen);
Daniel@4913:     SelectObject(hdc, candbrush);
Daniel@4913:     SetTextColor(hdc, candtextcolor);
Daniel@4913:     SetBkMode(hdc, TRANSPARENT);
Daniel@4913: 
Daniel@4914:     for (i = 0; i < candcount; ++i) {
Daniel@4913:         const WCHAR *s = videodata->ime_candidates[i];
Daniel@4913:         int left, top, right, bottom;
Daniel@4913:         if (!*s)
Daniel@4913:             break;
Daniel@4913: 
Daniel@4916:         if (vertical) {
Daniel@4916:             left = listborder + listpadding + candmargin;
Daniel@4916:             top = listborder + listpadding + (i * candborder * 2) + (i * candpadding * 2) + ((i + 1) * candmargin) + (i * maxcandsize.cy);
Daniel@4916:             right = size.cx - listborder - listpadding - candmargin;
Daniel@4916:             bottom = top + maxcandsize.cy + (candpadding * 2) + (candborder * 2);
Daniel@4916:         }
Daniel@4916:         else {
Daniel@4916:             left = listborder + listpadding + (i * candborder * 2) + (i * candpadding * 2) + ((i + 1) * candmargin) + (i * horzcandspacing);
Daniel@4913: 
Daniel@4916:             for (j = 0; j < i; ++j)
Daniel@4916:                 left += candsizes[j].cx;
Daniel@4913: 
Daniel@4916:             top = listborder + listpadding + candmargin;
Daniel@4916:             right = left + candsizes[i].cx + (candpadding * 2) + (candborder * 2);
Daniel@4916:             bottom = size.cy - listborder - listpadding - candmargin;
Daniel@4913:         }
Daniel@4913: 
Daniel@4914:         if (i == videodata->ime_candsel) {
Daniel@4913:             SelectObject(hdc, selpen);
Daniel@4913:             SelectObject(hdc, selbrush);
Daniel@4913:             SetTextColor(hdc, seltextcolor);
Daniel@4913:         }
Daniel@4914:         else {
Daniel@4913:             SelectObject(hdc, candpen);
Daniel@4913:             SelectObject(hdc, candbrush);
Daniel@4913:             SetTextColor(hdc, candtextcolor);
Daniel@4913:         }
Daniel@4913: 
Daniel@4913:         DrawRect(hdc, left, top, right, bottom, candborder);
Daniel@4913:         ExtTextOutW(hdc, left + candborder + candpadding, top + candborder + candpadding, 0, NULL, s, SDL_wcslen(s), NULL);
Daniel@4913:     }
Daniel@4913:     BitmapToTexture(hbm, bits, size.cx, size.cy, &videodata->ime_candtex);
Daniel@4913:     StopDrawToBitmap(hdc, &hbm);
Daniel@4913: 
Daniel@4913:     DeleteObject(listpen);
Daniel@4913:     DeleteObject(listbrush);
Daniel@4913:     DeleteObject(candpen);
Daniel@4913:     DeleteObject(candbrush);
Daniel@4913:     DeleteObject(selpen);
Daniel@4913:     DeleteObject(selbrush);
Daniel@4913:     DeleteObject(font);
Daniel@4913: 
Daniel@4913:     IME_PositionCandidateList(videodata, size);
Daniel@4913: }
Daniel@4913: 
Daniel@4913: static void
Daniel@4913: IME_Render(SDL_VideoData *videodata)
Daniel@4913: {
Daniel@4913:     HDC hdc = CreateCompatibleDC(NULL);
Daniel@4913: 
Daniel@4913:     if (videodata->ime_candlist)
Daniel@4913:         IME_RenderCandidateList(videodata, hdc);
Daniel@4913: 
Daniel@4913:     DeleteDC(hdc);
Daniel@4913: 
Daniel@4913:     videodata->ime_dirty = SDL_FALSE;
Daniel@4913: }
Daniel@4913: 
Daniel@4913: void IME_Present(SDL_VideoData *videodata)
Daniel@4913: {
Daniel@4913:     if (videodata->ime_dirty)
Daniel@4913:         IME_Render(videodata);
Daniel@4913: 
Daniel@4913:     SDL_RenderCopy(videodata->ime_candtex, NULL, &videodata->ime_candlistrect);
Daniel@4913: }
Daniel@4913: 
slouken@5086: #endif /* SDL_DISABLE_WINDOWS_IME */
slouken@5086: 
slouken@1895: /* vi: set ts=4 sw=4 expandtab: */