/*
 * Copyright (C) 2020 The HIME team, Taiwan
 * Copyright (C) 2011 Edward Der-Hua Liu, Hsin-Chu, Taiwan
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation version 2.1
 * of the License.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 */

#include <anthy/anthy.h>

#include "hime.h"

#include "gst.h"
#include "hime-module-cb.h"
#include "hime-module.h"
#include "im-client/hime-im-client-attr.h"
#include "pho.h"

#if 0
#if DEBUG
#define dbg(...) gmf.mf___gcin_dbg_ (__VA_ARGS__)
#else
#define dbg(...) \
    do {         \
    } while (0)
#endif
#endif

static anthy_context_t ac;
static gboolean key_press_alt;
static GtkWidget *event_box_anthy;

static HIME_module_main_functions gmf;

void module_show_win ();
void module_hide_win ();
void module_change_font_size ();

enum {
    STATE_hira = 0,
    STATE_kata = 1,
    STATE_half_kata = 2
};

static int state_hira_kata = STATE_hira;

struct {
    char *en;
    char *hira;
    char *kata;
    char *half_kata;
} anthy_romaji_map[] = {
    {"xtu", "っ", "ッ", "ｯ"},
    {"xtsu", "っ", "ッ", "ｯ"},
    {"ltu", "っ", "ッ", "ｯ"},
    {"ltsu", "っ", "ッ", "ｯ"},

    {"-", "ー", "ー", "ｰ"},
    {"a", "あ", "ア", "ｱ"},
    {"i", "い", "イ", "ｲ"},
    {"u", "う", "ウ", "ｳ"},
    {"e", "え", "エ", "ｴ"},
    {"o", "お", "オ", "ｵ"},

    {"xa", "ぁ", "ァ", "ｧ"},
    {"xi", "ぃ", "ィ", "ｨ"},
    {"xu", "ぅ", "ゥ", "ｩ"},
    {"xe", "ぇ", "ェ", "ｪ"},
    {"xo", "ぉ", "ォ", "ｫ"},

    {"la", "ぁ", "ァ", "ｧ"},
    {"li", "ぃ", "ィ", "ｨ"},
    {"lu", "ぅ", "ゥ", "ｩ"},
    {"le", "ぇ", "ェ", "ｪ"},
    {"lo", "ぉ", "ォ", "ｫ"},

    {"wi", "うぃ", "ウィ", "ｳｨ"},
    {"we", "うぇ", "ウェ", "ｳｪ"},
    {"wha", "うぁ", "ウァ", "ｳｧ"},
    {"whi", "うぃ", "ウィ", "ｳｨ"},
    {"whe", "うぇ", "ウェ", "ｳｪ"},
    {"who", "うぉ", "ウォ", "ｳｫ"},

    {"va", "う゛ぁ", "ヴァ", "ｳﾞｧ"},
    {"vi", "う゛ぃ", "ヴィ", "ｳﾞｨ"},
    {"vu", "う゛", "ヴ", "ｳﾞ"},
    {"ve", "う゛ぇ", "ヴェ", "ｳﾞｪ"},
    {"vo", "う゛ぉ", "ヴォ", "ｳﾞｫ"},

    {"ka", "か", "カ", "ｶ"},
    {"ki", "き", "キ", "ｷ"},
    {"ku", "く", "ク", "ｸ"},
    {"ke", "け", "ケ", "ｹ"},
    {"ko", "こ", "コ", "ｺ"},

    {"ga", "が", "ガ", "ｶﾞ"},
    {"gi", "ぎ", "ギ", "ｷﾞ"},
    {"gu", "ぐ", "グ", "ｸﾞ"},
    {"ge", "げ", "ゲ", "ｹﾞ"},
    {"go", "ご", "ゴ", "ｺﾞ"},

    {"kya", "きゃ", "キャ", "ｷｬ"},
    {"kyi", "きぃ", "キィ", "ｷｨ"},
    {"kyu", "きゅ", "キュ", "ｷｭ"},
    {"kye", "きぇ", "キェ", "ｷｪ"},
    {"kyo", "きょ", "キョ", "ｷｮ"},
    {"gya", "ぎゃ", "ギャ", "ｷﾞｬ"},
    {"gyi", "ぎぃ", "ギィ", "ｷﾞｨ"},
    {"gyu", "ぎゅ", "ギュ", "ｷﾞｭ"},
    {"gye", "ぎぇ", "ギェ", "ｷﾞｪ"},
    {"gyo", "ぎょ", "ギョ", "ｷﾞｮ"},

    {"sa", "さ", "サ", "ｻ"},
    {"si", "し", "シ", "ｼ"},
    {"su", "す", "ス", "ｽ"},
    {"se", "せ", "セ", "ｾ"},
    {"so", "そ", "ソ", "ｿ"},

    {"za", "ざ", "ザ", "ｻﾞ"},
    {"zi", "じ", "ジ", "ｼﾞ"},
    {"zu", "ず", "ズ", "ｽﾞ"},
    {"ze", "ぜ", "ゼ", "ｾﾞ"},
    {"zo", "ぞ", "ゾ", "ｿﾞ"},

    {"sya", "しゃ", "シャ", "ｼｬ"},
    {"syi", "しぃ", "シィ", "ｼｨ"},
    {"syu", "しゅ", "シュ", "ｼｭ"},
    {"sye", "しぇ", "シェ", "ｼｪ"},
    {"syo", "しょ", "ショ", "ｼｮ"},
    {"sha", "しゃ", "シャ", "ｼｬ"},
    {"shi", "し", "シ", "ｼ"},
    {"shu", "しゅ", "シュ", "ｼｭ"},
    {"she", "しぇ", "シェ", "ｼｪ"},
    {"sho", "しょ", "ショ", "ｼｮ"},
    {"zya", "じゃ", "ジャ", "ｼﾞｬ"},
    {"zyi", "じぃ", "ジィ", "ｼﾞｨ"},
    {"zyu", "じゅ", "ジュ", "ｼﾞｭ"},
    {"zye", "じぇ", "ジェ", "ｼﾞｪ"},
    {"zyo", "じょ", "ジョ", "ｼﾞｮ"},
    {"ja", "じゃ", "ジャ", "ｼﾞｬ"},
    {"jya", "じゃ", "ジャ", "ｼﾞｬ"},
    {"ji", "じ", "ジ", "ｼﾞ"},
    {"jyi", "じぃ", "ジィ", "ｼﾞｨ"},
    {"ju", "じゅ", "ジュ", "ｼﾞｭ"},
    {"jyu", "じゅ", "ジュ", "ｼﾞｭ"},
    {"je", "じぇ", "ジェ", "ｼﾞｪ"},
    {"jye", "じぇ", "ジェ", "ｼﾞｪ"},
    {"jo", "じょ", "ジョ", "ｼﾞｮ"},
    {"jyo", "じょ", "ジョ", "ｼﾞｮ"},
    {"ta", "た", "タ", "ﾀ"},
    {"ti", "ち", "チ", "ﾁ"},
    {"tu", "つ", "ツ", "ﾂ"},
    {"tsu", "つ", "ツ", "ﾂ"},
    {"te", "て", "テ", "ﾃ"},
    {"to", "と", "ト", "ﾄ"},

    {"da", "だ", "ダ", "ﾀﾞ"},
    {"di", "ぢ", "ヂ", "ﾁﾞ"},
    {"du", "づ", "ヅ", "ﾂﾞ"},
    {"de", "で", "デ", "ﾃﾞ"},
    {"do", "ど", "ド", "ﾄﾞ"},

    {"tya", "ちゃ", "チャ", "ﾁｬ"},
    {"tyi", "ちぃ", "チィ", "ﾁｨ"},
    {"tyu", "ちゅ", "チュ", "ﾁｭ"},
    {"tye", "ちぇ", "チェ", "ﾁｪ"},
    {"tyo", "ちょ", "チョ", "ﾁｮ"},

    {"cha", "ちゃ", "チャ", "ﾁｬ"},
    {"chi", "ち", "チ", "ﾁ"},
    {"chu", "ちゅ", "チュ", "ﾁｭ"},
    {"che", "ちぇ", "チェ", "ﾁｪ"},
    {"cho", "ちょ", "チョ", "ﾁｮ"},

    {"dya", "ぢゃ", "ヂャ", "ﾁﾞｬ"},
    {"dyi", "ぢぃ", "ヂィ", "ﾁﾞｨ"},
    {"dyu", "ぢゅ", "ヂュ", "ﾁﾞｭ"},
    {"dye", "ぢぇ", "ヂェ", "ﾁﾞｪ"},
    {"dyo", "ぢょ", "ヂョ", "ﾁﾞｮ"},

    {"tha", "てゃ", "テャ", "ﾃｬ"},
    {"thi", "てぃ", "ティ", "ﾃｨ"},
    {"thu", "てゅ", "テュ", "ﾃｭ"},
    {"the", "てぇ", "テェ", "ﾃｪ"},
    {"tho", "てょ", "テョ", "ﾃｮ"},

    {"dha", "でゃ", "デャ", "ﾃﾞｬ"},
    {"dhi", "でぃ", "ディ", "ﾃﾞｨ"},
    {"dhu", "でゅ", "デュ", "ﾃﾞｭ"},
    {"dhe", "でぇ", "デェ", "ﾃﾞｪ"},
    {"dho", "でょ", "デョ", "ﾃﾞｮ"},

    {"na", "な", "ナ", "ﾅ"},
    {"ni", "に", "ニ", "ﾆ"},
    {"nu", "ぬ", "ヌ", "ﾇ"},
    {"ne", "ね", "ネ", "ﾈ"},
    {"no", "の", "ノ", "ﾉ"},
    {"nya", "にゃ", "ニャ", "ﾆｬ"},
    {"nyi", "にぃ", "ニィ", "ﾆｨ"},
    {"nyu", "にゅ", "ニュ", "ﾆｭ"},
    {"nye", "にぇ", "ニェ", "ﾆｪ"},
    {"nyo", "にょ", "ニョ", "ﾆｮ"},

    {"ha", "は", "ハ", "ﾊ"},
    {"hi", "ひ", "ヒ", "ﾋ"},
    {"hu", "ふ", "フ", "ﾌ"},
    {"he", "へ", "ヘ", "ﾍ"},
    {"ho", "ほ", "ホ", "ﾎ"},

    {"ba", "ば", "バ", "ﾊﾞ"},
    {"bi", "び", "ビ", "ﾋﾞ"},
    {"bu", "ぶ", "ブ", "ﾌﾞ"},
    {"be", "べ", "ベ", "ﾍﾞ"},
    {"bo", "ぼ", "ボ", "ﾎﾞ"},

    {"pa", "ぱ", "パ", "ﾊﾟ"},
    {"pi", "ぴ", "ピ", "ﾋﾟ"},
    {"pu", "ぷ", "プ", "ﾌﾟ"},
    {"pe", "ぺ", "ペ", "ﾍﾟ"},
    {"po", "ぽ", "ポ", "ﾎﾟ"},

    {"hya", "ひゃ", "ヒャ", "ﾋｬ"},
    {"hyi", "ひぃ", "ヒィ", "ﾋｨ"},
    {"hyu", "ひゅ", "ヒュ", "ﾋｭ"},
    {"hye", "ひぇ", "ヒェ", "ﾋｪ"},
    {"hyo", "ひょ", "ヒョ", "ﾋｮ"},
    {"bya", "びゃ", "ビャ", "ﾋﾞｬ"},
    {"byi", "びぃ", "ビィ", "ﾋﾞｨ"},
    {"byu", "びゅ", "ビュ", "ﾋﾞｭ"},
    {"bye", "びぇ", "ビェ", "ﾋﾞｪ"},
    {"byo", "びょ", "ビョ", "ﾋﾞｮ"},
    {"pya", "ぴゃ", "ピャ", "ﾋﾟｬ"},
    {"pyi", "ぴぃ", "ピィ", "ﾋﾟｨ"},
    {"pyu", "ぴゅ", "ピュ", "ﾋﾟｭ"},
    {"pye", "ぴぇ", "ピェ", "ﾋﾟｪ"},
    {"pyo", "ぴょ", "ピョ", "ﾋﾟｮ"},

    {"fa", "ふぁ", "ファ", "ﾌｧ"},
    {"fi", "ふぃ", "フィ", "ﾌｨ"},
    {"fu", "ふ", "フ", "ﾌ"},
    {"fe", "ふぇ", "フェ", "ﾌｪ"},
    {"fo", "ふぉ", "フォ", "ﾌｫ"},

    {"ma", "ま", "マ", "ﾏ"},
    {"mi", "み", "ミ", "ﾐ"},
    {"mu", "む", "ム", "ﾑ"},
    {"me", "め", "メ", "ﾒ"},
    {"mo", "も", "モ", "ﾓ"},

    {"mya", "みゃ", "ミャ", "ﾐｬ"},
    {"myi", "みぃ", "ミィ", "ﾐｨ"},
    {"myu", "みゅ", "ミュ", "ﾐｭ"},
    {"mye", "みぇ", "ミェ", "ﾐｪ"},
    {"myo", "みょ", "ミョ", "ﾐｮ"},
    {"lya", "ゃ", "ャ", "ｬ"},
    {"xya", "ゃ", "ャ", "ｬ"},
    {"ya", "や", "ヤ", "ﾔ"},
    {"lyu", "ゅ", "ュ", "ｭ"},
    {"xyu", "ゅ", "ュ", "ｭ"},
    {"yu", "ゆ", "ユ", "ﾕ"},
    {"lyo", "ょ", "ョ", "ｮ"},
    {"xyo", "ょ", "ョ", "ｮ"},
    {"yo", "よ", "ヨ", "ﾖ"},

    {"ra", "ら", "ラ", "ﾗ"},
    {"ri", "り", "リ", "ﾘ"},
    {"ru", "る", "ル", "ﾙ"},
    {"re", "れ", "レ", "ﾚ"},
    {"ro", "ろ", "ロ", "ﾛ"},

    {"rya", "りゃ", "リャ", "ﾘｬ"},
    {"ryi", "りぃ", "リィ", "ﾘｨ"},
    {"ryu", "りゅ", "リュ", "ﾘｭ"},
    {"rye", "りぇ", "リェ", "ﾘｪ"},
    {"ryo", "りょ", "リョ", "ﾘｮ"},
    {"xwa", "ゎ", "ヮ", "ﾜ"},
    {"wa", "わ", "ワ", "ﾜ"},
    {"wo", "を", "ヲ", "ｦ"},
    {"n'", "ん", "ン", "ﾝ"},
    {"nn", "ん", "ン", "ﾝ"},
    {"n", "ん", "ン", "ﾝ"},
    {"m", "ん", "ン", "ﾝ"},  // tombo
    {"wyi", "ゐ", "ヰ", "ｨ"},
    {"wye", "ゑ", "ヱ", "ｪ"},
    {"cya", "ちゃ", "チャ", "ﾁｬ"},
    {"cye", "ちぇ", "チェ", "ﾁｪ"},
    {"cyi", "ちぃ", "チィ", "ﾁｨ"},
    {"cyo", "ちょ", "チョ", "ﾁｮ"},
    {"cyu", "ちゅ", "チュ", "ﾁｭ"},
    {"fya", "ふゃ", "フャ", "ﾌｬ"},
    {"fye", "ふぇ", "フェ", "ﾌｪ"},
    {"fyi", "ふぃ", "フィ", "ﾌｨ"},
    {"fyo", "ふょ", "フョ", "ﾌｮ"},
    {"fyu", "ふゅ", "フュ", "ﾌｭ"},
    {"lye", "ぇ", "ェ", "ｪ"},
    {"lyi", "ぃ", "ィ", "ｨ"},
    {"qa", "くぁ", "クァ", "ｸｧ"},
    {"qe", "くぇ", "クェ", "ｸｪ"},
    {"qi", "くぃ", "クィ", "ｸｨ"},
    {"qo", "くぉ", "クォ", "ｸｫ"},
    {"qu", "く", "ク", "ｸ"},
    {"tsa", "つぁ", "ツァ", "ﾂｧ"},
    {"tse", "つぇ", "ツェ", "ﾂｪ"},
    {"tsi", "つぃ", "ツィ", "ﾂｨ"},
    {"tso", "つぉ", "ツォ", "ﾂｫ"},
    {"vya", "う゛ゃ", "ヴャ", "ｳﾞｬ"},
    {"vyo", "う゛ょ", "ヴョ", "ｳﾞｮ"},
    {"vyu", "う゛ゅ", "ヴュ", "ｳﾞｭ"},
    {"whu", "う", "ウ", "ｳ"},
    {"wu", "う", "ウ", "ｳ"},
    {"xca", "ヵ", "ヵ", "ｶ"},
    {"xka", "ヵ", "ヵ", "ｶ"},
    {"xke", "ヶ", "ヶ", "ｹ"},
    {"xye", "ぇ", "ェ", "ｪ"},
    {"xyi", "ぃ", "ィ", "ｨ"},
    {"ye", "いぇ", "イェ", "ｲｪ"},
    {"z,", "‥", "‥", ""},
    {"z-", "〜", "〜", ""},
    {"z.", "…", "…", ""},
    {"z/", "・", "・", "･"},
    {"z[", "『", "『", ""},
    {"z]", "』", "』", ""},
    {"zh", "←", "←", ""},
    {"zj", "↓", "↓", ""},
    {"zk", "↑", "↑", ""},
    {"zl", "→", "→", ""},
    {"xwi", "ゐ", "ヰ", "ｨ"},
    {"xwe", "ゑ", "ヱ", "ｪ"},
    {"bwa", "ぶぁ", "ブァ", "ﾌﾞｧ"},
    {"bwi", "ぶぃ", "ブィ", "ﾌﾞｨ"},
    {"bwu", "ぶぅ", "ブゥ", "ﾌﾞｩ"},
    {"bwe", "ぶぇ", "ブェ", "ﾌﾞｪ"},
    {"bwo", "ぶぉ", "ブォ", "ﾌﾞｫ"},
    {"d'i", "でぃ", "ディ", "ﾃﾞｨ"},
    {"d'yu", "でゅ", "デュ", "ﾃﾞｭ"},
    {"d'u", "どぅ", "ドゥ", "ﾄﾞｩ"},
    {"dsu", "づ", "ヅ", "ﾂﾞ"},
    {"dwa", "どぁ", "ドァ", "ﾄﾞｧ"},
    {"dwi", "どぃ", "ドィ", "ﾄﾞｨ"},
    {"dwu", "どぅ", "ドゥ", "ﾄﾞｩ"},
    {"dwe", "どぇ", "ドェ", "ﾄﾞｪ"},
    {"dwo", "どぉ", "ドォ", "ﾄﾞｫ"},
    {"fwa", "ふぁ", "ファ", "ﾌｧ"},
    {"fwi", "ふぃ", "フィ", "ﾌｨ"},
    {"fwu", "ふぅ", "フゥ", "ﾌｩ"},
    {"fwe", "ふぇ", "フェ", "ﾌｪ"},
    {"fwo", "ふぉ", "フォ", "ﾌｫ"},
    {"gwa", "ぐぁ", "グァ", "ｸﾞｧ"},
    {"gwi", "ぐぃ", "グィ", "ｸﾞｨ"},
    {"gwu", "ぐぅ", "グゥ", "ｸﾞｩ"},
    {"gwe", "ぐぇ", "グェ", "ｸﾞｪ"},
    {"gwo", "ぐぉ", "グォ", "ｸﾞｫ"},
    {"hwa", "ふぁ", "ファ", "ﾌｧ"},
    {"hwi", "ふぃ", "フィ", "ﾌｨ"},
    {"hwe", "ふぇ", "フェ", "ﾌｪ"},
    {"hwo", "ふぉ", "フォ", "ﾌｫ"},
    {"kwa", "くぁ", "クァ", "ｸｧ"},
    {"kwi", "くぃ", "クィ", "ｸｨ"},
    {"kwu", "くぅ", "クゥ", "ｸｩ"},
    {"kwe", "くぇ", "クェ", "ｸｪ"},
    {"kwo", "くぉ", "クォ", "ｸｫ"},
    {"mwa", "むぁ", "ムァ", "ﾑｧ"},
    {"mwi", "むぃ", "ムィ", "ﾑｨ"},
    {"mwu", "むぅ", "ムゥ", "ﾑｩ"},
    {"mwe", "むぇ", "ムェ", "ﾑｪ"},
    {"mwo", "むぉ", "ムォ", "ﾑｫ"},
    {"pwa", "ぷぁ", "プァ", "ﾌﾟｧ"},
    {"pwi", "ぷぃ", "プィ", "ﾌﾟｨ"},
    {"pwu", "ぷぅ", "プゥ", "ﾌﾟｩ"},
    {"pwe", "ぷぇ", "プェ", "ﾌﾟｪ"},
    {"pwo", "ぷぉ", "プォ", "ﾌﾟｫ"},
    {"qwa", "くぁ", "クァ", "ｸｧ"},
    {"qwi", "くぃ", "クィ", "ｸｨ"},
    {"qwu", "くぅ", "クゥ", "ｸｩ"},
    {"qwe", "くぇ", "クェ", "ｸｪ"},
    {"qwo", "くぉ", "クォ", "ｸｫ"},
    {"qya", "くゃ", "クャ", "ｸｬ"},
    {"qyi", "くぃ", "クィ", "ｸｨ"},
    {"qyu", "くゅ", "クュ", "ｸｭ"},
    {"qye", "くぇ", "クェ", "ｸｪ"},
    {"qyo", "くょ", "クョ", "ｸｮ"},
    {"rwa", "るぁ", "ルァ", "ﾙｧ"},
    {"rwi", "るぃ", "ルィ", "ﾙｨ"},
    {"rwu", "るぅ", "ルゥ", "ﾙｩ"},
    {"rwe", "るぇ", "ルェ", "ﾙｪ"},
    {"rwo", "るぉ", "ルォ", "ﾙｫ"},
    {"swa", "すぁ", "スァ", "ｽｧ"},
    {"swi", "すぃ", "スィ", "ｽｨ"},
    {"swu", "すぅ", "スゥ", "ｽｩ"},
    {"swe", "すぇ", "スェ", "ｽｪ"},
    {"swo", "すぉ", "スォ", "ｽｫ"},
    {"t'i", "てぃ", "ティ", "ﾃｨ"},
    {"t'yu", "てゅ", "テュ", "ﾃｭ"},
    {"t'u", "とぅ", "トゥ", "ﾄｩ"},
    {"twa", "とぁ", "トァ", "ﾄｧ"},
    {"twi", "とぃ", "トィ", "ﾄｨ"},
    {"twu", "とぅ", "トゥ", "ﾄｩ"},
    {"twe", "とぇ", "トェ", "ﾄｪ"},
    {"two", "とぉ", "トォ", "ﾄｫ"},
    {"ywa", "ゆぁ", "ユァ", "ﾕｧ"},
    {"ywi", "ゆぃ", "ユィ", "ﾕｨ"},
    {"ywu", "ゆぅ", "ユゥ", "ﾕｩ"},
    {"ywe", "ゆぇ", "ユェ", "ﾕｪ"},
    {"ywo", "ゆぉ", "ユォ", "ﾕｫ"},
    {"zwa", "ずぁ", "ズァ", "ｽﾞｧ"},
    {"zwi", "ずぃ", "ズィ", "ｽﾞｨ"},
    {"zwu", "ずぅ", "ズゥ", "ｽﾞｩ"},
    {"zwe", "ずぇ", "ズェ", "ｽﾞｪ"},
    {"zwo", "ずぉ", "ズォ", "ｽﾞｫ"},
    {",", "、", "、", "､"},
    {".", "。", "。", "｡"},
    {"[", "「", "「", "｢"},
    {"]", "」", "」", "｣"},
    {"/", "／", "／", "/"},
    {"\\", "＼", "＼", "\\"},
    {"=", "＝", "＝", "="},
    {"+", "＋", "＋", "+"},
    {"_", "＿", "＿", "_"},
    {"¥", "￥", "￥", "¥"},
    {"~", "〜", "〜", "~"},
    {"!", "！", "！", "!"},
    {"@", "＠", "＠", "@"},
    {"#", "＃", "＃", "#"},
    {"$", "＄", "＄", "$"},
    {"%", "％", "％", "%"},
    {"^", "＾", "＾", "^"},
    {"&", "＆", "＆", "&"},
    {"*", "＊", "＊", "*"},
    {"(", "（", "（", "("},
    {")", "）", "）", ")"},
    {"<", "＜", "＜", "<"},
    {">", "＞", "＞", ">"},
    {"{", "｛", "｛", "{"},
    {"}", "｝", "｝", "}"},
    {"|", "｜", "｜", "|"},
    {"'", "’", "’", "'"},
    {"\"", "”", "”", "\""},
    {"`", "‘", "‘", "`"},
    {"?", "？", "？", "?"},
    {":", "：", "：", ":"},
    {";", "；", "；", ";"},
    {"0", "0", "０", "0"},
    {"1", "1", "１", "1"},
    {"2", "2", "２", "2"},
    {"3", "3", "３", "3"},
    {"4", "4", "４", "4"},
    {"5", "5", "５", "5"},
    {"6", "6", "６", "6"},
    {"7", "7", "７", "7"},
    {"8", "8", "８", "8"},
    {"9", "9", "９", "9"},
};

