hikerwbui.cpp

自己用Markov模型做的一个整句物笔输入法的原型

	//05.11.10
	pShowSoftKeyboardProc = (LPFSHOWSOFTKEYBOARDPROC)GetProcAddress(hInstDLL, "ShowSoftKeyboard");

	pInitHookProc = (LPFINITHOOKPROC)GetProcAddress(hInstDLL, "InitHook");
	pEndHookProc = (LPFENDHOOKPROC)GetProcAddress(hInstDLL, "EndHook");
	pHookOnProc = (LPFHOOKONPROC)GetProcAddress(hInstDLL, "HookOn");
	pHookOffProc = (LPFHOOKOFFPROC)GetProcAddress(hInstDLL, "HookOff");
	pTranslateProc = (LPFTRANSLATEPROC)GetProcAddress(hInstDLL, "Translate");
	pGetWordsProc = (LPFGETWORDSPROC)GetProcAddress(hInstDLL, "GetWords");
	pGetWordSelProc = (LPFGETWORDSELPROC)GetProcAddress(hInstDLL, "GetWordSel");
	pGetCodesProc = (LPFGETCODESPROC)GetProcAddress(hInstDLL, "GetCodes");
	pTrainProc = (LPFTRAINPROC)GetProcAddress(hInstDLL, "Train");
	pSetStyleProc = (LPFSETSTYLEPROC)GetProcAddress(hInstDLL, "SetStyle");
	pPYGetWordsProc = (LPFPYGETWORDSPROC)GetProcAddress(hInstDLL, "PYGetWords");
	pFindCodeByWordProc = (LPFFINDCODEBYWORDPROC)GetProcAddress(hInstDLL, "FindCodeByWord");
	pSetCharSetProc = (LPFSETCHARSETPROC)GetProcAddress(hInstDLL, "SetCharset");
	pGeneCodeProc = (LPFGENECODEPROC)GetProcAddress(hInstDLL, "GeneCode");
	pNewWordProc = (LPFNEWWORDPROC)GetProcAddress(hInstDLL, "NewWord");
	pDeleteWordProc = (LPFDELETEWORDPROC)GetProcAddress(hInstDLL, "DeleteWord");
	pTrainFromFileProc = (LPFTRAINFROMFILEPROC)GetProcAddress(hInstDLL, "TrainFromFile");
	pSetKeyProcSignProc = (LPFSETKEYPROCSIGNPROC)GetProcAddress(hInstDLL, "SetKeyProcSign");
	pGetThreadHandleProc = (LPFGETTHREADHANDLEPROC)GetProcAddress(hInstDLL, "GetThreadHandle");
	
    hFile = CreateFileMapping((HANDLE)0xFFFFFFFF, 0, PAGE_READWRITE, 0, sizeof(HANDLE)*5, "Hook");
    pMem = (HANDLE*)MapViewOfFile(hFile, FILE_MAP_WRITE, 0, 0, sizeof(HANDLE)*5);
    (*pMem) = hEditWnd;
    (*(pMem+1)) = 0;		////////////////
    (*(pMem+2)) = hStaWnd;		////////////////
    (*(pMem+3)) = 0;		////indicate any other key having been pushed while shift key down
	
	pInitHookProc();

	//get windows version
	OSVERSIONINFO osv;
	osv.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
	GetVersionEx(&osv);
	giOSVER = osv.dwMajorVersion;

	editWnd.SetTimer(1, 200, 0);

	//GET system set information
	GetSysParaFromFile();
//	pSetStyleProc(GetOutputStyle());
//	pSetCharSetProc(giCharset);

	if (GetKeyState(VK_CAPITAL) & 0x01)
		staWnd.SetCapSta(TRUE);
	else
		staWnd.SetCapSta(FALSE);



	Clean();
	
	return TRUE;
}

BOOL EndHook()
{
	pEndHookProc();
	UnmapViewOfFile(pMem);
	CloseHandle(hFile);

	FreeLibrary(hInstDLL);

	return TRUE;
}

BOOL HookOn()
{
	//SetWindowPos(staWnd.GetSafeHwnd(), HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE);
	editWnd.SetTimer(1, 200, 0);

	if (!gbFloatWnd)
		editWnd.ShowWindow(SW_SHOW);
	gbOpenSta = TRUE;

	if (gbChsSta)
		((CHikerWBStartDlg*)AfxGetMainWnd())->ChangeIcon(0);
	else
		((CHikerWBStartDlg*)AfxGetMainWnd())->ChangeIcon(1);

	if (GetKeyState(VK_CAPITAL) & 0x01)
		staWnd.SetCapSta(TRUE);
	else
		staWnd.SetCapSta(FALSE);

	return pHookOnProc();
}

