static void
on_get_surrounding_text (MInputContext *context,
MSymbol command)
{
g_debug (G_STRLOC ": %s", G_STRFUNC);
NimfM17n *m17n = context->arg;
if (!NIMF_IS_M17N (m17n) || !nimf_service_im_target)
return;
gchar *text;
gint cursor_pos, nchars, nbytes;
MText *mt, *surround = NULL;
int len, pos;
nimf_engine_get_surrounding (NIMF_ENGINE (m17n),
nimf_service_im_target,
&text,
&cursor_pos);
if (text == NULL)
return;
nchars = g_utf8_strlen (text, -1);
nbytes = strlen (text);
mt = mconv_decode_buffer (Mcoding_utf_8,
(const unsigned char *) text, nbytes);
g_free (text);
len = (long) mplist_value (m17n->ic->plist);
if (len < 0)
{
pos = cursor_pos + len;
if (pos < 0)
pos = 0;
surround = mtext_duplicate (mt, pos, cursor_pos);
}
else if (len > 0)
{
pos = cursor_pos + len;
if (pos > nchars)
pos = nchars;
surround = mtext_duplicate (mt, cursor_pos, pos);
}
if (!surround)
surround = mtext ();
m17n_object_unref (mt);
mplist_set (m17n->ic->plist, Mtext, surround);
m17n_object_unref (surround);
}
static MPlist *
parse_m17n_value (MPlist *plist, gchar *text)
{
MPlist *value;
if (mplist_key (plist) == Msymbol) {
value = mplist ();
mplist_add (value, Msymbol, msymbol (text));
return value;
}
if (mplist_key (plist) == Mtext) {
MText *mtext;
mtext = mconv_decode_buffer (Mcoding_utf_8,
(const unsigned char *) text,
strlen (text));
value = mplist ();
mplist_add (value, Mtext, mtext);
return value;
}
if (mplist_key (plist) == Minteger) {
long val;
errno = 0;
val = strtol (text, NULL, 10);
if ((errno == ERANGE && (val == LONG_MAX || val == LONG_MIN))
|| (errno != 0 && val == 0))
return NULL;
value = mplist ();
mplist_add (value, Minteger, (void *)val);
return value;
}
return NULL;
}
static void
ibus_m17n_engine_callback (MInputContext *context,
MSymbol command)
{
IBusM17NEngine *m17n = NULL;
m17n = context->arg;
g_return_if_fail (m17n != NULL);
/* the callback may be called in minput_create_ic, in the time
* m17n->context has not be assigned, so need assign it. */
if (m17n->context == NULL) {
m17n->context = context;
}
if (command == Minput_preedit_start) {
ibus_engine_hide_preedit_text ((IBusEngine *)m17n);
}
else if (command == Minput_preedit_draw) {
ibus_m17n_engine_update_preedit (m17n);
}
else if (command == Minput_preedit_done) {
ibus_engine_hide_preedit_text ((IBusEngine *)m17n);
}
else if (command == Minput_status_start) {
ibus_engine_hide_preedit_text ((IBusEngine *)m17n);
}
else if (command == Minput_status_draw) {
gchar *status;
status = ibus_m17n_mtext_to_utf8 (m17n->context->status);
if (status && strlen (status)) {
IBusText *text;
text = ibus_text_new_from_string (status);
ibus_property_set_label (m17n->status_prop, text);
ibus_property_set_visible (m17n->status_prop, TRUE);
}
else {
ibus_property_set_label (m17n->status_prop, NULL);
ibus_property_set_visible (m17n->status_prop, FALSE);
}
ibus_engine_update_property ((IBusEngine *)m17n, m17n->status_prop);
g_free (status);
}
else if (command == Minput_status_done) {
}
else if (command == Minput_candidates_start) {
ibus_engine_hide_lookup_table ((IBusEngine *) m17n);
ibus_engine_hide_auxiliary_text ((IBusEngine *) m17n);
}
else if (command == Minput_candidates_draw) {
ibus_m17n_engine_update_lookup_table (m17n);
}
else if (command == Minput_candidates_done) {
ibus_engine_hide_lookup_table ((IBusEngine *) m17n);
ibus_engine_hide_auxiliary_text ((IBusEngine *) m17n);
}
else if (command == Minput_set_spot) {
}
else if (command == Minput_toggle) {
}
else if (command == Minput_reset) {
}
/* ibus_engine_get_surrounding_text is only available in the current
git master (1.3.99+) */
#ifdef HAVE_IBUS_ENGINE_GET_SURROUNDING_TEXT
else if (command == Minput_get_surrounding_text &&
(((IBusEngine *) m17n)->client_capabilities &
IBUS_CAP_SURROUNDING_TEXT) != 0) {
IBusText *text;
guint cursor_pos, nchars, nbytes;
MText *mt, *surround;
int len, pos;
ibus_engine_get_surrounding_text ((IBusEngine *) m17n,
&text,
&cursor_pos);
nchars = ibus_text_get_length (text);
nbytes = g_utf8_offset_to_pointer (text->text, nchars) - text->text;
mt = mconv_decode_buffer (Mcoding_utf_8, text->text, nbytes);
g_object_unref (text);
len = (long) mplist_value (m17n->context->plist);
if (len < 0) {
pos = cursor_pos + len;
if (pos < 0)
pos = 0;
surround = mtext_duplicate (mt, pos, cursor_pos);
}
else if (len > 0) {
pos = cursor_pos + len;
if (pos > nchars)
pos = nchars;
surround = mtext_duplicate (mt, cursor_pos, pos);
}
else {
surround = mtext ();
}
m17n_object_unref (mt);
mplist_set (m17n->context->plist, Mtext, surround);
m17n_object_unref (surround);
}
#endif /* !HAVE_IBUS_ENGINE_GET_SURROUNDING_TEXT */
else if (command == Minput_delete_surrounding_text &&
(((IBusEngine *) m17n)->client_capabilities &
IBUS_CAP_SURROUNDING_TEXT) != 0) {
int len;
len = (long) mplist_value (m17n->context->plist);
if (len < 0)
ibus_engine_delete_surrounding_text ((IBusEngine *) m17n,
len, -len);
else if (len > 0)
ibus_engine_delete_surrounding_text ((IBusEngine *) m17n,
0, len);
}
}