static char *idx_hira_kata (int idx, gboolean always_hira) {
    char *s = NULL;

    if (!always_hira) {
        if (state_hira_kata == STATE_kata)
            s = anthy_romaji_map[idx].kata;
        else if (state_hira_kata == STATE_half_kata)
            s = anthy_romaji_map[idx].half_kata;
    }

    if (!s)
        s = anthy_romaji_map[idx].hira;

    return s;
}

static short int anthy_romaji_mapN = sizeof (anthy_romaji_map) / sizeof (anthy_romaji_map[0]);

static int is_legal_char (int k) {
    int i;

    if (k == ' ')
        return 1;
    for (i = 0; i < anthy_romaji_mapN; i++)
        if (strchr (anthy_romaji_map[i].en, k))
            return 1;
    return 0;
}

#define MAX_KEYS 32

typedef u_short jp_t;

static char keys[MAX_KEYS];
static short int keysN;
static jp_t *jp;
static short int jpN = 0;
static short pageidx;

typedef struct {
    GtkWidget *label;
    u_char selidx, selN;
    u_char ofs, len;
} SEG;
static SEG *seg;
static short segN;
#define MAX_SEG_N 100

typedef struct {
    u_char ofs, len;
    char *sel_str;
} SEL_SEG;
static SEL_SEG *sel_seg;
static int sel_segN;