BOOL HookOff()
{
	editWnd.KillTimer(1);

	SetWindowPos(staWnd.GetSafeHwnd(), HWND_TOPMOST, 0, 0, 0, 0, SWP_HIDEWINDOW);

	//editWnd.ShowWindow(SW_HIDE);
	if (strlen((char*)wordstr) > 0)
		PostSent();
	Clean();
	gbOpenSta = FALSE;
	editWnd.ShowWindow(SW_HIDE);

	((CHikerWBStartDlg*)AfxGetMainWnd())->ChangeIcon(2);

	return pHookOffProc();
}

static int GetKeyId(unsigned char c)
{
	int i;

	if (!ispunct(c))
	{
		for (i = 0; i < SOFTKEYBOARD_LEN; i+=2)
		{
			if (c == gKeyArr[1][i])
				return i/2;
		}
	}
	else
	{
		for (i = 0; i < SOFTKEYBOARD_LEN; i+=2)
		{
			if (c == gKeyArr[1][i])
				return i/2;
		}
		for (i = 0; i < SOFTKEYBOARD_LEN; i+=2)		//if in gKeyArr[1] not found, find in gKeyArr[0]
		{
			if (c == gKeyArr[0][i])
				return i/2;
		}
	}

	return -1;
}

//using for find a special key's corresponding code
static BOOL FindKeyCode(CString csKeyName, unsigned char* pcode)
{
	memset(codelist, 0, sizeof(codelist));
	if (pGetCodesProc((unsigned char*)(const char*)csKeyName, codelist, selcodenum))
	{
		strcpy((char*)pcode, (char*)codelist);
		return TRUE;
	}

	return FALSE;
}

static CString GetChsPunc(unsigned char c)
{
	for (int i = 0; i < strlen((char*)gPunctuation); i++)
	{
		if (c == gPunctuation[i])
			break;
	}

	return CString(gChinsesPunc[2*i])+CString(gChinsesPunc[2*i+1]);
}

static void ShowFloatStaWnd()
{
	POINT pt;
	//HWND hWnd = GetFocus();
	ShowCaret(ghFocusWnd);
	//Sleep(GetCaretBlinkTime());	//???why, GetCaretPos may not return current caret position in time
	if (!GetCaretPos(&pt))
		MessageBox(0, "Get caret position failed!", 0, MB_OK);
	
	ClientToScreen(ghFocusWnd, &pt);
	editWnd.ShowFloat(pt);
}

static int GetCurrLoc()
{
	int loc = 0;
	for (int i = 0; i <= currpos; i++)
		loc += wordslen[i];

	return loc;
}

static int GetAsc(int vk, BOOL bShiftDown)
{
	for (int i = 0; i < sizeof(gVKArr); i++)
	{
		if (gVKArr[i] == vk)
		{
			if (!bShiftDown)
				return gKeyArr[1][i*2];		//alphabetic or number
			else
				return gKeyArr[0][i*2];		//alphabetic or number
		}
	}
	
	return 0;
}

