forked from AuroraMiddleware/gtk
87cc0dc79f
in gtkimcontextsimple and gtktreeview, which are the easy places, but also true bugfixes, because on OSX we can't use the virtual META here, we needs MOD2 as delivered in key events.
1186 lines
32 KiB
C
1186 lines
32 KiB
C
/* GTK - The GIMP Toolkit
|
|
* Copyright (C) 2000 Red Hat, Inc.
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the
|
|
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
* Boston, MA 02111-1307, USA.
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#include "gtkprivate.h"
|
|
#include "gtkaccelgroup.h"
|
|
#include "gtkimcontextsimple.h"
|
|
#include "gtksettings.h"
|
|
#include "gtkwidget.h"
|
|
#include "gtkdebug.h"
|
|
#include "gtkintl.h"
|
|
|
|
|
|
/**
|
|
* SECTION:gtkimcontextsimple
|
|
* @Short_description: An input method context supporting table-based input methods
|
|
* @Title: GtkIMContextSimple
|
|
*/
|
|
|
|
|
|
typedef struct _GtkComposeTable GtkComposeTable;
|
|
typedef struct _GtkComposeTableCompact GtkComposeTableCompact;
|
|
|
|
struct _GtkIMContextSimplePrivate
|
|
{
|
|
GSList *tables;
|
|
|
|
guint compose_buffer[GTK_MAX_COMPOSE_LEN + 1];
|
|
gunichar tentative_match;
|
|
gint tentative_match_len;
|
|
|
|
guint in_hex_sequence : 1;
|
|
guint modifiers_dropped : 1;
|
|
};
|
|
|
|
struct _GtkComposeTable
|
|
{
|
|
const guint16 *data;
|
|
gint max_seq_len;
|
|
gint n_seqs;
|
|
};
|
|
|
|
struct _GtkComposeTableCompact
|
|
{
|
|
const guint16 *data;
|
|
gint max_seq_len;
|
|
gint n_index_size;
|
|
gint n_index_stride;
|
|
};
|
|
|
|
/* This file contains the table of the compose sequences,
|
|
* static const guint16 gtk_compose_seqs_compact[] = {}
|
|
* IT is generated from the compose-parse.py script.
|
|
*/
|
|
#include "gtkimcontextsimpleseqs.h"
|
|
|
|
/* From the values below, the value 23 means the number of different first keysyms
|
|
* that exist in the Compose file (from Xorg). When running compose-parse.py without
|
|
* parameters, you get the count that you can put here. Needed when updating the
|
|
* gtkimcontextsimpleseqs.h header file (contains the compose sequences).
|
|
*/
|
|
static const GtkComposeTableCompact gtk_compose_table_compact = {
|
|
gtk_compose_seqs_compact,
|
|
5,
|
|
24,
|
|
6
|
|
};
|
|
|
|
static const guint16 gtk_compose_ignore[] = {
|
|
GDK_KEY_Shift_L,
|
|
GDK_KEY_Shift_R,
|
|
GDK_KEY_Control_L,
|
|
GDK_KEY_Control_R,
|
|
GDK_KEY_Caps_Lock,
|
|
GDK_KEY_Shift_Lock,
|
|
GDK_KEY_Meta_L,
|
|
GDK_KEY_Meta_R,
|
|
GDK_KEY_Alt_L,
|
|
GDK_KEY_Alt_R,
|
|
GDK_KEY_Super_L,
|
|
GDK_KEY_Super_R,
|
|
GDK_KEY_Hyper_L,
|
|
GDK_KEY_Hyper_R,
|
|
GDK_KEY_Mode_switch,
|
|
GDK_KEY_ISO_Level3_Shift
|
|
};
|
|
|
|
static void gtk_im_context_simple_finalize (GObject *obj);
|
|
static gboolean gtk_im_context_simple_filter_keypress (GtkIMContext *context,
|
|
GdkEventKey *key);
|
|
static void gtk_im_context_simple_reset (GtkIMContext *context);
|
|
static void gtk_im_context_simple_get_preedit_string (GtkIMContext *context,
|
|
gchar **str,
|
|
PangoAttrList **attrs,
|
|
gint *cursor_pos);
|
|
|
|
G_DEFINE_TYPE (GtkIMContextSimple, gtk_im_context_simple, GTK_TYPE_IM_CONTEXT)
|
|
|
|
static void
|
|
gtk_im_context_simple_class_init (GtkIMContextSimpleClass *class)
|
|
{
|
|
GtkIMContextClass *im_context_class = GTK_IM_CONTEXT_CLASS (class);
|
|
GObjectClass *gobject_class = G_OBJECT_CLASS (class);
|
|
|
|
im_context_class->filter_keypress = gtk_im_context_simple_filter_keypress;
|
|
im_context_class->reset = gtk_im_context_simple_reset;
|
|
im_context_class->get_preedit_string = gtk_im_context_simple_get_preedit_string;
|
|
gobject_class->finalize = gtk_im_context_simple_finalize;
|
|
|
|
g_type_class_add_private (class, sizeof (GtkIMContextSimplePrivate));
|
|
}
|
|
|
|
static void
|
|
gtk_im_context_simple_init (GtkIMContextSimple *im_context_simple)
|
|
{
|
|
im_context_simple->priv = G_TYPE_INSTANCE_GET_PRIVATE (im_context_simple,
|
|
GTK_TYPE_IM_CONTEXT_SIMPLE,
|
|
GtkIMContextSimplePrivate);
|
|
}
|
|
|
|
static void
|
|
gtk_im_context_simple_finalize (GObject *obj)
|
|
{
|
|
GtkIMContextSimple *context_simple = GTK_IM_CONTEXT_SIMPLE (obj);
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
|
|
if (priv->tables)
|
|
{
|
|
g_slist_foreach (priv->tables, (GFunc)g_free, NULL);
|
|
g_slist_free (priv->tables);
|
|
|
|
priv->tables = NULL;
|
|
}
|
|
|
|
G_OBJECT_CLASS (gtk_im_context_simple_parent_class)->finalize (obj);
|
|
}
|
|
|
|
/**
|
|
* gtk_im_context_simple_new:
|
|
*
|
|
* Creates a new #GtkIMContextSimple.
|
|
*
|
|
* Returns: a new #GtkIMContextSimple.
|
|
**/
|
|
GtkIMContext *
|
|
gtk_im_context_simple_new (void)
|
|
{
|
|
return g_object_new (GTK_TYPE_IM_CONTEXT_SIMPLE, NULL);
|
|
}
|
|
|
|
static void
|
|
gtk_im_context_simple_commit_char (GtkIMContext *context,
|
|
gunichar ch)
|
|
{
|
|
GtkIMContextSimple *context_simple = GTK_IM_CONTEXT_SIMPLE (context);
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
gchar buf[10];
|
|
gint len;
|
|
|
|
g_return_if_fail (g_unichar_validate (ch));
|
|
|
|
len = g_unichar_to_utf8 (ch, buf);
|
|
buf[len] = '\0';
|
|
|
|
if (priv->tentative_match || priv->in_hex_sequence)
|
|
{
|
|
priv->in_hex_sequence = FALSE;
|
|
priv->tentative_match = 0;
|
|
priv->tentative_match_len = 0;
|
|
g_signal_emit_by_name (context_simple, "preedit-changed");
|
|
g_signal_emit_by_name (context_simple, "preedit-end");
|
|
}
|
|
|
|
g_signal_emit_by_name (context, "commit", &buf);
|
|
}
|
|
|
|
static int
|
|
compare_seq_index (const void *key, const void *value)
|
|
{
|
|
const guint *keysyms = key;
|
|
const guint16 *seq = value;
|
|
|
|
if (keysyms[0] < seq[0])
|
|
return -1;
|
|
else if (keysyms[0] > seq[0])
|
|
return 1;
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
compare_seq (const void *key, const void *value)
|
|
{
|
|
int i = 0;
|
|
const guint *keysyms = key;
|
|
const guint16 *seq = value;
|
|
|
|
while (keysyms[i])
|
|
{
|
|
if (keysyms[i] < seq[i])
|
|
return -1;
|
|
else if (keysyms[i] > seq[i])
|
|
return 1;
|
|
|
|
i++;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static gboolean
|
|
check_table (GtkIMContextSimple *context_simple,
|
|
const GtkComposeTable *table,
|
|
gint n_compose)
|
|
{
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
gint row_stride = table->max_seq_len + 2;
|
|
guint16 *seq;
|
|
|
|
/* Will never match, if the sequence in the compose buffer is longer
|
|
* than the sequences in the table. Further, compare_seq (key, val)
|
|
* will overrun val if key is longer than val. */
|
|
if (n_compose > table->max_seq_len)
|
|
return FALSE;
|
|
|
|
seq = bsearch (priv->compose_buffer,
|
|
table->data, table->n_seqs,
|
|
sizeof (guint16) * row_stride,
|
|
compare_seq);
|
|
|
|
if (seq)
|
|
{
|
|
guint16 *prev_seq;
|
|
|
|
/* Back up to the first sequence that matches to make sure
|
|
* we find the exact match if their is one.
|
|
*/
|
|
while (seq > table->data)
|
|
{
|
|
prev_seq = seq - row_stride;
|
|
if (compare_seq (priv->compose_buffer, prev_seq) != 0)
|
|
break;
|
|
seq = prev_seq;
|
|
}
|
|
|
|
if (n_compose == table->max_seq_len ||
|
|
seq[n_compose] == 0) /* complete sequence */
|
|
{
|
|
guint16 *next_seq;
|
|
gunichar value =
|
|
0x10000 * seq[table->max_seq_len] + seq[table->max_seq_len + 1];
|
|
|
|
|
|
/* We found a tentative match. See if there are any longer
|
|
* sequences containing this subsequence
|
|
*/
|
|
next_seq = seq + row_stride;
|
|
if (next_seq < table->data + row_stride * table->n_seqs)
|
|
{
|
|
if (compare_seq (priv->compose_buffer, next_seq) == 0)
|
|
{
|
|
priv->tentative_match = value;
|
|
priv->tentative_match_len = n_compose;
|
|
|
|
g_signal_emit_by_name (context_simple, "preedit-changed");
|
|
|
|
return TRUE;
|
|
}
|
|
}
|
|
|
|
gtk_im_context_simple_commit_char (GTK_IM_CONTEXT (context_simple), value);
|
|
priv->compose_buffer[0] = 0;
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
/* Checks if a keysym is a dead key. Dead key keysym values are defined in
|
|
* ../gdk/gdkkeysyms.h and the first is GDK_KEY_dead_grave. As X.Org is updated,
|
|
* more dead keys are added and we need to update the upper limit.
|
|
* Currently, the upper limit is GDK_KEY_dead_dasia+1. The +1 has to do with
|
|
* a temporary issue in the X.Org header files.
|
|
* In future versions it will be just the keysym (no +1).
|
|
*/
|
|
#define IS_DEAD_KEY(k) \
|
|
((k) >= GDK_KEY_dead_grave && (k) <= (GDK_KEY_dead_dasia+1))
|
|
|
|
#ifdef GDK_WINDOWING_WIN32
|
|
|
|
/* On Windows, user expectation is that typing a dead accent followed
|
|
* by space will input the corresponding spacing character. The X
|
|
* compose tables are different for dead acute and diaeresis, which
|
|
* when followed by space produce a plain ASCII apostrophe and double
|
|
* quote respectively. So special-case those.
|
|
*/
|
|
|
|
static gboolean
|
|
check_win32_special_cases (GtkIMContextSimple *context_simple,
|
|
gint n_compose)
|
|
{
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
if (n_compose == 2 &&
|
|
priv->compose_buffer[1] == GDK_KEY_space)
|
|
{
|
|
gunichar value = 0;
|
|
|
|
switch (priv->compose_buffer[0])
|
|
{
|
|
case GDK_KEY_dead_acute:
|
|
value = 0x00B4; break;
|
|
case GDK_KEY_dead_diaeresis:
|
|
value = 0x00A8; break;
|
|
}
|
|
if (value > 0)
|
|
{
|
|
gtk_im_context_simple_commit_char (GTK_IM_CONTEXT (context_simple), value);
|
|
priv->compose_buffer[0] = 0;
|
|
|
|
GTK_NOTE (MISC, g_print ("win32: U+%04X\n", value));
|
|
return TRUE;
|
|
}
|
|
}
|
|
return FALSE;
|
|
}
|
|
|
|
static void
|
|
check_win32_special_case_after_compact_match (GtkIMContextSimple *context_simple,
|
|
gint n_compose,
|
|
guint value)
|
|
{
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
|
|
/* On Windows user expectation is that typing two dead accents will input
|
|
* two corresponding spacing accents.
|
|
*/
|
|
if (n_compose == 2 &&
|
|
priv->compose_buffer[0] == priv->compose_buffer[1] &&
|
|
IS_DEAD_KEY (priv->compose_buffer[0]))
|
|
{
|
|
gtk_im_context_simple_commit_char (GTK_IM_CONTEXT (context_simple), value);
|
|
GTK_NOTE (MISC, g_print ("win32: U+%04X ", value));
|
|
}
|
|
}
|
|
|
|
#endif
|
|
|
|
static gboolean
|
|
check_compact_table (GtkIMContextSimple *context_simple,
|
|
const GtkComposeTableCompact *table,
|
|
gint n_compose)
|
|
{
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
gint row_stride;
|
|
guint16 *seq_index;
|
|
guint16 *seq;
|
|
gint i;
|
|
|
|
/* Will never match, if the sequence in the compose buffer is longer
|
|
* than the sequences in the table. Further, compare_seq (key, val)
|
|
* will overrun val if key is longer than val. */
|
|
if (n_compose > table->max_seq_len)
|
|
return FALSE;
|
|
|
|
seq_index = bsearch (priv->compose_buffer,
|
|
table->data, table->n_index_size,
|
|
sizeof (guint16) * table->n_index_stride,
|
|
compare_seq_index);
|
|
|
|
if (!seq_index)
|
|
{
|
|
GTK_NOTE (MISC, g_print ("compact: no\n"));
|
|
return FALSE;
|
|
}
|
|
|
|
if (seq_index && n_compose == 1)
|
|
{
|
|
GTK_NOTE (MISC, g_print ("compact: yes\n"));
|
|
return TRUE;
|
|
}
|
|
|
|
GTK_NOTE (MISC, g_print ("compact: %d ", *seq_index));
|
|
seq = NULL;
|
|
|
|
for (i = n_compose-1; i < table->max_seq_len; i++)
|
|
{
|
|
row_stride = i + 1;
|
|
|
|
if (seq_index[i+1] - seq_index[i] > 0)
|
|
{
|
|
seq = bsearch (priv->compose_buffer + 1,
|
|
table->data + seq_index[i], (seq_index[i+1] - seq_index[i]) / row_stride,
|
|
sizeof (guint16) * row_stride,
|
|
compare_seq);
|
|
|
|
if (seq)
|
|
{
|
|
if (i == n_compose - 1)
|
|
break;
|
|
else
|
|
{
|
|
g_signal_emit_by_name (context_simple, "preedit-changed");
|
|
|
|
GTK_NOTE (MISC, g_print ("yes\n"));
|
|
return TRUE;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if (!seq)
|
|
{
|
|
GTK_NOTE (MISC, g_print ("no\n"));
|
|
return FALSE;
|
|
}
|
|
else
|
|
{
|
|
gunichar value;
|
|
|
|
value = seq[row_stride - 1];
|
|
|
|
gtk_im_context_simple_commit_char (GTK_IM_CONTEXT (context_simple), value);
|
|
#ifdef G_OS_WIN32
|
|
check_win32_special_case_after_compact_match (context_simple, n_compose, value);
|
|
#endif
|
|
priv->compose_buffer[0] = 0;
|
|
|
|
GTK_NOTE (MISC, g_print ("U+%04X\n", value));
|
|
return TRUE;
|
|
}
|
|
|
|
GTK_NOTE (MISC, g_print ("no\n"));
|
|
return FALSE;
|
|
}
|
|
|
|
/* This function receives a sequence of Unicode characters and tries to
|
|
* normalize it (NFC). We check for the case the the resulting string
|
|
* has length 1 (single character).
|
|
* NFC normalisation normally rearranges diacritic marks, unless these
|
|
* belong to the same Canonical Combining Class.
|
|
* If they belong to the same canonical combining class, we produce all
|
|
* permutations of the diacritic marks, then attempt to normalize.
|
|
*/
|
|
static gboolean
|
|
check_normalize_nfc (gunichar* combination_buffer, gint n_compose)
|
|
{
|
|
gunichar combination_buffer_temp[GTK_MAX_COMPOSE_LEN];
|
|
gchar *combination_utf8_temp = NULL;
|
|
gchar *nfc_temp = NULL;
|
|
gint n_combinations;
|
|
gunichar temp_swap;
|
|
gint i;
|
|
|
|
n_combinations = 1;
|
|
|
|
for (i = 1; i < n_compose; i++ )
|
|
n_combinations *= i;
|
|
|
|
/* Xorg reuses dead_tilde for the perispomeni diacritic mark.
|
|
* We check if base character belongs to Greek Unicode block,
|
|
* and if so, we replace tilde with perispomeni. */
|
|
if (combination_buffer[0] >= 0x390 && combination_buffer[0] <= 0x3FF)
|
|
{
|
|
for (i = 1; i < n_compose; i++ )
|
|
if (combination_buffer[i] == 0x303)
|
|
combination_buffer[i] = 0x342;
|
|
}
|
|
|
|
memcpy (combination_buffer_temp, combination_buffer, GTK_MAX_COMPOSE_LEN * sizeof (gunichar) );
|
|
|
|
for (i = 0; i < n_combinations; i++ )
|
|
{
|
|
g_unicode_canonical_ordering (combination_buffer_temp, n_compose);
|
|
combination_utf8_temp = g_ucs4_to_utf8 (combination_buffer_temp, -1, NULL, NULL, NULL);
|
|
nfc_temp = g_utf8_normalize (combination_utf8_temp, -1, G_NORMALIZE_NFC);
|
|
|
|
if (g_utf8_strlen (nfc_temp, -1) == 1)
|
|
{
|
|
memcpy (combination_buffer, combination_buffer_temp, GTK_MAX_COMPOSE_LEN * sizeof (gunichar) );
|
|
|
|
g_free (combination_utf8_temp);
|
|
g_free (nfc_temp);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
g_free (combination_utf8_temp);
|
|
g_free (nfc_temp);
|
|
|
|
if (n_compose > 2)
|
|
{
|
|
temp_swap = combination_buffer_temp[i % (n_compose - 1) + 1];
|
|
combination_buffer_temp[i % (n_compose - 1) + 1] = combination_buffer_temp[(i+1) % (n_compose - 1) + 1];
|
|
combination_buffer_temp[(i+1) % (n_compose - 1) + 1] = temp_swap;
|
|
}
|
|
else
|
|
break;
|
|
}
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
static gboolean
|
|
check_algorithmically (GtkIMContextSimple *context_simple,
|
|
gint n_compose)
|
|
|
|
{
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
gint i;
|
|
gunichar combination_buffer[GTK_MAX_COMPOSE_LEN];
|
|
gchar *combination_utf8, *nfc;
|
|
|
|
if (n_compose >= GTK_MAX_COMPOSE_LEN)
|
|
return FALSE;
|
|
|
|
for (i = 0; i < n_compose && IS_DEAD_KEY (priv->compose_buffer[i]); i++)
|
|
;
|
|
if (i == n_compose)
|
|
return TRUE;
|
|
|
|
if (i > 0 && i == n_compose - 1)
|
|
{
|
|
combination_buffer[0] = gdk_keyval_to_unicode (priv->compose_buffer[i]);
|
|
combination_buffer[n_compose] = 0;
|
|
i--;
|
|
while (i >= 0)
|
|
{
|
|
switch (priv->compose_buffer[i])
|
|
{
|
|
#define CASE(keysym, unicode) \
|
|
case GDK_KEY_dead_##keysym: combination_buffer[i+1] = unicode; break
|
|
|
|
CASE (grave, 0x0300);
|
|
CASE (acute, 0x0301);
|
|
CASE (circumflex, 0x0302);
|
|
CASE (tilde, 0x0303); /* Also used with perispomeni, 0x342. */
|
|
CASE (macron, 0x0304);
|
|
CASE (breve, 0x0306);
|
|
CASE (abovedot, 0x0307);
|
|
CASE (diaeresis, 0x0308);
|
|
CASE (hook, 0x0309);
|
|
CASE (abovering, 0x030A);
|
|
CASE (doubleacute, 0x030B);
|
|
CASE (caron, 0x030C);
|
|
CASE (abovecomma, 0x0313); /* Equivalent to psili */
|
|
CASE (abovereversedcomma, 0x0314); /* Equivalent to dasia */
|
|
CASE (horn, 0x031B); /* Legacy use for psili, 0x313 (or 0x343). */
|
|
CASE (belowdot, 0x0323);
|
|
CASE (cedilla, 0x0327);
|
|
CASE (ogonek, 0x0328); /* Legacy use for dasia, 0x314.*/
|
|
CASE (iota, 0x0345);
|
|
CASE (voiced_sound, 0x3099); /* Per Markus Kuhn keysyms.txt file. */
|
|
CASE (semivoiced_sound, 0x309A); /* Per Markus Kuhn keysyms.txt file. */
|
|
|
|
/* The following cases are to be removed once xkeyboard-config,
|
|
* xorg are fully updated.
|
|
*/
|
|
/* Workaround for typo in 1.4.x xserver-xorg */
|
|
case 0xfe66: combination_buffer[i+1] = 0x314; break;
|
|
/* CASE (dasia, 0x314); */
|
|
/* CASE (perispomeni, 0x342); */
|
|
/* CASE (psili, 0x343); */
|
|
#undef CASE
|
|
default:
|
|
combination_buffer[i+1] = gdk_keyval_to_unicode (priv->compose_buffer[i]);
|
|
}
|
|
i--;
|
|
}
|
|
|
|
/* If the buffer normalizes to a single character,
|
|
* then modify the order of combination_buffer accordingly, if necessary,
|
|
* and return TRUE.
|
|
*/
|
|
if (check_normalize_nfc (combination_buffer, n_compose))
|
|
{
|
|
gunichar value;
|
|
combination_utf8 = g_ucs4_to_utf8 (combination_buffer, -1, NULL, NULL, NULL);
|
|
nfc = g_utf8_normalize (combination_utf8, -1, G_NORMALIZE_NFC);
|
|
|
|
value = g_utf8_get_char (nfc);
|
|
gtk_im_context_simple_commit_char (GTK_IM_CONTEXT (context_simple), value);
|
|
priv->compose_buffer[0] = 0;
|
|
|
|
g_free (combination_utf8);
|
|
g_free (nfc);
|
|
|
|
return TRUE;
|
|
}
|
|
}
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
/* In addition to the table-driven sequences, we allow Unicode hex
|
|
* codes to be entered. The method chosen here is similar to the
|
|
* one recommended in ISO 14755, but not exactly the same, since we
|
|
* don't want to steal 16 valuable key combinations.
|
|
*
|
|
* A hex Unicode sequence must be started with Ctrl-Shift-U, followed
|
|
* by a sequence of hex digits entered with Ctrl-Shift still held.
|
|
* Releasing one of the modifiers or pressing space while the modifiers
|
|
* are still held commits the character. It is possible to erase
|
|
* digits using backspace.
|
|
*
|
|
* As an extension to the above, we also allow to start the sequence
|
|
* with Ctrl-Shift-U, then release the modifiers before typing any
|
|
* digits, and enter the digits without modifiers.
|
|
*/
|
|
|
|
static gboolean
|
|
check_hex (GtkIMContextSimple *context_simple,
|
|
gint n_compose)
|
|
{
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
/* See if this is a hex sequence, return TRUE if so */
|
|
gint i;
|
|
GString *str;
|
|
gulong n;
|
|
gchar *nptr = NULL;
|
|
gchar buf[7];
|
|
|
|
priv->tentative_match = 0;
|
|
priv->tentative_match_len = 0;
|
|
|
|
str = g_string_new (NULL);
|
|
|
|
i = 0;
|
|
while (i < n_compose)
|
|
{
|
|
gunichar ch;
|
|
|
|
ch = gdk_keyval_to_unicode (priv->compose_buffer[i]);
|
|
|
|
if (ch == 0)
|
|
return FALSE;
|
|
|
|
if (!g_unichar_isxdigit (ch))
|
|
return FALSE;
|
|
|
|
buf[g_unichar_to_utf8 (ch, buf)] = '\0';
|
|
|
|
g_string_append (str, buf);
|
|
|
|
++i;
|
|
}
|
|
|
|
n = strtoul (str->str, &nptr, 16);
|
|
|
|
/* if strtoul fails it probably means non-latin digits were used;
|
|
* we should in principle handle that, but we probably don't.
|
|
*/
|
|
if (nptr - str->str < str->len)
|
|
{
|
|
g_string_free (str, TRUE);
|
|
return FALSE;
|
|
}
|
|
else
|
|
g_string_free (str, TRUE);
|
|
|
|
if (g_unichar_validate (n))
|
|
{
|
|
priv->tentative_match = n;
|
|
priv->tentative_match_len = n_compose;
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
static void
|
|
beep_window (GdkWindow *window)
|
|
{
|
|
GdkScreen *screen = gdk_window_get_screen (window);
|
|
gboolean beep;
|
|
|
|
g_object_get (gtk_settings_get_for_screen (screen),
|
|
"gtk-error-bell", &beep,
|
|
NULL);
|
|
|
|
if (beep)
|
|
gdk_window_beep (window);
|
|
}
|
|
|
|
static gboolean
|
|
no_sequence_matches (GtkIMContextSimple *context_simple,
|
|
gint n_compose,
|
|
GdkEventKey *event)
|
|
{
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
GtkIMContext *context;
|
|
gunichar ch;
|
|
|
|
context = GTK_IM_CONTEXT (context_simple);
|
|
|
|
/* No compose sequences found, check first if we have a partial
|
|
* match pending.
|
|
*/
|
|
if (priv->tentative_match)
|
|
{
|
|
gint len = priv->tentative_match_len;
|
|
int i;
|
|
|
|
gtk_im_context_simple_commit_char (context, priv->tentative_match);
|
|
priv->compose_buffer[0] = 0;
|
|
|
|
for (i=0; i < n_compose - len - 1; i++)
|
|
{
|
|
GdkEvent *tmp_event = gdk_event_copy ((GdkEvent *)event);
|
|
tmp_event->key.keyval = priv->compose_buffer[len + i];
|
|
|
|
gtk_im_context_filter_keypress (context, (GdkEventKey *)tmp_event);
|
|
gdk_event_free (tmp_event);
|
|
}
|
|
|
|
return gtk_im_context_filter_keypress (context, event);
|
|
}
|
|
else
|
|
{
|
|
priv->compose_buffer[0] = 0;
|
|
if (n_compose > 1) /* Invalid sequence */
|
|
{
|
|
beep_window (event->window);
|
|
return TRUE;
|
|
}
|
|
|
|
ch = gdk_keyval_to_unicode (event->keyval);
|
|
if (ch != 0 && !g_unichar_iscntrl (ch))
|
|
{
|
|
gtk_im_context_simple_commit_char (context, ch);
|
|
return TRUE;
|
|
}
|
|
else
|
|
return FALSE;
|
|
}
|
|
}
|
|
|
|
static gboolean
|
|
is_hex_keyval (guint keyval)
|
|
{
|
|
gunichar ch = gdk_keyval_to_unicode (keyval);
|
|
|
|
return g_unichar_isxdigit (ch);
|
|
}
|
|
|
|
static guint
|
|
canonical_hex_keyval (GdkEventKey *event)
|
|
{
|
|
GdkKeymap *keymap = gdk_keymap_get_for_display (gdk_window_get_display (event->window));
|
|
guint keyval;
|
|
guint *keyvals = NULL;
|
|
gint n_vals = 0;
|
|
gint i;
|
|
|
|
/* See if the keyval is already a hex digit */
|
|
if (is_hex_keyval (event->keyval))
|
|
return event->keyval;
|
|
|
|
/* See if this key would have generated a hex keyval in
|
|
* any other state, and return that hex keyval if so
|
|
*/
|
|
gdk_keymap_get_entries_for_keycode (keymap,
|
|
event->hardware_keycode,
|
|
NULL,
|
|
&keyvals, &n_vals);
|
|
|
|
keyval = 0;
|
|
i = 0;
|
|
while (i < n_vals)
|
|
{
|
|
if (is_hex_keyval (keyvals[i]))
|
|
{
|
|
keyval = keyvals[i];
|
|
break;
|
|
}
|
|
|
|
++i;
|
|
}
|
|
|
|
g_free (keyvals);
|
|
|
|
if (keyval)
|
|
return keyval;
|
|
else
|
|
/* No way to make it a hex digit
|
|
*/
|
|
return 0;
|
|
}
|
|
|
|
static gboolean
|
|
gtk_im_context_simple_filter_keypress (GtkIMContext *context,
|
|
GdkEventKey *event)
|
|
{
|
|
GtkIMContextSimple *context_simple = GTK_IM_CONTEXT_SIMPLE (context);
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
GdkDisplay *display = gdk_window_get_display (event->window);
|
|
GSList *tmp_list;
|
|
int n_compose = 0;
|
|
GdkModifierType hex_mod_mask;
|
|
gboolean have_hex_mods;
|
|
gboolean is_hex_start;
|
|
gboolean is_hex_end;
|
|
gboolean is_backspace;
|
|
gboolean is_escape;
|
|
guint hex_keyval;
|
|
int i;
|
|
|
|
while (priv->compose_buffer[n_compose] != 0)
|
|
n_compose++;
|
|
|
|
if (event->type == GDK_KEY_RELEASE)
|
|
{
|
|
if (priv->in_hex_sequence &&
|
|
(event->keyval == GDK_KEY_Control_L || event->keyval == GDK_KEY_Control_R ||
|
|
event->keyval == GDK_KEY_Shift_L || event->keyval == GDK_KEY_Shift_R))
|
|
{
|
|
if (priv->tentative_match &&
|
|
g_unichar_validate (priv->tentative_match))
|
|
{
|
|
gtk_im_context_simple_commit_char (context, priv->tentative_match);
|
|
priv->compose_buffer[0] = 0;
|
|
|
|
}
|
|
else if (n_compose == 0)
|
|
{
|
|
priv->modifiers_dropped = TRUE;
|
|
}
|
|
else
|
|
{
|
|
/* invalid hex sequence */
|
|
beep_window (event->window);
|
|
|
|
priv->tentative_match = 0;
|
|
priv->in_hex_sequence = FALSE;
|
|
priv->compose_buffer[0] = 0;
|
|
|
|
g_signal_emit_by_name (context_simple, "preedit-changed");
|
|
g_signal_emit_by_name (context_simple, "preedit-end");
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
else
|
|
return FALSE;
|
|
}
|
|
|
|
/* Ignore modifier key presses */
|
|
for (i = 0; i < G_N_ELEMENTS (gtk_compose_ignore); i++)
|
|
if (event->keyval == gtk_compose_ignore[i])
|
|
return FALSE;
|
|
|
|
hex_mod_mask = gdk_keymap_get_modifier_mask (gdk_keymap_get_for_display (display),
|
|
GDK_MODIFIER_INTENT_PRIMARY_ACCELERATOR);
|
|
hex_mod_mask |= GDK_SHIFT_MASK;
|
|
|
|
if (priv->in_hex_sequence && priv->modifiers_dropped)
|
|
have_hex_mods = TRUE;
|
|
else
|
|
have_hex_mods = (event->state & (hex_mod_mask)) == hex_mod_mask;
|
|
is_hex_start = event->keyval == GDK_KEY_U;
|
|
is_hex_end = (event->keyval == GDK_KEY_space ||
|
|
event->keyval == GDK_KEY_KP_Space ||
|
|
event->keyval == GDK_KEY_Return ||
|
|
event->keyval == GDK_KEY_ISO_Enter ||
|
|
event->keyval == GDK_KEY_KP_Enter);
|
|
is_backspace = event->keyval == GDK_KEY_BackSpace;
|
|
is_escape = event->keyval == GDK_KEY_Escape;
|
|
hex_keyval = canonical_hex_keyval (event);
|
|
|
|
/* If we are already in a non-hex sequence, or
|
|
* this keystroke is not hex modifiers + hex digit, don't filter
|
|
* key events with accelerator modifiers held down. We only treat
|
|
* Control and Alt as accel modifiers here, since Super, Hyper and
|
|
* Meta are often co-located with Mode_Switch, Multi_Key or
|
|
* ISO_Level3_Switch.
|
|
*/
|
|
if (!have_hex_mods ||
|
|
(n_compose > 0 && !priv->in_hex_sequence) ||
|
|
(n_compose == 0 && !priv->in_hex_sequence && !is_hex_start) ||
|
|
(priv->in_hex_sequence && !hex_keyval &&
|
|
!is_hex_start && !is_hex_end && !is_escape && !is_backspace))
|
|
{
|
|
GdkDisplay *display;
|
|
GdkModifierType no_text_input_mask;
|
|
|
|
display = gdk_window_get_display (event->window);
|
|
|
|
no_text_input_mask =
|
|
gdk_keymap_get_modifier_mask (gdk_keymap_get_for_display (display),
|
|
GDK_MODIFIER_INTENT_NO_TEXT_INPUT);
|
|
|
|
if (event->state & no_text_input_mask ||
|
|
(priv->in_hex_sequence && priv->modifiers_dropped &&
|
|
(event->keyval == GDK_KEY_Return ||
|
|
event->keyval == GDK_KEY_ISO_Enter ||
|
|
event->keyval == GDK_KEY_KP_Enter)))
|
|
{
|
|
return FALSE;
|
|
}
|
|
}
|
|
|
|
/* Handle backspace */
|
|
if (priv->in_hex_sequence && have_hex_mods && is_backspace)
|
|
{
|
|
if (n_compose > 0)
|
|
{
|
|
n_compose--;
|
|
priv->compose_buffer[n_compose] = 0;
|
|
check_hex (context_simple, n_compose);
|
|
}
|
|
else
|
|
{
|
|
priv->in_hex_sequence = FALSE;
|
|
}
|
|
|
|
g_signal_emit_by_name (context_simple, "preedit-changed");
|
|
|
|
if (!priv->in_hex_sequence)
|
|
g_signal_emit_by_name (context_simple, "preedit-end");
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
/* Check for hex sequence restart */
|
|
if (priv->in_hex_sequence && have_hex_mods && is_hex_start)
|
|
{
|
|
if (priv->tentative_match &&
|
|
g_unichar_validate (priv->tentative_match))
|
|
{
|
|
gtk_im_context_simple_commit_char (context, priv->tentative_match);
|
|
priv->compose_buffer[0] = 0;
|
|
}
|
|
else
|
|
{
|
|
/* invalid hex sequence */
|
|
if (n_compose > 0)
|
|
beep_window (event->window);
|
|
|
|
priv->tentative_match = 0;
|
|
priv->in_hex_sequence = FALSE;
|
|
priv->compose_buffer[0] = 0;
|
|
}
|
|
}
|
|
|
|
/* Check for hex sequence start */
|
|
if (!priv->in_hex_sequence && have_hex_mods && is_hex_start)
|
|
{
|
|
priv->compose_buffer[0] = 0;
|
|
priv->in_hex_sequence = TRUE;
|
|
priv->modifiers_dropped = FALSE;
|
|
priv->tentative_match = 0;
|
|
|
|
g_signal_emit_by_name (context_simple, "preedit-start");
|
|
g_signal_emit_by_name (context_simple, "preedit-changed");
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
/* Then, check for compose sequences */
|
|
if (priv->in_hex_sequence)
|
|
{
|
|
if (hex_keyval)
|
|
priv->compose_buffer[n_compose++] = hex_keyval;
|
|
else if (is_escape)
|
|
{
|
|
gtk_im_context_simple_reset (context);
|
|
|
|
return TRUE;
|
|
}
|
|
else if (!is_hex_end)
|
|
{
|
|
/* non-hex character in hex sequence */
|
|
beep_window (event->window);
|
|
|
|
return TRUE;
|
|
}
|
|
}
|
|
else
|
|
priv->compose_buffer[n_compose++] = event->keyval;
|
|
|
|
priv->compose_buffer[n_compose] = 0;
|
|
|
|
if (priv->in_hex_sequence)
|
|
{
|
|
/* If the modifiers are still held down, consider the sequence again */
|
|
if (have_hex_mods)
|
|
{
|
|
/* space or return ends the sequence, and we eat the key */
|
|
if (n_compose > 0 && is_hex_end)
|
|
{
|
|
if (priv->tentative_match &&
|
|
g_unichar_validate (priv->tentative_match))
|
|
{
|
|
gtk_im_context_simple_commit_char (context, priv->tentative_match);
|
|
priv->compose_buffer[0] = 0;
|
|
}
|
|
else
|
|
{
|
|
/* invalid hex sequence */
|
|
beep_window (event->window);
|
|
|
|
priv->tentative_match = 0;
|
|
priv->in_hex_sequence = FALSE;
|
|
priv->compose_buffer[0] = 0;
|
|
}
|
|
}
|
|
else if (!check_hex (context_simple, n_compose))
|
|
beep_window (event->window);
|
|
|
|
g_signal_emit_by_name (context_simple, "preedit-changed");
|
|
|
|
if (!priv->in_hex_sequence)
|
|
g_signal_emit_by_name (context_simple, "preedit-end");
|
|
|
|
return TRUE;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
tmp_list = priv->tables;
|
|
while (tmp_list)
|
|
{
|
|
if (check_table (context_simple, tmp_list->data, n_compose))
|
|
return TRUE;
|
|
tmp_list = tmp_list->next;
|
|
}
|
|
|
|
GTK_NOTE (MISC, {
|
|
g_print ("[ ");
|
|
for (i = 0; i < n_compose; i++)
|
|
{
|
|
const gchar *keyval_name = gdk_keyval_name (priv->compose_buffer[i]);
|
|
|
|
if (keyval_name != NULL)
|
|
g_print ("%s ", keyval_name);
|
|
else
|
|
g_print ("%04x ", priv->compose_buffer[i]);
|
|
}
|
|
g_print ("] ");
|
|
});
|
|
|
|
#ifdef GDK_WINDOWING_WIN32
|
|
if (check_win32_special_cases (context_simple, n_compose))
|
|
return TRUE;
|
|
#endif
|
|
|
|
if (check_compact_table (context_simple, >k_compose_table_compact, n_compose))
|
|
return TRUE;
|
|
|
|
if (check_algorithmically (context_simple, n_compose))
|
|
return TRUE;
|
|
}
|
|
|
|
/* The current compose_buffer doesn't match anything */
|
|
return no_sequence_matches (context_simple, n_compose, event);
|
|
}
|
|
|
|
static void
|
|
gtk_im_context_simple_reset (GtkIMContext *context)
|
|
{
|
|
GtkIMContextSimple *context_simple = GTK_IM_CONTEXT_SIMPLE (context);
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
|
|
priv->compose_buffer[0] = 0;
|
|
|
|
if (priv->tentative_match || priv->in_hex_sequence)
|
|
{
|
|
priv->in_hex_sequence = FALSE;
|
|
priv->tentative_match = 0;
|
|
priv->tentative_match_len = 0;
|
|
g_signal_emit_by_name (context_simple, "preedit-changed");
|
|
g_signal_emit_by_name (context_simple, "preedit-end");
|
|
}
|
|
}
|
|
|
|
static void
|
|
gtk_im_context_simple_get_preedit_string (GtkIMContext *context,
|
|
gchar **str,
|
|
PangoAttrList **attrs,
|
|
gint *cursor_pos)
|
|
{
|
|
GtkIMContextSimple *context_simple = GTK_IM_CONTEXT_SIMPLE (context);
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
char outbuf[37]; /* up to 6 hex digits */
|
|
int len = 0;
|
|
|
|
if (priv->in_hex_sequence)
|
|
{
|
|
int hexchars = 0;
|
|
|
|
outbuf[0] = 'u';
|
|
len = 1;
|
|
|
|
while (priv->compose_buffer[hexchars] != 0)
|
|
{
|
|
len += g_unichar_to_utf8 (gdk_keyval_to_unicode (priv->compose_buffer[hexchars]),
|
|
outbuf + len);
|
|
++hexchars;
|
|
}
|
|
|
|
g_assert (len < 25);
|
|
}
|
|
else if (priv->tentative_match)
|
|
len = g_unichar_to_utf8 (priv->tentative_match, outbuf);
|
|
|
|
outbuf[len] = '\0';
|
|
|
|
if (str)
|
|
*str = g_strdup (outbuf);
|
|
|
|
if (attrs)
|
|
{
|
|
*attrs = pango_attr_list_new ();
|
|
|
|
if (len)
|
|
{
|
|
PangoAttribute *attr = pango_attr_underline_new (PANGO_UNDERLINE_SINGLE);
|
|
attr->start_index = 0;
|
|
attr->end_index = len;
|
|
pango_attr_list_insert (*attrs, attr);
|
|
}
|
|
}
|
|
|
|
if (cursor_pos)
|
|
*cursor_pos = len;
|
|
}
|
|
|
|
/**
|
|
* gtk_im_context_simple_add_table: (skip)
|
|
* @context_simple: A #GtkIMContextSimple
|
|
* @data: the table
|
|
* @max_seq_len: Maximum length of a sequence in the table
|
|
* (cannot be greater than #GTK_MAX_COMPOSE_LEN)
|
|
* @n_seqs: number of sequences in the table
|
|
*
|
|
* Adds an additional table to search to the input context.
|
|
* Each row of the table consists of @max_seq_len key symbols
|
|
* followed by two #guint16 interpreted as the high and low
|
|
* words of a #gunicode value. Tables are searched starting
|
|
* from the last added.
|
|
*
|
|
* The table must be sorted in dictionary order on the
|
|
* numeric value of the key symbol fields. (Values beyond
|
|
* the length of the sequence should be zero.)
|
|
**/
|
|
void
|
|
gtk_im_context_simple_add_table (GtkIMContextSimple *context_simple,
|
|
guint16 *data,
|
|
gint max_seq_len,
|
|
gint n_seqs)
|
|
{
|
|
GtkIMContextSimplePrivate *priv = context_simple->priv;
|
|
GtkComposeTable *table;
|
|
|
|
g_return_if_fail (GTK_IS_IM_CONTEXT_SIMPLE (context_simple));
|
|
g_return_if_fail (data != NULL);
|
|
g_return_if_fail (max_seq_len <= GTK_MAX_COMPOSE_LEN);
|
|
|
|
table = g_new (GtkComposeTable, 1);
|
|
table->data = data;
|
|
table->max_seq_len = max_seq_len;
|
|
table->n_seqs = n_seqs;
|
|
|
|
priv->tables = g_slist_prepend (priv->tables, table);
|
|
}
|