static short cursor;
enum {
    STATE_ROMANJI = 1,
    STATE_CONVERT = 2,
    STATE_SELECT = 4,
};
static char state = STATE_ROMANJI;

static GtkWidget *win_anthy;

static gboolean is_empty () {
    return !jpN && !segN && !keysN;
}

static void auto_hide () {
    //  puts("auto hide");
    if (is_empty () && *gmf.mf_hime_pop_up_win) {
        //    puts("empty");
        module_hide_win ();
    }
}

static void insert_jp (jp_t rom_idx) {
    jp = trealloc (jp, jp_t, jpN);
    if (cursor < jpN)
        memmove (jp + cursor + 1, jp + cursor, sizeof (jp[0]) * (jpN - cursor));

    jp[cursor] = rom_idx;
    cursor++;
    jpN++;
}

#define SEND_PRE_INI 65535

static void parse_key () {
    int i;
    int preN = 0, eqN = 0, sendpreN = 0;
    u_short eq, sendpre_i = SEND_PRE_INI;
    static char ch2[] = "kstzdhbrpfgvcjmwy";

    if (keysN == 2 && keys[0] == keys[1] && strchr (ch2, keys[0])) {
        insert_jp (0);
        keys[1] = 0;
        keysN = 1;
        return;
    }

    for (i = 0; i < anthy_romaji_mapN; i++) {
        char *en = anthy_romaji_map[i].en;
        if (!strncmp (keys, en, keysN))
            preN++;

        if (!strncmp (keys, en, strlen (en))) {
            sendpre_i = i;
            sendpreN++;
        }

        if (!strcmp (keys, en)) {
            eq = i;
            eqN++;
        }
    }

    if (preN > 1)
        return;

    if (eqN) {
        if (eqN > 1) {
            puts ("bug");
            exit (1);
        }

        insert_jp (eq);

        keys[0] = 0;
        keysN = 0;
        return;
    }

    if (sendpre_i != SEND_PRE_INI) {
        char *en = anthy_romaji_map[sendpre_i].en;
        int len = strlen (en);
        int nlen = keysN - len;
        memmove (keys, keys + len, sizeof (keys[0]) * nlen);
        keys[nlen] = 0;
        keysN = nlen;

        insert_jp (sendpre_i);
    }
}