BOOL HookKeyHandle(WPARAM wParam, LPARAM lParam)
{
	unsigned short c = 0;			//!must be initialized with 0
	BYTE lpKeyboardState[256];
	int codelen = strlen((char*)code);
	int cslen = strlen((char*)codestr);
	int wslen = 0;
	unsigned char codeback[CODELEN];//temporary variable
	unsigned char corrword[WORDLEN];
	//int codenum = 0;
	CString csWords;

	BOOL bCapsLock = (GetKeyState(VK_CAPITAL) << 15);
	BOOL bShiftDown = (GetKeyState(VK_SHIFT) >> 15);
	BOOL bLShiftDown = (GetKeyState(VK_LSHIFT) >> 15);
	BOOL bRShiftDown = (GetKeyState(VK_RSHIFT) >> 15);
	BOOL bCtrlDown = ((GetKeyState(VK_CONTROL) >> 15) != 0);
	BOOL iSoftKeyboard = 0;

	if (wParam == VK_CAPITAL)
	{
		if (GetKeyState(VK_CAPITAL) & 0x01)
			staWnd.SetCapSta(TRUE);
		else
			staWnd.SetCapSta(FALSE);

		return TRUE;
	}

	if (lParam > 0 || lParam < -200)		//05.11.10 hard keyborad
	{
		GetKeyboardState(lpKeyboardState);
		ToAscii(wParam, (lParam&0x00FF0000)>>16, lpKeyboardState, &c, 0);	//the second parameter seems no use.
		iSoftKeyboard = (!gbChsSta && gbSBCSta), 10, 0;
	}
	else		//from soft keyboard
	{
		bShiftDown = (lParam<=-100)?TRUE:FALSE;
		iSoftKeyboard = (lParam<=-100) ? -(lParam+100) : -lParam;
		c = GetAsc(wParam, bShiftDown);
	}

	//process keyin
	if (gbChsSta && iSoftKeyboard <= 0 &&
			((isalpha(c) && !bCapsLock && !bShiftDown && !bCtrlDown) /*lower case letter*/
			|| !gbTmpPy && 32 == c && codelen < giMaxCodeLen && codelen > 0))	//or space
	{//key in chinses character
		giLastKey = wParam;

		if (gbFloatWnd && !editWnd.IsWindowVisible())		//show floating state window
		{
			ShowFloatStaWnd();
		}

	    (*(pMem+1)) = (HANDLE)0xFFFFFFFF;		//////////////////


		if (strlen((char*)wordstr) >= SENTLEN-6)
		{
			MessageBeep(0xFFFFFFFF/*MB_ICONASTERISK*/);
			return TRUE;
		}

		if (!gbTmpPy)
		{
			if (codelen >= giMaxCodeLen || code[codelen-1] == 32 || 0 == codelen)					//new code
			{
				memset(code, 0, sizeof(code));
				codelen = 0;
				currpos++;
			}
			code[codelen++] = c;
			lastpos = currpos;

			//show code
			if (codelen < giMaxCodeLen && code[codelen-1] != 32)	//code is not full, return
			{
				editWnd.SetCode((LPCSTR)code, FALSE);

				//get select words(by prior)
				memset(wordlist, 0, sizeof(wordlist));
				pGetWordsProc(code, codestr, currpos, wordlist, selwordnum);
				giPageNo = 0;
				csWords = TransWords(giPageNo);
				//show select words
				editWnd.SetWord((LPCSTR)csWords, giPageNo, selwordnum);
				editWnd.SetSent((LPCSTR)wordstr, wordslen, wordnum, currpos-1);

				return TRUE;
			}

			editWnd.SetCode((LPCSTR)code, TRUE);		///

			//--insert code into code stream
			InsertCode(code, currpos);		//don't clear the code
			memset(corrword, 0, sizeof(corrword));
			InsertCorrWord(corrword, currpos);		//insert an empty correct word

			//translate the code stream to word stream
			strcpy((char*)lastwordstr, (char*)wordstr);
			memset(wordstr, 0, sizeof(wordstr));
			if (!pTranslateProc(codestr, wordstr, codenum, wordnum,	codeslen, wordslen))
				strcpy((char*)wordstr, (char*)lastwordstr);

			//get select words again(by post)
			memset(wordlist, 0, sizeof(wordlist));
			pGetWordsProc(code, codestr, currpos, wordlist, selwordnum);
			giPageNo = 0;
			csWords = TransWords(giPageNo);
			//show select words
			editWnd.SetWord((LPCSTR)csWords, giPageNo, selwordnum);


			//display translated word stream
			CorrSent();
			if (codenum > 0)
				editWnd.SetSent((LPCSTR)wordstr, wordslen, wordnum, currpos);
		}
		else	//temporary pinyin
		{
			code[codelen++] = c;
			lastpos = currpos;

			//show code
			editWnd.SetCode((LPCSTR)code, FALSE);

			memset(wordlist, 0, sizeof(wordlist));
			pPYGetWordsProc(code, wordlist, selwordnum);
			giPageNo = 0;
			csWords = TransWords(giPageNo);
			//show select words
			editWnd.SetWord((LPCSTR)csWords, giPageNo, selwordnum);
			editWnd.SetSent((LPCSTR)wordstr, wordslen, wordnum, currpos-1);	//in pinyin state, the code is always supposed not full.
		}
	}
	else if (gbChsSta && !bShiftDown && iSoftKeyboard <= 0  
			&& (selwordnum > 1)
			&& (48 <= c && c <= 57 || 32 == c && gbTmpPy)
			&& (((selwordnum%10 == 0 || ((giPageNo+1)*10 <= selwordnum)) && c-48 >= 0 && c-48 <= 9)
			|| (selwordnum%10 != 0 && ((giPageNo+1)*10 > selwordnum) && c-48 >= 1 && c-48 <= selwordnum%10)
			|| 32 == c && gbTmpPy))
	{
		giLastKey = wParam;

		if (selwordnum <= 0)		//duplicate space character
			return TRUE;

		if (c == 32)				//temporary pinyin
			c = 49;

		if (c == 48)				//note c is and unsigned short
			c = 9;
		else
			c -= 49;

		c = giPageNo*10+c;

		memset(corrword, 0, sizeof(corrword));
		pGetWordSelProc(wordlist, c, corrword);

		if (0 == strlen((char*)corrword))
			return TRUE;

		if (gbTmpPy)
		{
			pFindCodeByWordProc(corrword, code);
			InsertCode(code, currpos);
			InsertCorrWord(corrword, currpos);
			gbTmpPy = FALSE;

			editWnd.SetCode((LPCSTR)code);

			memset(wordlist, 0, sizeof(wordlist));
			pGetWordsProc(code, codestr, currpos, wordlist, selwordnum);
			giPageNo = 0;
			csWords = TransWords(giPageNo);
			//show select words
			editWnd.SetWord((LPCSTR)csWords, giPageNo, selwordnum);
		}
		else if (codelen < giMaxCodeLen && code[codelen-1] != 32)		//not full code
		{
			code[codelen] = 32;
			InsertCode(code, currpos);
			InsertCorrWord(corrword, currpos);
		}
		else
		{
			DeleteCode(currpos);
			DeleteCorrWord(currpos);
			InsertCode(code, currpos);
			InsertCorrWord(corrword, currpos);
		}

		//translate
		strcpy((char*)lastwordstr, (char*)wordstr);
		memset(wordstr, 0, sizeof(wordstr));
		if (!pTranslateProc(codestr, wordstr, codenum, wordnum,	codeslen, wordslen))
			strcpy((char*)wordstr, (char*)lastwordstr);

		//updat word stream by correct word stream
		CorrSent();
		if (codenum > 0)
			editWnd.SetSent((LPCSTR)wordstr, wordslen, wordnum, currpos);
	}
	else if ((8 == wParam || 46 == wParam) && (cslen > 0 || codelen > 0))	//backspace & del key
	{
		if (lastpos >= 0 && lastpos == currpos && wParam == 8)		//only the last code can be deleted letter by letter
		{
			memset(codeback, 0, sizeof(codeback));
			GetCode(currpos, codeback);		
			if (0 == strcmp((char*)codeback, (char*)code))	//first delete the code
			{
				DeleteCode(currpos);
				DeleteWord(currpos, TRUE);
//					DeleteCorrWord(currpos);
			}

			if (codelen > 0)		//delete last letter of the code using backspace key
			{
				//delete last letter 
				if (32 == code[strlen((char*)code)-1])	//lastcode has no space, but codestr may has!
				{
					code[strlen((char*)code)-1] = 0;
					code[strlen((char*)code)-1] = 0;
				}
				else
				{
					code[strlen((char*)code)-1] = 0;
				}

				//if code is empty
				if (0 == strlen((char*)code))
				{
					//if (8 == wParam)	//backspace key
						currpos--;
//					else		//del key
//					{
//						if (currpos >= wordnum-1)
//							currpos --;
//					}

					GetCode(currpos, code);
					gbTmpPy = FALSE;
					editWnd.SetCode((LPCSTR)code);
				}
				else
					editWnd.SetCode((LPCSTR)code, FALSE);
			}
		}
		else
		{
			if (currpos < 0 && wParam == 8)
				return TRUE;

			//delete last input word
//				DeleteCorrWord(currpos);
			if (8 == wParam)	//backspace key
			{
				DeleteCode(currpos);
				DeleteWord(currpos, TRUE);
				currpos --;
			}
			else
			{
				//if (currpos <= wordnum -1)
				currpos ++;
				DeleteCode(currpos);
				DeleteWord(currpos, TRUE);
				if (currpos >= 0)
					currpos --;
			}
			GetCode(currpos, code);
			editWnd.SetCode((LPCSTR)code);
		}

		//get the code's corresponding words
		memset(wordlist, 0, sizeof(wordlist));
		if (gbTmpPy)
			pPYGetWordsProc(code, wordlist, selwordnum);	
		else
			pGetWordsProc(code, codestr, currpos, wordlist, selwordnum);
		giPageNo = 0;
		CString csWords = TransWords(giPageNo);

		codelen = strlen((char*)code);		//get codelen and cslen again
		cslen = strlen((char*)codestr);

		if (!gbTmpPy && (codelen < giMaxCodeLen && code[codelen-1] != 32))
			editWnd.SetSent((LPCSTR)wordstr, wordslen, wordnum, currpos-1);
		else
			editWnd.SetSent((LPCSTR)wordstr, wordslen, wordnum, currpos);

		editWnd.SetWord((LPCSTR)csWords, giPageNo, selwordnum);

		if (cslen == 0 && codelen == 0)
			Clean();			//hide the window

		giLastKey = wParam;
	}
	else if (!gbTmpPy && cslen > 0 && (VK_LEFT == wParam || VK_RIGHT == wParam || VK_HOME == wParam || VK_END == wParam))
	{
		if (currpos >= 0 && codelen < giMaxCodeLen && code[codelen-1] != 32 && giLastKey != 27)		//current code is not full and last key is not Esc
			return TRUE;
		
		switch(wParam) 
		{
		case VK_LEFT:
			if (currpos >= 0)
				currpos --;
			break;
		case VK_RIGHT:
			if (currpos < codenum-1)
				currpos ++;
			break;
		case VK_HOME:
			currpos = -1;
			break;
		case VK_END:
			currpos = codenum - 1;
			break;
		default:
			break;
		}
		
		lastpos = -1;
		GetCode(currpos, code);
		//get the code's corresponding words
		memset(wordlist, 0, sizeof(wordlist));
		pGetWordsProc(code, codestr, currpos, wordlist, selwordnum);	
		giPageNo = 0;
		CString csWords = TransWords(giPageNo);

		editWnd.SetCode((LPCSTR)code);
		editWnd.SetWord((LPCSTR)csWords, giPageNo, selwordnum);
		editWnd.SetSent((LPCSTR)wordstr, wordslen, wordnum, currpos);

		giLastKey = wParam;
	}
	else if (selwordnum > 0 && (33 == wParam || 34 == wParam))		//pageup and pagedown key
	{
		if (33 == wParam && giPageNo > 0)
			giPageNo--;
		else if (34 == wParam && (giPageNo+1)*10 < selwordnum)
			giPageNo++;

		CString csWords = TransWords(giPageNo);
		editWnd.SetWord((LPCSTR)csWords, giPageNo, selwordnum);
	}
	else if (cslen > 0 && 13 == wParam)	//enter key
	{
		memset(code, 0, sizeof(code));
		memset(wordstr, 0, sizeof(wordstr));
		pTranslateProc(codestr, wordstr, codenum, wordnum, codeslen, wordslen);
		CorrSent();

		if (ghFocusWnd && ghFocusWnd != AfxGetMainWnd()->GetSafeHwnd())
		{
			if (codenum > 0)
			{
				editWnd.SetCode((LPCSTR)code);
				editWnd.SetSent((LPCSTR)wordstr, wordslen, wordnum, currpos);
				PostSent();
				pTrainProc(codestr, wordstr, wordslen);
			}
			Clean();
		}
		else
		{
			//Beep(0xFF, 80);
			MessageBeep(/*MB_ICONASTERISK*/0xFFFFFFFF);
		}

		gbTmpPy = FALSE;
		giLastKey = wParam;
	}
	else if (16 == wParam)	//shift; soft keyboard shift key can't send message
	{
		if (16 == giLastKey && !bShiftDown)		//! only shift key can genereate two continuous WM_HOOKKEY message!, See Keyprocedure func.
		{//push down and release a shift key
			if ((*(pMem+3)) == 0)
			{
				gbChsSta = !gbChsSta;
				//gbChsPctSta = gbChsSta;
				SetChsState(gbChsSta);
				//SetChsPctState(gbChsPctSta);
			}
		}
		PostKey(wParam, lParam);

		(*(pMem+3)) = (HANDLE)0xFFFFFFFF;		//indicate if any other key having been pushed while shift key down
		if (bShiftDown)
		{
			if (giSwitchChs == 0 && bLShiftDown || giSwitchChs == 1 && bRShiftDown)
			{
				(*(pMem+3)) = 0;		//indicate if any other key having been pushed while shift key down
			}
		}

		gbTmpPy = FALSE;
		giLastKey = wParam;
	}
	else if (32 == wParam && bShiftDown)		//shift+space;
	{
		gbSBCSta = !gbSBCSta;
		SetSbcState(gbSBCSta);
		
		gbTmpPy = FALSE;
		giLastKey = wParam;
	}
	else if (190 == wParam && bCtrlDown)		//Control+.; note! c is different from wParam if it's a punctuation
	{
		gbChsPctSta = !gbChsPctSta;
		SetChsPctState(gbChsPctSta);

		giLastKey = wParam;
	}
	else if (13 == wParam && bCtrlDown)		//Control+space; 
	{
		((CHikerWBStartDlg*)AfxGetMainWnd())->OnMenuStart();
		giLastKey = wParam;