g_signal_handler_unblock( G_OBJECT(win->widget), win->keypress_handler );
}
-/* Internal function: Request either latin-1 or unicode line input. */
+/* Internal function: Request either latin-1 or unicode line input, in a text grid window. */
void
-request_line_event_common(winid_t win, gboolean insert, gchar *inserttext)
+text_grid_request_line_event_common(winid_t win, glui32 maxlen, gboolean insert, gchar *inserttext)
{
- GtkTextBuffer *window_buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(win->widget));
-
- /* Move the input_position mark to the end of the window_buffer */
- GtkTextMark *input_position = gtk_text_buffer_get_mark(window_buffer, "input_position");
- GtkTextIter end_iter;
- gtk_text_buffer_get_end_iter(window_buffer, &end_iter);
- gtk_text_buffer_move_mark(window_buffer, input_position, &end_iter);
-
- /* Set the entire contents of the window_buffer as uneditable
- * (so input can only be entered at the end) */
- GtkTextIter start_iter;
- gtk_text_buffer_get_start_iter(window_buffer, &start_iter);
- gtk_text_buffer_remove_tag_by_name(window_buffer, "uneditable", &start_iter, &end_iter);
- gtk_text_buffer_apply_tag_by_name(window_buffer, "uneditable", &start_iter, &end_iter);
-
- /* Insert pre-entered text if needed */
- if(insert)
- gtk_text_buffer_insert(window_buffer, &end_iter, inserttext, -1);
-
- /* Scroll to input point */
- gtk_text_view_scroll_mark_onscreen(GTK_TEXT_VIEW(win->widget), input_position);
- g_signal_handler_unblock( G_OBJECT(window_buffer), win->insert_text_handler );
- gtk_text_view_set_editable(GTK_TEXT_VIEW(win->widget), TRUE);
+ GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(win->widget) );
+
+ GtkTextMark *cursor = gtk_text_buffer_get_mark(buffer, "cursor_position");
+ GtkTextIter start_iter, end_iter;
+ gtk_text_buffer_get_iter_at_mark(buffer, &start_iter, cursor);
+
+ /* Determine the maximum length of the line input */
+ gint cursorpos = gtk_text_iter_get_line_offset(&start_iter);
+ gint input_length = MIN(win->width - cursorpos, win->line_input_buffer_max_len);
+ end_iter = start_iter;
+ gtk_text_iter_set_line_offset(&end_iter, cursorpos + input_length);
+
+ /* Insert pre-entered text if needed */
+ gchar *text;
+ if(!insert)
+ text = g_strnfill(input_length, ' ');
+ else
+ {
+ gchar *blanks = g_strnfill(input_length - g_utf8_strlen(inserttext, -1), ' ');
+ text = g_strconcat(inserttext, blanks, NULL);
+ g_free(blanks);
+ }
+
+ /* Erase the text currently in the input field and replace it with blanks or the insert text, with the editable "input_field" tag */
+ gtk_text_buffer_delete(buffer, &start_iter, &end_iter);
+ gtk_text_buffer_insert_with_tags_by_name(buffer, &start_iter, text, -1, "input_field", NULL);
+ g_free(text);
+
+ g_signal_handler_unblock(GTK_TEXT_VIEW(win->widget), win->insert_text_handler);
+}
+
+/* Internal function: Request either latin-1 or unicode line input, in a text buffer window. */
+void
+text_buffer_request_line_event_common(winid_t win, glui32 maxlen, gboolean insert, gchar *inserttext)
+{
+ GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(win->widget) );
+
+ /* Move the input_position mark to the end of the window_buffer */
+ GtkTextMark *input_position = gtk_text_buffer_get_mark(buffer, "input_position");
+ GtkTextIter end_iter;
+ gtk_text_buffer_get_end_iter(buffer, &end_iter);
+ gtk_text_buffer_move_mark(buffer, input_position, &end_iter);
+
+ /* Set the entire contents of the window_buffer as uneditable
+ * (so input can only be entered at the end) */
+ GtkTextIter start_iter;
+ gtk_text_buffer_get_start_iter(buffer, &start_iter);
+ gtk_text_buffer_remove_tag_by_name(buffer, "uneditable", &start_iter, &end_iter);
+ gtk_text_buffer_apply_tag_by_name(buffer, "uneditable", &start_iter, &end_iter);
+
+ /* Insert pre-entered text if needed */
+ if(insert)
+ gtk_text_buffer_insert(buffer, &end_iter, inserttext, -1);
+
+ /* Scroll to input point */
+ gtk_text_view_scroll_mark_onscreen(GTK_TEXT_VIEW(win->widget), input_position);
+
+ gtk_text_view_set_editable(GTK_TEXT_VIEW(win->widget), TRUE);
+ g_signal_handler_unblock(buffer, win->insert_text_handler);
}
/**
g_return_if_fail(buf);
g_return_if_fail(win->input_request_type == INPUT_REQUEST_NONE);
g_return_if_fail(win->type != wintype_TextBuffer || win->type != wintype_TextGrid);
+ g_return_if_fail(initlen <= maxlen);
win->input_request_type = INPUT_REQUEST_LINE;
win->line_input_buffer = buf;
win->line_input_buffer_max_len = maxlen;
gchar *inserttext = (initlen > 0)? g_strndup(buf, initlen) : g_strdup("");
- request_line_event_common(win, (initlen > 0), inserttext);
+ switch(win->type)
+ {
+ case wintype_TextBuffer:
+ text_buffer_request_line_event_common(win, maxlen, (initlen > 0), inserttext);
+ break;
+ case wintype_TextGrid:
+ text_grid_request_line_event_common(win, maxlen, (initlen > 0), inserttext);
+ break;
+ default:
+ g_assert_not_reached();
+ }
g_free(inserttext);
}
if(utf8 == NULL)
{
- error_dialog(NULL, error, "Error during unicode->utf8 conversion: ");
+ g_warning("Error during unicode->utf8 conversion: %s", error->message);
return;
}
}
else
utf8 = g_strdup("");
- request_line_event_common(win, (initlen > 0), utf8);
+ switch(win->type)
+ {
+ case wintype_TextBuffer:
+ text_buffer_request_line_event_common(win, maxlen, (initlen > 0), utf8);
+ break;
+ case wintype_TextGrid:
+ text_grid_request_line_event_common(win, maxlen, (initlen > 0), utf8);
+ break;
+ default:
+ g_assert_not_reached();
+ }
g_free(utf8);
}
-/* Internal function: Callback for signal key-press-event on a text buffer
-window. */
+/* Internal function: Callback for signal key-press-event on a text buffer or text grid window. */
gboolean
on_window_key_press_event(GtkWidget *widget, GdkEventKey *event, winid_t win)
-{
+{
if(win->input_request_type != INPUT_REQUEST_CHARACTER &&
win->input_request_type != INPUT_REQUEST_CHARACTER_UNICODE)
return FALSE;
return TRUE;
}
-/* Internal function: Callback for signal insert-text on a text buffer window.
-Not used; cannot modify the text buffer from within the callback?? Segfault! */
-/*void
-on_window_insert_text(GtkTextBuffer *textbuffer, GtkTextIter *location, gchar *text, gint len, gpointer user_data)
+/* Internal function: finish handling a line input request, for both text grid and text buffer windows. */
+static void
+end_line_input_request(winid_t win, gchar *inserted_text)
{
- gchar *newline_pos = strchr(text, '\n');
- if(newline_pos != NULL) {
- printf("position: %d\n", newline_pos-text);
- *newline_pos = 'a';
- }
-}*/
+ /* Convert the string from UTF-8 to Latin-1 or Unicode */
+ if(win->input_request_type == INPUT_REQUEST_LINE)
+ {
+ GError *error = NULL;
+ gchar *latin1;
+ gsize bytes_written;
+ latin1 = g_convert_with_fallback(inserted_text, -1, "ISO-8859-1", "UTF-8", "?", NULL, &bytes_written, &error);
+
+ if(latin1 == NULL)
+ {
+ g_warning("Error during utf8->latin1 conversion: %s", error->message);
+ event_throw(evtype_LineInput, win, 0, 0);
+ return;
+ }
+
+ /* Place input in the echo stream */
+ if(win->echo_stream != NULL)
+ glk_put_string_stream(win->echo_stream, latin1);
+
+ /* Copy the string (but not the NULL at the end) */
+ int copycount = MIN(win->line_input_buffer_max_len, bytes_written - 1);
+ memcpy(win->line_input_buffer, latin1, copycount);
+ g_free(latin1);
+ event_throw(evtype_LineInput, win, copycount, 0);
+ }
+ else if(win->input_request_type == INPUT_REQUEST_LINE_UNICODE)
+ {
+ gunichar *unicode;
+ glong items_written;
+ unicode = g_utf8_to_ucs4_fast(inserted_text, -1, &items_written);
+
+ if(unicode == NULL)
+ {
+ g_warning("Error during utf8->unicode conversion");
+ event_throw(evtype_LineInput, win, 0, 0);
+ return;
+ }
+
+ /* Place input in the echo stream */
+ /* TODO: fixme
+ if(win->echo_stream != NULL)
+ glk_put_string_stream_uni(window->echo_stream, unicode);*/
+
+ /* Copy the string (but not the NULL at the end) */
+ int copycount = MIN(win->line_input_buffer_max_len, items_written);
+ memcpy(win->line_input_buffer_unicode, unicode, copycount * sizeof(gunichar));
+ g_free(unicode);
+ event_throw(evtype_LineInput, win, copycount, 0);
+ }
+ else
+ g_warning("%s: Wrong input request type.", __func__);
+
+ win->input_request_type = INPUT_REQUEST_NONE;
+}
+
+/* Internal function: calculate the bounds of the line input field of a text grid window. Fill them into start_iter and end_iter */
+static void
+text_grid_get_line_input_bounds(winid_t win, GtkTextIter *start_iter, GtkTextIter *end_iter)
+{
+ GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(win->widget) );
+ /* "cursor_position" is the Glk output cursor position, which is also the position of the start of the line input buffer */
+ GtkTextMark *input_start = gtk_text_buffer_get_mark(buffer, "cursor_position");
+ gtk_text_buffer_get_iter_at_mark(buffer, start_iter, input_start);
+ gint startpos = gtk_text_iter_get_line_offset(start_iter);
+ gint input_length = MIN(win->width - startpos, win->line_input_buffer_max_len);
+ *end_iter = *start_iter;
+ gtk_text_iter_set_line_offset(end_iter, startpos + input_length);
+}
+
+/* Internal function: Retag the input field bounds */
+static void
+text_grid_retag_line_input_bounds(winid_t win)
+{
+ GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(win->widget) );
+ GtkTextIter start, end, input_start, input_end;
+ text_grid_get_line_input_bounds(win, &input_start, &input_end);
+ gtk_text_buffer_get_start_iter(buffer, &start);
+ gtk_text_buffer_get_end_iter(buffer, &end);
+ gtk_text_buffer_remove_tag_by_name(buffer, "input_field", &start, &end);
+ gtk_text_buffer_apply_tag_by_name(buffer, "input_field", &input_start, &input_end);
+}
+
+/* Internal function: Callback for signal key-press-event on a text grid window. Only unblocked during line input, so that we can catch all the keys that have different functions in text grid line input, before they mess up the window. */
+gboolean
+on_text_grid_key_press_event(GtkWidget *widget, GdkEventKey *event, winid_t win)
+{
+ g_return_val_if_fail(win->type == wintype_TextGrid, FALSE);
+ g_return_val_if_fail(win->input_request_type == INPUT_REQUEST_LINE || win->input_request_type == INPUT_REQUEST_LINE_UNICODE, FALSE);
+
+ GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(win->widget) );
+
+ switch(event->keyval) {
+ /* Backspace deletes the character before the cursor, moves the characters in the rest of the input field back one, and inserts a space at the end */
+ case GDK_BackSpace:
+ {
+ GtkTextIter insert, bound, input_start, input_end;
+ /* Backspace acts like Delete if there is text selected */
+ if( gtk_text_buffer_get_selection_bounds(buffer, &insert, &bound) )
+ {
+ text_grid_get_line_input_bounds(win, &input_start, &input_end);
+
+ /* Determine whether part of the selected range is in the input field, and if so, what part */
+ gint insert_where = gtk_text_iter_compare(&insert, &input_start);
+ gint bound_where = gtk_text_iter_compare(&bound, &input_start);
+ if(insert_where < 0 && bound_where <= 0)
+ return FALSE;
+ if(insert_where < 0)
+ insert = input_start;
+
+ insert_where = gtk_text_iter_compare(&insert, &input_end);
+ bound_where = gtk_text_iter_compare(&bound, &input_end);
+ if(insert_where >= 0 && bound_where > 0)
+ return FALSE;
+ if(bound_where > 0)
+ bound = input_end;
+
+ /* insert and bound are now within the input field */
+ gsize num_spaces = gtk_text_iter_get_offset(&bound) - gtk_text_iter_get_offset(&insert);
+ gchar *spaces = g_strnfill(num_spaces, ' ');
+ /* Create a temporary mark with right gravity at the end of the input field */
+ GtkTextMark *input_end_mark = gtk_text_buffer_create_mark(buffer, NULL, &input_end, FALSE);
+ gtk_text_buffer_delete(buffer, &insert, &bound);
+ gtk_text_buffer_get_iter_at_mark(buffer, &input_end, input_end_mark);
+ gtk_text_buffer_delete_mark(buffer, input_end_mark);
+ gtk_text_buffer_insert(buffer, &input_end, spaces, -1);
+ g_free(spaces);
+ text_grid_retag_line_input_bounds(win);
+
+ return TRUE;
+ }
+
+ text_grid_get_line_input_bounds(win, &input_start, &input_end);
+ /* if cursor is outside input field, continue as default */
+ if( !gtk_text_iter_in_range(&insert, &input_start, &input_end) )
+ return FALSE;
+ /* if cursor is at start of field, do nothing */
+ if( gtk_text_iter_equal(&insert, &input_start) )
+ return TRUE;
+ gtk_text_iter_backward_cursor_position(&insert);
+ /* Create a temporary mark with right gravity at the end of the input field */
+ GtkTextMark *input_end_mark = gtk_text_buffer_create_mark(buffer, NULL, &input_end, FALSE);
+ gtk_text_buffer_delete(buffer, &insert, &bound);
+ /* Revalidate end iterator */
+ gtk_text_buffer_get_iter_at_mark(buffer, &input_end, input_end_mark);
+ gtk_text_buffer_delete_mark(buffer, input_end_mark);
+ gtk_text_buffer_insert(buffer, &input_end, " ", -1);
+ text_grid_retag_line_input_bounds(win);
+ }
+ return TRUE;
+
+ /* Various forms of Enter */
+ case GDK_Linefeed:
+ case GDK_Return:
+ case GDK_KP_Enter:
+ {
+ GtkTextIter input_start, input_end, start, end;
+ g_signal_handler_block(GTK_TEXT_VIEW(win->widget), win->insert_text_handler);
+
+ /* Get the input text */
+ text_grid_get_line_input_bounds(win, &input_start, &input_end);
+ gtk_text_iter_forward_char(&input_end);
+ gchar *inserted_text = g_strchomp( gtk_text_buffer_get_text(buffer, &input_start, &input_end, FALSE) );
+
+ /* Make the buffer uneditable again and remove the special tags */
+ gtk_text_view_set_editable(GTK_TEXT_VIEW(win->widget), FALSE);
+ gtk_text_buffer_get_start_iter(buffer, &start);
+ gtk_text_buffer_get_end_iter(buffer, &end);
+ gtk_text_buffer_remove_tag_by_name(buffer, "input_field", &start, &end);
+
+ end_line_input_request(win, inserted_text);
+ g_free(inserted_text);
+
+ /* Block the enter key */
+ return TRUE;
+ }
+ }
+ return FALSE;
+}
/* Internal function: Callback for signal insert-text on a text buffer window.
Runs after the default handler has already inserted the text.*/
after_window_insert_text(GtkTextBuffer *textbuffer, GtkTextIter *location, gchar *text, gint len, winid_t win)
{
if( strchr(text, '\n') != NULL )
- {
- /* Make the window uneditable again and remove signal handlers */
+ {
+ /* Remove signal handlers */
GtkTextBuffer *window_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(win->widget) );
- gtk_text_view_set_editable(GTK_TEXT_VIEW(win->widget), FALSE);
g_signal_handler_block(window_buffer, win->insert_text_handler);
+
+ /* Make the window uneditable again and retrieve the text that was input */
+ gchar *inserted_text;
+ GtkTextIter start_iter, end_iter;
- /* Retrieve the text that was input */
- GtkTextMark *input_position = gtk_text_buffer_get_mark(window_buffer, "input_position");
- GtkTextIter start_iter;
- GtkTextIter end_iter;
- gtk_text_buffer_get_iter_at_mark(window_buffer, &start_iter, input_position);
- gtk_text_buffer_get_end_iter(window_buffer, &end_iter);
- gchar *inserted_text = gtk_text_buffer_get_text(window_buffer, &start_iter, &end_iter, FALSE);
-
- /* Convert the string from UTF-8 to Latin-1 or Unicode */
- if(win->input_request_type == INPUT_REQUEST_LINE)
- {
- GError *error = NULL;
- gchar *latin1;
- gsize bytes_written;
- latin1 = g_convert_with_fallback(inserted_text, -1, "ISO-8859-1", "UTF-8", "?", NULL, &bytes_written, &error);
- g_free(inserted_text);
-
- if(latin1 == NULL)
- {
- error_dialog(NULL, error, "Error during utf8->latin1 conversion: ");
- event_throw(evtype_LineInput, win, 0, 0);
- return;
- }
-
- /* Place input in the echo stream */
- if(win->echo_stream != NULL)
- glk_put_string_stream(win->echo_stream, latin1);
-
- /* Copy the string (but not the NULL at the end) */
- int copycount = MIN(win->line_input_buffer_max_len, bytes_written - 1);
- memcpy(win->line_input_buffer, latin1, copycount);
- g_free(latin1);
- event_throw(evtype_LineInput, win, copycount, 0);
- }
- else if(win->input_request_type == INPUT_REQUEST_LINE_UNICODE)
- {
- gunichar *unicode;
- glong items_written;
- unicode = g_utf8_to_ucs4_fast(inserted_text, -1, &items_written);
- g_free(inserted_text);
-
- if(unicode == NULL)
- {
- error_dialog(NULL, NULL, "Error during utf8->unicode conversion");
- event_throw(evtype_LineInput, win, 0, 0);
- return;
- }
-
- /* Place input in the echo stream */
- /* TODO: fixme
- if(win->echo_stream != NULL)
- glk_put_string_stream_uni(window->echo_stream, unicode);*/
-
- /* Copy the string (but not the NULL at the end) */
- int copycount = MIN(win->line_input_buffer_max_len, items_written);
- memcpy(win->line_input_buffer_unicode, unicode, copycount * sizeof(gunichar));
- g_free(unicode);
- event_throw(evtype_LineInput, win, copycount, 0);
- }
- else
- g_warning("%s: Wrong input request type.", __func__);
+ gtk_text_view_set_editable(GTK_TEXT_VIEW(win->widget), FALSE);
+ GtkTextMark *input_position = gtk_text_buffer_get_mark(window_buffer, "input_position");
+ gtk_text_buffer_get_iter_at_mark(window_buffer, &start_iter, input_position);
+ gtk_text_buffer_get_end_iter(window_buffer, &end_iter);
+
+ inserted_text = gtk_text_buffer_get_text(window_buffer, &start_iter, &end_iter, FALSE);
- win->input_request_type = INPUT_REQUEST_NONE;
+ end_line_input_request(win, inserted_text);
+ g_free(inserted_text);
}
}
projects / rodin / chimara.git / blobdiff