static int get_sel_seg_with_ofs (int ofs) {
    int idx;
    for (idx = 0; idx < sel_segN; idx++)
        if (sel_seg[idx].ofs == ofs)
            break;
    return idx;
}

static void clear_seg_label () {
    //  dbg("clear_seg_label\n");
    int i;
    for (i = 0; i < MAX_SEG_N; i++) {
        gtk_label_set_text (GTK_LABEL (seg[i].label), NULL);
        seg[i].selidx = 0;
    }
}

static void cursor_markup (int idx, char *s) {
    char cur[256];
    GtkWidget *lab = seg[idx].label;
    if (*gmf.mf_hime_win_color_use)
        snprintf (cur, sizeof (cur), "<span foreground=\"white\" background=\"%s\">%s</span>", *gmf.mf_tsin_cursor_color, s);
    else
        snprintf (cur, sizeof (cur), "<span foreground=\"white\" background=\"" TSIN_CURSOR_COLOR_DEFAULT "\">%s</span>", s);
    gtk_label_set_markup (GTK_LABEL (lab), cur);
}

static void disp_keys (int idx) {
    int i;
    char tt[2];
    tt[1] = 0;
    for (i = 0; i < keysN; i++) {
        tt[0] = keys[i];
        gtk_label_set_text (GTK_LABEL (seg[idx + i].label), tt);
    }
}

