///////////////////////////////////////////////////////////////////////////////
//
// IMPORTANT NOTICE
//
// The following open source license statement does not apply to any
// entity in the Exception List published by FMSoft.
//
// For more information, please visit:
//
// https://www.fmsoft.cn/exception-list
//
//////////////////////////////////////////////////////////////////////////////
/*
 * This file is part of MiniGUI, a mature cross-platform windowing 
 * and Graphics User Interface (GUI) support system for embedded systems
 * and smart IoT devices.
 * 
 * Copyright (C) 2002~2018, Beijing FMSoft Technologies Co., Ltd.
 * Copyright (C) 1998~2002, WEI Yongming
 * 
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 * 
 * This program 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 General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <http://www.gnu.org/licenses/>.
 * 
 * Or,
 * 
 * As this program is a library, any link to this program must follow
 * GNU General Public License version 3 (GPLv3). If you cannot accept
 * GPLv3, you need to be licensed from FMSoft.
 * 
 * If you have got a commercial license of this program, please use it
 * under the terms and conditions of the commercial license.
 * 
 * For more information about the commercial license, please refer to
 * <http://www.minigui.com/en/about/licensing-policy/>.
 */
/*
** transkey.c: The Key Messages Translator
**
** Create date: 1999.05 by Wei Yongming.
**
** Used abbreviations:
** ime: input method
*/

#include <ctype.h>

#include "common.h"
#include "minigui.h"
#include "gdi.h"
#include "window.h"

//table1, translating depends on capslock & shift
static const char keymap11 [] = { 0,
27,'1','2','3','4','5','6','7','8','9','0', //11
'-','=','\b','\t', //4
'q','w','e','r','t','y','u','i','o','p','[',']','\n',0, //14 
'a','s','d','f','g','h','j','k','l',';','\'','`',0,'\\', //14
'z','x','c','v','b','n','m',',','.','/',0,'*',0,' ',0, //15
};
static const char keymap12 [] = { 0,
27,'!','@','#','$','%','^','&','*','(',')','_','+','\b',
'\t',
'Q','W','E','R','T','Y','U','I','O','P','{','}','\n',0,
'A','S','D','F','G','H','J','K','L',':','"','~',0,'|',
'Z','X','C','V','B','N','M','<','>','?',0,'*',0,' ',0,
};

#define TABLE_SPLIT_VAL 58

//table2 translating depends on numlock & shift
static const char keymap21 [] = { 0,
0,0,0,0,0,0,0,0,0,0,0,0, // f1-f10 numlock & scrolllock
0,0,0,'-',0,0,0,'+',0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,
'\n',0,'/'
};
static const char keymap22 [] = { 0,
0,0,0,0,0,0,0,0,0,0,0,0, // f1-f10 numlock & scrolllock
'7','8','9','-','4','5','6','+','1','2','3','0','.',0,0,0,
0,0,0,0,0,0,0,0,0,
'\n',0,'/'
};

#define TABLE_SPLIT_VAL2 98

unsigned char GUIAPI KeyMessageToChar (PMSG pMsg)
{
 short caplock = 0, numlock = 0, shift = 0;

 if (pMsg->message != MSG_KEYDOWN 
 && pMsg->message != MSG_SYSKEYDOWN 
 && pMsg->message != MSG_KEYUP 
 && pMsg->message != MSG_SYSKEYUP 
 && pMsg->message != MSG_KEYALWAYSPRESS 
 && pMsg->message != MSG_KEYLONGPRESS) {
 return 0;
 }

 if (pMsg->lParam & KS_CTRL)
 return 0;

 if (pMsg->wParam <= TABLE_SPLIT_VAL2)
 {
 if (pMsg->lParam & KS_CAPSLOCK)
 caplock=1;
 if (pMsg->lParam & KS_NUMLOCK)
 numlock=1;
 if (pMsg->lParam & KS_SHIFT)
 shift=1;

 if (pMsg->wParam <= TABLE_SPLIT_VAL) // translate using table1
 {
 // alpha chars, capslock affects
 if (isalpha(keymap11[pMsg ->wParam])) {

 // caps lock not on or shift & caps lock both on
 if (! (caplock ^ shift))
 return keymap11 [pMsg -> wParam];
 else
 return keymap12 [pMsg -> wParam];
 }
 // non-alpha, capslock doesn't matter
 else if (shift)
 return keymap12 [pMsg -> wParam];
 else 
 return keymap11 [pMsg -> wParam];
 }
 else
 {
 // caps lock not on or shift & caps lock both on
 if (!(numlock ^ shift))
 return keymap21 [pMsg -> wParam - TABLE_SPLIT_VAL];
 else
 return keymap22 [pMsg -> wParam - TABLE_SPLIT_VAL];
 }
 }
 else
 return 0;
}

BOOL GUIAPI TranslateMessage (PMSG pMsg)
{
 unsigned char iChar;

 if ((pMsg->hwnd != HWND_DESKTOP)
 && (pMsg->message == MSG_KEYDOWN || pMsg->message == MSG_SYSKEYDOWN)) {
 // can be transed to WM_CHAR
 if ((iChar = KeyMessageToChar (pMsg))) {
 if (pMsg->message == MSG_SYSKEYDOWN) 
 SendMessage (pMsg->hwnd, 
 MSG_SYSCHAR, iChar, pMsg->lParam);
 else
 SendMessage (pMsg->hwnd,
 MSG_CHAR, iChar, pMsg->lParam);

 return TRUE;
 }
 
 }

 return FALSE; 
}