static void disp_input () {
    int i;

    if (gmf.mf_hime_edit_display_ap_only ())
        return;

    clear_seg_label ();

    int idx;
    for (idx = i = 0; i < jpN; i++) {
        if (i == cursor) {
            disp_keys (idx);
            idx += keysN;
            cursor_markup (idx++, idx_hira_kata (jp[i], FALSE));
        } else
            gtk_label_set_text (GTK_LABEL (seg[idx++].label), idx_hira_kata (jp[i], FALSE));
    }

    if (cursor == jpN) {
        disp_keys (idx);
        idx += keysN;
        cursor_markup (idx, " ");
    }
}

static void disp_convert () {
    int i;

    dbg ("disp_convert cursor %d\n", cursor);
    for (i = 0; i < segN; i++) {
        char tt[256];
        strcpy (tt, gtk_label_get_text (GTK_LABEL (seg[i].label)));

        if (i == cursor && segN > 1)
            cursor_markup (i, tt);
        else
            gtk_label_set_text (GTK_LABEL (seg[i].label), tt);
    }
}

static void delete_jpstr (int idx) {
    if (idx == jpN)
        return;
    memmove (jp + idx, jp + idx + 1, sizeof (jp[0]) * (jpN - 1 - idx));
    jpN--;
}

static void clear_all () {
    clear_seg_label ();
    jpN = 0;
    keys[0] = 0;
    keysN = 0;
    segN = 0;
    cursor = 0;
    gmf.mf_tss->sel_pho = FALSE;
    state_hira_kata = STATE_hira;
    auto_hide ();
    sel_segN = 0;
}

static void send_seg () {
    char out[512];
    int i;
    for (i = 0, out[0] = 0; i < segN; i++) {
        strcat (out, gtk_label_get_text (GTK_LABEL (seg[i].label)));
        anthy_commit_segment (ac, i, seg[i].selidx);
        seg[i].selidx = 0;
    }

    //  printf("sent convert '%s'\n", out);
    if (out[0] != '\0')
        gmf.mf_send_text (out);
    clear_all ();
}

static void merge_jp (char out[], gboolean always_hira) {
    int i;
    for (i = 0, out[0] = 0; i < jpN; i++)
        strcat (out, idx_hira_kata (jp[i], always_hira));
}

static gboolean send_jp () {
    char out[512];
    merge_jp (out, FALSE);

    if (!out[0])
        return FALSE;

    clear_seg_label ();
    jpN = 0;
    keysN = 0;

    //  printf("sent romanji '%s'\n", out);
    gmf.mf_send_text (out);
    segN = 0;
    return TRUE;
}

static void disp_select () {
    dbg ("disp_select\n");
    gmf.mf_clear_sele ();
    int endn = pageidx + gmf.mf_phkbm->selkeyN;
    if (endn > seg[cursor].selN)
        endn = seg[cursor].selN;
    int i;
    for (i = pageidx; i < endn; i++) {
        char buf[256];
        anthy_get_segment (ac, cursor, i, buf, sizeof (buf));
        //    printf("%d %s\n", i, buf);
        gmf.mf_set_sele_text (seg[cursor].selN, i - pageidx, buf, -1);
    }

    if (pageidx)
        gmf.mf_disp_arrow_up ();
    if (i < seg[cursor].selN)
        gmf.mf_disp_arrow_down ();

    int x, y;
    gmf.mf_get_widget_xy (win_anthy, seg[cursor].label, &x, &y);
    dbg ("%x cusor %d %d\n", win_anthy, cursor, x);
    y = gmf.mf_hime_edit_display_ap_only () ? *gmf.mf_win_y : *gmf.mf_win_y + *gmf.mf_win_yl;
    gmf.mf_disp_selections (x, y);
}

static void load_seg () {
    dbg ("load_seg sel_segN:%d\n", sel_segN);
    clear_seg_label ();
    struct anthy_conv_stat acs;
    anthy_get_stat (ac, &acs);
    segN = 0;
    if (acs.nr_segment > 0) {
        char buf[256];
        int i;

        int ofs = 0;
        for (i = 0; i < acs.nr_segment; i++) {
            struct anthy_segment_stat ss;
            anthy_get_segment_stat (ac, i, &ss);
            int len = ss.seg_len;
            int idx = get_sel_seg_with_ofs (ofs);
            dbg ("%d] sel idx:%d ofs:%d\n", i, idx, ofs);
            int selN = seg[i].selN = ss.nr_candidate;

            seg[i].selidx = 0;
            if (idx < sel_segN && sel_seg[idx].len == len) {
                int j;
                for (j = 0; j < selN; j++) {
                    anthy_get_segment (ac, i, j, buf, sizeof (buf));
                    if (!strcmp (buf, sel_seg[idx].sel_str)) {
                        dbg ("old found %s", buf);
                        seg[i].selidx = j;
                        break;
                    }
                }
            }

            anthy_get_segment (ac, i, seg[i].selidx, buf, sizeof (buf));
            gtk_label_set_text (GTK_LABEL (seg[i].label), buf);

            dbg ("seg len:%d\n", len);
            seg[i].ofs = ofs;
            seg[i].len = len;
            segN++;
            ofs += len;
        }

        state = STATE_CONVERT;
        //        cursor = 0;
        if (cursor >= acs.nr_segment)
            cursor = acs.nr_segment - 1;
        disp_convert ();
    }
    keysN = 0;
}

static void next_page () {
    pageidx += gmf.mf_phkbm->selkeyN;
    if (pageidx >= seg[cursor].selN)
        pageidx = 0;
    disp_select ();
}

static void prev_page () {
    pageidx -= gmf.mf_phkbm->selkeyN;
    if (pageidx < 0)
        pageidx = 0;
    disp_select ();
}

void hide_selections_win ();

int module_flush_input () {
    gmf.mf_hide_selections_win ();

    int val;
    if (state == STATE_CONVERT) {
        val = TRUE;
        send_seg ();
    } else {
        val = send_jp ();
    }

    //  dbg("cursor %d\n", cursor);
    clear_all ();
    return val;
}

static int page_N () {
    int N = seg[cursor].selN - pageidx;
    if (N > gmf.mf_phkbm->selkeyN)
        N = gmf.mf_phkbm->selkeyN;
    return N;
}

static gboolean select_idx (int c) {
    int idx = pageidx + c;

    if (idx < seg[cursor].selN) {
        char buf[256];
        anthy_get_segment (ac, cursor, idx, buf, sizeof (buf));
        struct anthy_segment_stat ss;
        anthy_get_segment_stat (ac, cursor, &ss);
        int len = ss.seg_len;

        gtk_label_set_text (GTK_LABEL (seg[cursor].label), buf);
        seg[cursor].selidx = idx;

        int sidx = get_sel_seg_with_ofs (seg[cursor].ofs);
        if (sidx == sel_segN) {
            sel_segN++;
        }

        if (sel_seg[sidx].sel_str)
            free (sel_seg[sidx].sel_str);

        dbg ("select_idx idx:%d sidx:%d %s\n", idx, sidx, buf);

        sel_seg[sidx].sel_str = strdup (buf);
        sel_seg[sidx].ofs = seg[cursor].ofs;
        sel_seg[sidx].len = len;

        state = STATE_CONVERT;
        gmf.mf_hide_selections_win ();
        return (segN == 1);
    }

    return FALSE;
}

gboolean module_feedkey (int kv, int kvstate) {
    int lkv = tolower (kv);
    int shift_m = (kvstate & ShiftMask) > 0;
    // printf("module_feedkey(): kv=%x(%c), shift_m=%d\n", kv, kv, shift_m);

    if (kvstate & ControlMask)
        return FALSE;
    if (kvstate & (Mod1Mask | Mod4Mask | Mod5Mask))
        return FALSE;

    if (kv == XK_Shift_L || kv == XK_Shift_R) {
        key_press_alt = TRUE;
    }

    if (!gmf.mf_tsin_pho_mode ())
        return 0;

    gboolean b_is_empty = is_empty ();

    switch (kv) {
    case XK_F7:
        if (is_empty ())
            return FALSE;
        state = STATE_ROMANJI;
        if (state_hira_kata != STATE_kata)
            state_hira_kata = STATE_kata;
        else
            state_hira_kata = STATE_hira;
        disp_input ();
        return TRUE;
    case XK_F8:
        if (is_empty ())
            return FALSE;
        state = STATE_ROMANJI;
        if (state_hira_kata != STATE_half_kata)
            state_hira_kata = STATE_half_kata;
        else
            state_hira_kata = STATE_hira;
        disp_input ();
        return TRUE;
    case XK_F11:
        system ("kasumi &");
        return TRUE;
    case XK_F12:
        system ("kasumi -a &");
        return TRUE;
    case XK_Up:
        if (b_is_empty)
            return FALSE;
        if (state == STATE_SELECT) {
            int N = page_N ();
            gmf.mf_tss->pho_menu_idx--;
            if (gmf.mf_tss->pho_menu_idx < 0)
                gmf.mf_tss->pho_menu_idx = N - 1;
            disp_select ();
        }
        return TRUE;
    case XK_Down:
        if (b_is_empty)
            return FALSE;
        if (state == STATE_CONVERT) {
            state = STATE_SELECT;
            gmf.mf_tss->sel_pho = TRUE;
            //      puts("STATE_SELECT");
            disp_select ();
        } else if (state == STATE_SELECT) {
            int N = page_N ();
            gmf.mf_tss->pho_menu_idx = (gmf.mf_tss->pho_menu_idx + 1) % N;
            disp_select ();
        }
        return TRUE;
    case XK_Return:
    case XK_KP_Enter:
        if (b_is_empty)
            return FALSE;
        if (state == STATE_SELECT) {
            if (select_idx (gmf.mf_tss->pho_menu_idx))
                goto send;
            return TRUE;
        }
    send:
        return module_flush_input ();
    case XK_Escape:
        if (state == STATE_SELECT) {
            state = STATE_CONVERT;
            gmf.mf_tss->sel_pho = FALSE;
            gmf.mf_clear_sele ();
        } else if (state == STATE_CONVERT)
            goto rom;
        return FALSE;
    case XK_BackSpace:
        if (b_is_empty) {
            state_hira_kata = STATE_hira;
            return FALSE;
        }

        gmf.mf_hide_selections_win ();

        if (state & (STATE_CONVERT | STATE_SELECT)) {
        rom:
            //        puts("romanji");
            state = STATE_ROMANJI;
            cursor = jpN;
            segN = 0;
            disp_input ();
            return TRUE;
        }

        //      puts("back");
        if (keysN) {
            keysN--;
            keys[keysN] = 0;
        } else if (jpN && cursor) {
            delete_jpstr (cursor - 1);
            cursor--;
        } else
            return FALSE;
        disp_input ();
        auto_hide ();
        return TRUE;
    case XK_Delete:
        if (b_is_empty)
            return FALSE;
        if (state & STATE_ROMANJI) {
            if (keysN)
                return TRUE;
            delete_jpstr (cursor);
            disp_input ();
        }
        auto_hide ();
        return TRUE;
    case XK_Left:
        if (b_is_empty)
            return FALSE;
        if (state & STATE_ROMANJI) {
            if (keysN)
                keysN = 0;
            else {
                if (cursor)
                    cursor--;
            }
            disp_input ();
        } else if (state & STATE_CONVERT) {
            if (shift_m) {
                anthy_resize_segment (ac, cursor, -1);
                load_seg ();
            } else {
                if (cursor) {
                    cursor--;
                    pageidx = 0;
                }
            }
            disp_convert ();
        }
        return TRUE;
    case XK_Right:
        if (b_is_empty)
            return FALSE;
        if (state & STATE_ROMANJI) {
            if (cursor < jpN) {
                cursor++;
                pageidx = 0;
            }
            disp_input ();
        } else if (state & STATE_CONVERT) {
            if (shift_m) {
                anthy_resize_segment (ac, cursor, 1);
                load_seg ();
            } else {
                if (cursor < segN - 1)
                    cursor++;
            }
            disp_convert ();
        }
        return TRUE;
    case XK_Home:
        if (b_is_empty)
            return FALSE;
        cursor = 0;
        if (state & STATE_ROMANJI) {
            disp_input ();
        } else if (state & STATE_CONVERT) {
            disp_convert ();
        }
        return TRUE;
    case XK_End:
        if (b_is_empty)
            return FALSE;
        if (state & STATE_ROMANJI) {
            cursor = jpN;
            disp_input ();
        } else if (state & STATE_CONVERT) {
            cursor = segN - 1;
            disp_convert ();
        }
        return TRUE;
    case XK_Prior:
        if (state != STATE_SELECT)
            return FALSE;
        prev_page ();
        return TRUE;
    case XK_Next:
        if (state != STATE_SELECT)
            return FALSE;
        next_page ();
        return TRUE;
    case ' ':
        if (b_is_empty)
            return FALSE;
        goto lab1;
    default:
        if (state == STATE_SELECT) {
            char *pp;
            if ((pp = strchr (*gmf.mf_pho_selkey, lkv))) {
                int c = pp - *gmf.mf_pho_selkey;
                if (select_idx (c))
                    goto send;
            }
            return TRUE;
        }
    }

    //  printf("kv %d\n", kv);
    if (!is_legal_char (kv))
        return FALSE;

    kv = lkv;

    if (state == STATE_CONVERT && kv != ' ') {
        send_seg ();
        state = STATE_ROMANJI;
    }

lab1:
    if (state == STATE_ROMANJI) {
        if (keysN < MAX_KEYS)
            keys[keysN++] = kv;

        keys[keysN] = 0;
        parse_key ();
        disp_input ();
    }

    module_show_win ();

    if (kv == ' ') {
        if (state == STATE_ROMANJI) {
            char tt[512];
            clear_seg_label ();
            merge_jp (tt, TRUE);
            //      dbg("tt %s %d\n", tt, strlen(tt));
            anthy_set_string (ac, tt);
            load_seg ();
        } else if (state == STATE_CONVERT) {
            state = STATE_SELECT;
            gmf.mf_tss->sel_pho = TRUE;
            //      puts("STATE_SELECT");
            disp_select ();
        } else if (state == STATE_SELECT) {
            next_page ();
        }
    }

    return TRUE;
}

static void mouse_button_callback (GtkWidget *widget, GdkEventButton *event, gpointer data) {
    //  dbg("mouse_button_callback %d\n", event->button);
    switch (event->button) {
    case 1:
        gmf.mf_toggle_win_sym ();
        break;
    case 2:
        gmf.mf_inmd_switch_popup_handler (widget, (GdkEvent *) event);
        break;
    case 3:
        gmf.mf_exec_hime_setup ();
        break;
    }
}

#include <dlfcn.h>

void create_win1 (), create_win1_gui (), load_tab_pho_file ();
int module_init_win (HIME_module_main_functions *funcs) {
    gmf = *funcs;

    //  dbg("module_init_win\n");

    gmf.mf_set_tsin_pho_mode ();
    gmf.mf_set_win1_cb ((cb_selec_by_idx_t) select_idx, prev_page, next_page);

    if (win_anthy)
        return TRUE;

    if (anthy_init () == -1) {
        GtkWidget *dialog = gtk_message_dialog_new (NULL, GTK_DIALOG_MODAL,
                                                    GTK_MESSAGE_ERROR,
                                                    GTK_BUTTONS_CLOSE,
                                                    "Cannot init anthy. Please install anthy.");
        gtk_dialog_run (GTK_DIALOG (dialog));
        gtk_widget_destroy (dialog);
        return FALSE;
    }

    ac = anthy_create_context ();
    if (!ac) {
        printf ("anthy_create_context err\n");
        return FALSE;
    }

    anthy_context_set_encoding (ac, ANTHY_UTF8_ENCODING);

    win_anthy = gtk_window_new (GTK_WINDOW_TOPLEVEL);
    gtk_window_set_has_resize_grip (GTK_WINDOW (win_anthy), FALSE);

    gtk_widget_realize (win_anthy);
    gmf.mf_set_no_focus (win_anthy);

    event_box_anthy = gtk_event_box_new ();
    gtk_event_box_set_visible_window (GTK_EVENT_BOX (event_box_anthy), FALSE);

    gtk_container_add (GTK_CONTAINER (win_anthy), event_box_anthy);

    GtkWidget *hbox_top = gtk_hbox_new (FALSE, 0);
    gtk_container_add (GTK_CONTAINER (event_box_anthy), hbox_top);

    g_signal_connect (G_OBJECT (event_box_anthy), "button-press-event",
                      G_CALLBACK (mouse_button_callback), NULL);

    if (!seg) {
        int n = sizeof (SEG) * MAX_SEG_N;
        seg = malloc (n);
        memset (seg, 0, n);

        n = sizeof (SEL_SEG) * MAX_SEG_N;
        sel_seg = malloc (n);
        memset (sel_seg, 0, n);
    }

    int i;
    for (i = 0; i < MAX_SEG_N; i++) {
        seg[i].label = gtk_label_new (NULL);
        gtk_widget_show (seg[i].label);
        gtk_box_pack_start (GTK_BOX (hbox_top), seg[i].label, FALSE, FALSE, 0);
    }

    gtk_widget_show_all (win_anthy);

    gmf.mf_init_tsin_selection_win ();

    module_change_font_size ();

    if (!gmf.mf_phkbm->selkeyN)
        gmf.mf_load_tab_pho_file ();

    module_hide_win ();

    return TRUE;
}

int module_win_visible () {
    return gtk_widget_get_visible (win_anthy);
}

void module_show_win () {
    if (gmf.mf_hime_edit_display_ap_only ())
        return;
    if (!*gmf.mf_hime_pop_up_win || !is_empty () || *gmf.mf_force_show) {
        if (!module_win_visible ())
            gtk_widget_show (win_anthy);
        gmf.mf_show_win_sym ();
    }
}

void module_hide_win () {
    if (state == STATE_SELECT) {
        state = STATE_CONVERT;
        gmf.mf_hide_selections_win ();
    }
    gtk_widget_hide (win_anthy);
    gmf.mf_hide_win_sym ();
}

void module_change_font_size (void) {
    GdkColor fg;
    gdk_color_parse (*gmf.mf_hime_win_color_fg, &fg);

#if GTK_CHECK_VERSION(3, 0, 0)
    GdkRGBA rgbfg;
    gdk_rgba_parse (&rgbfg, gdk_color_to_string (&fg));
#endif

    gmf.mf_change_win_bg (win_anthy);
    gmf.mf_change_win_bg (event_box_anthy);

    for (int i = 0; i < MAX_SEG_N; i++) {
        GtkWidget *label = seg[i].label;
        gmf.mf_set_label_font_size (label, *gmf.mf_hime_font_size);

        if (*gmf.mf_hime_win_color_use) {
#if !GTK_CHECK_VERSION(3, 0, 0)
            gtk_widget_modify_fg (label, GTK_STATE_NORMAL, &fg);
#else
            gtk_widget_override_color (label, GTK_STATE_FLAG_NORMAL, &rgbfg);
#endif
        }
    }
}

void module_move_win (int x, int y) {
#if 0
  best_win_x = x;
  best_win_y = y;
#endif
    gtk_window_get_size (GTK_WINDOW (win_anthy), gmf.mf_win_xl, gmf.mf_win_yl);

    if (x + *gmf.mf_win_xl > *gmf.mf_dpy_xl)
        x = *gmf.mf_dpy_xl - *gmf.mf_win_xl;
    if (x < 0)
        x = 0;

    if (y + *gmf.mf_win_yl > *gmf.mf_dpy_yl)
        y = *gmf.mf_dpy_yl - *gmf.mf_win_yl;
    if (y < 0)
        y = 0;

    gtk_window_move (GTK_WINDOW (win_anthy), x, y);
    *gmf.mf_win_x = x;
    *gmf.mf_win_y = y;

    gmf.mf_move_win_sym ();
}

int module_feedkey_release (KeySym xkey, int kbstate) {
    switch (xkey) {
    case XK_Shift_L:
    case XK_Shift_R:
        if (
            ((*gmf.mf_tsin_chinese_english_toggle_key == TSIN_CHINESE_ENGLISH_TOGGLE_KEY_Shift) ||
             (*gmf.mf_tsin_chinese_english_toggle_key == TSIN_CHINESE_ENGLISH_TOGGLE_KEY_ShiftL && xkey == XK_Shift_L) ||
             (*gmf.mf_tsin_chinese_english_toggle_key == TSIN_CHINESE_ENGLISH_TOGGLE_KEY_ShiftR && xkey == XK_Shift_R)) &&
            key_press_alt) {
            module_flush_input ();
            key_press_alt = FALSE;
            gmf.mf_hide_selections_win ();
            gmf.mf_tsin_set_eng_ch (!gmf.mf_tsin_pho_mode ());
            return 1;
        } else
            return 0;
    default:
        return 0;
    }
}

int module_get_preedit (char *str, HIME_PREEDIT_ATTR attr[], int *pcursor, int *comp_flag) {
    int i;

    dbg ("anthy_get_preedit %d  state:%d\n", cursor, state);
    str[0] = 0;
    *pcursor = 0;

    attr[0].flag = HIME_PREEDIT_ATTR_FLAG_UNDERLINE;
    attr[0].ofs0 = 0;
    int attrN = 0;
    int ch_N = 0;

    if (state & (STATE_CONVERT | STATE_SELECT)) {
        dbg ("state==STATE_CONVERT\n");

        if (segN)
            attrN = 1;

        for (i = 0; i < segN; i++) {
            char *s = (char *) gtk_label_get_text (GTK_LABEL (seg[i].label));
            int N = gmf.mf_utf8_str_N (s);
            ch_N += N;
            if (i < cursor)
                *pcursor += N;
            if (gmf.mf_hime_edit_display_ap_only () && i == cursor) {
                attr[1].ofs0 = *pcursor;
                attr[1].ofs1 = *pcursor + N;
                attr[1].flag = HIME_PREEDIT_ATTR_FLAG_REVERSE;
                attrN++;
            }
            strcat (str, s);
        }

        attr[0].ofs1 = ch_N;
    } else {
        if (jpN)
            attrN = 1;

        keys[keysN] = 0;

        for (i = 0; i < jpN; i++) {
            char *s = idx_hira_kata (jp[i], FALSE);

            int N = gmf.mf_utf8_str_N (s);
            //      dbg("%d]%s N:%d\n", i, s, N);
            if (gmf.mf_hime_edit_display_ap_only () && i == cursor) {
                strcat (str, keys);
                ch_N += keysN;
                *pcursor = ch_N;
                attr[1].ofs0 = ch_N;
                attr[1].ofs1 = ch_N + N;
                attr[1].flag = HIME_PREEDIT_ATTR_FLAG_REVERSE;
                attrN++;
            }
            strcat (str, s);
            ch_N += N;
        }

        if (cursor == jpN) {
            *pcursor = ch_N;
            strcat (str, keys);
            ch_N += keysN;
        }

        attr[0].ofs1 = ch_N;
        //    dbg("cursor %d  ch_N:%d  '%s'\n", *pcursor, ch_N, str);
    }

    *comp_flag = keysN > 0;
    if (win_anthy && gtk_widget_get_visible (win_anthy))
        *comp_flag |= 2;
    if (segN || jpN)
        *comp_flag |= 4;

    return attrN;
}

int module_reset () {
    if (!win_anthy)
        return 0;
    int v = !is_empty ();

    clear_all ();
    return v;
}

void module_win_geom () {
    if (!win_anthy)
        return;
    gtk_window_get_position (GTK_WINDOW (win_anthy), gmf.mf_win_x, gmf.mf_win_y);

    gmf.mf_get_win_size (win_anthy, gmf.mf_win_xl, gmf.mf_win_yl);
}
