From 238e7a2bb961eb448dee1542e03cbdb84dea027d Mon Sep 17 00:00:00 2001 From: Přemysl Eric Janouch Date: Sun, 11 Jun 2023 16:18:21 +0200 Subject: Merge TUI and GUI binaries, using a new name The appropriate interface will be chosen automatically. --- src/query-tool.c | 2 +- src/sdgui.c | 604 ------------- src/sdtui.c | 2531 ------------------------------------------------------ src/tdv-gui.c | 576 +++++++++++++ src/tdv-tui.c | 2486 +++++++++++++++++++++++++++++++++++++++++++++++++++++ src/tdv.c | 98 +++ 6 files changed, 3161 insertions(+), 3136 deletions(-) delete mode 100644 src/sdgui.c delete mode 100644 src/sdtui.c create mode 100644 src/tdv-gui.c create mode 100644 src/tdv-tui.c create mode 100644 src/tdv.c (limited to 'src') diff --git a/src/query-tool.c b/src/query-tool.c index 825bada..6cfdc66 100644 --- a/src/query-tool.c +++ b/src/query-tool.c @@ -6,7 +6,7 @@ * finalised with an empty line. Newlines are escaped with `\n', * backslashes with `\\'. * - * So far only the `m', `g`, and `x` fields are supported, as in sdtui. + * So far only the `m', `g`, and `x` fields are supported, as in tdv. * * Copyright (c) 2013 - 2021, Přemysl Eric Janouch * diff --git a/src/sdgui.c b/src/sdgui.c deleted file mode 100644 index 993d1f5..0000000 --- a/src/sdgui.c +++ /dev/null @@ -1,604 +0,0 @@ -/* - * StarDict GTK+ UI - * - * Copyright (c) 2020 - 2022, Přemysl Eric Janouch - * - * Permission to use, copy, modify, and/or distribute this software for any - * purpose with or without fee is hereby granted. - * - * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES - * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF - * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY - * SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES - * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION - * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN - * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. - * - */ - -#include -#include - -#include -#include - -#include "config.h" -#include "stardict.h" -#include "utils.h" -#include "stardict-view.h" - -#undef PROJECT_NAME -#define PROJECT_NAME "sdgui" - -static struct -{ - GtkWidget *window; ///< Top-level window - GtkWidget *notebook; ///< Notebook with tabs - GtkWidget *hamburger; ///< Hamburger menu - GtkWidget *entry; ///< Search entry widget - GtkWidget *view; ///< Entries view - - gint dictionary; ///< Index of the current dictionary - gint last; ///< The last dictionary index - GPtrArray *dictionaries; ///< All open dictionaries - - gboolean loading; ///< Dictionaries are being loaded - - gboolean watch_selection; ///< Following X11 PRIMARY? -} -g; - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -static void -load_from_filenames (GPtrArray *out, gchar **filenames) -{ - for (gsize i = 0; filenames[i]; i++) - { - Dictionary *dict = g_malloc0 (sizeof *dict); - dict->filename = g_strdup (filenames[i]); - g_ptr_array_add (out, dict); - } -} - -// TODO: try to deduplicate, similar to app_load_config_values() -static gboolean -load_from_key_file (GPtrArray *out, GKeyFile *kf, GError **error) -{ - const gchar *dictionaries = "Dictionaries"; - gchar **names = g_key_file_get_keys (kf, dictionaries, NULL, NULL); - if (!names) - return TRUE; - - for (gsize i = 0; names[i]; i++) - { - Dictionary *dict = g_malloc0 (sizeof *dict); - dict->name = names[i]; - g_ptr_array_add (out, dict); - } - g_free (names); - - for (gsize i = 0; i < out->len; i++) - { - Dictionary *dict = g_ptr_array_index (out, i); - gchar *path = - g_key_file_get_string (kf, dictionaries, dict->name, error); - if (!path) - return FALSE; - - // Try to resolve relative paths and expand tildes - if (!(dict->filename = - resolve_filename (path, resolve_relative_config_filename))) - dict->filename = path; - else - g_free (path); - } - return TRUE; -} - -static gboolean -load_from_config (GPtrArray *out, GError **error) -{ - GKeyFile *key_file = load_project_config_file (error); - if (!key_file) - return FALSE; - - gboolean result = load_from_key_file (out, key_file, error); - g_key_file_free (key_file); - return result; -} - -static void -search (Dictionary *dict) -{ - GtkEntryBuffer *buf = gtk_entry_get_buffer (GTK_ENTRY (g.entry)); - const gchar *input_utf8 = gtk_entry_buffer_get_text (buf); - if (!dict->dict) - return; - - StardictIterator *iterator = - stardict_dict_search (dict->dict, input_utf8, NULL); - stardict_view_set_position (STARDICT_VIEW (g.view), - dict->dict, stardict_iterator_get_offset (iterator)); - g_object_unref (iterator); - - stardict_view_set_matched (STARDICT_VIEW (g.view), input_utf8); -} - -static void -on_changed (G_GNUC_UNUSED GtkWidget *widget, G_GNUC_UNUSED gpointer data) -{ - search (g_ptr_array_index (g.dictionaries, g.dictionary)); -} - -static void -on_send (G_GNUC_UNUSED StardictView *view, - const char *word, G_GNUC_UNUSED gpointer data) -{ - GtkEntryBuffer *buf = gtk_entry_get_buffer (GTK_ENTRY (g.entry)); - gtk_entry_buffer_set_text (buf, word, -1); - gtk_editable_select_region (GTK_EDITABLE (g.entry), 0, -1); -} - -static void -on_selection_received (G_GNUC_UNUSED GtkClipboard *clipboard, const gchar *text, - G_GNUC_UNUSED gpointer data) -{ - if (!text) - return; - - gchar *trimmed = g_strstrip (g_strdup (text)); - gtk_entry_set_text (GTK_ENTRY (g.entry), trimmed); - g_free (trimmed); - g_signal_emit_by_name (g.entry, - "move-cursor", GTK_MOVEMENT_BUFFER_ENDS, 1, FALSE); -} - -static void -on_selection (GtkClipboard *clipboard, GdkEvent *event, - G_GNUC_UNUSED gpointer data) -{ - if (g.watch_selection - && !gtk_window_has_toplevel_focus (GTK_WINDOW (g.window)) - && event->owner_change.owner != NULL) - gtk_clipboard_request_text (clipboard, on_selection_received, NULL); -} - -static void -on_selection_watch_toggle (GtkCheckMenuItem *item, G_GNUC_UNUSED gpointer data) -{ - g.watch_selection = gtk_check_menu_item_get_active (item); -} - -static void -on_switch_page (G_GNUC_UNUSED GtkWidget *widget, G_GNUC_UNUSED GtkWidget *page, - guint page_num, G_GNUC_UNUSED gpointer data) -{ - g.last = g.dictionary; - g.dictionary = page_num; - search (g_ptr_array_index (g.dictionaries, g.dictionary)); - - // Hack: Make right-clicking notebook arrows also re-focus the entry. - GdkEvent *event = gtk_get_current_event (); - if (event && event->type == GDK_BUTTON_PRESS) - gtk_widget_grab_focus (g.entry); -} - -static gboolean -accelerate_hamburger (GdkEvent *event) -{ - gchar *accelerator = NULL; - g_object_get (gtk_widget_get_settings (g.window), "gtk-menu-bar-accel", - &accelerator, NULL); - if (!accelerator) - return FALSE; - - guint key = 0; - GdkModifierType mods = 0; - gtk_accelerator_parse (accelerator, &key, &mods); - g_free (accelerator); - - guint mask = gtk_accelerator_get_default_mod_mask (); - if (!key || event->key.keyval != key || (event->key.state & mask) != mods) - return FALSE; - - gtk_button_clicked (GTK_BUTTON (g.hamburger)); - return TRUE; -} - -static gboolean -on_key_press (G_GNUC_UNUSED GtkWidget *widget, GdkEvent *event, - G_GNUC_UNUSED gpointer data) -{ - // The "activate" signal of the GtkMenuButton cannot be used - // from a real accelerator, due to "no trigger event for menu popup". - if (accelerate_hamburger (event)) - return TRUE; - - GtkNotebook *notebook = GTK_NOTEBOOK (g.notebook); - guint mods = event->key.state & gtk_accelerator_get_default_mod_mask (); - if (mods == GDK_CONTROL_MASK) - { - // Can't use gtk_widget_add_accelerator() to change-current-page(-1/+1) - // because that signal has arguments, which cannot be passed. - gint current = gtk_notebook_get_current_page (notebook); - if (event->key.keyval == GDK_KEY_Page_Up) - return gtk_notebook_set_current_page (notebook, --current), TRUE; - if (event->key.keyval == GDK_KEY_Page_Down) - return gtk_notebook_set_current_page (notebook, - ++current % gtk_notebook_get_n_pages (notebook)), TRUE; - } - if (mods == GDK_MOD1_MASK) - { - if (event->key.keyval >= GDK_KEY_0 - && event->key.keyval <= GDK_KEY_9) - { - gint n = event->key.keyval - GDK_KEY_0; - gtk_notebook_set_current_page (notebook, (n ? n : 10) - 1); - return TRUE; - } - if (event->key.keyval == GDK_KEY_Tab) - { - gtk_notebook_set_current_page (notebook, g.last); - return TRUE; - } - } - if (mods == 0) - { - StardictView *view = STARDICT_VIEW (g.view); - if (event->key.keyval == GDK_KEY_Page_Up) - return stardict_view_scroll (view, GTK_SCROLL_PAGES, -0.5), TRUE; - if (event->key.keyval == GDK_KEY_Page_Down) - return stardict_view_scroll (view, GTK_SCROLL_PAGES, +0.5), TRUE; - if (event->key.keyval == GDK_KEY_Up) - return stardict_view_scroll (view, GTK_SCROLL_STEPS, -1), TRUE; - if (event->key.keyval == GDK_KEY_Down) - return stardict_view_scroll (view, GTK_SCROLL_STEPS, +1), TRUE; - } - return FALSE; -} - -static gboolean -on_tab_focus (G_GNUC_UNUSED GtkWidget *widget, - G_GNUC_UNUSED GtkDirectionType direction, G_GNUC_UNUSED gpointer user_data) -{ - // Hack: Make it so that tab headers don't retain newly gained focus - // when clicked, re-focus the entry instead. - GdkEvent *event = gtk_get_current_event (); - if (!event || event->type != GDK_BUTTON_PRESS - || event->button.button != GDK_BUTTON_PRIMARY) - return FALSE; - - gtk_widget_grab_focus (g.entry); - return TRUE; -} - -static void -init_tabs (void) -{ - for (gsize i = g.dictionaries->len; i--; ) - { - Dictionary *dict = g_ptr_array_index (g.dictionaries, i); - GtkWidget *dummy = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0); - g_signal_connect (dummy, "focus", G_CALLBACK (on_tab_focus), NULL); - GtkWidget *label = gtk_label_new (dict->name); - gtk_notebook_insert_page (GTK_NOTEBOOK (g.notebook), dummy, label, 0); - } - - gtk_widget_show_all (g.notebook); - gtk_widget_grab_focus (g.entry); -} - -static void -show_error_dialog (GError *error) -{ - GtkWidget *dialog = gtk_message_dialog_new (GTK_WINDOW (g.window), 0, - GTK_MESSAGE_ERROR, GTK_BUTTONS_CLOSE, "%s", error->message); - gtk_dialog_run (GTK_DIALOG (dialog)); - gtk_widget_destroy (dialog); - g_error_free (error); -} - -static void -on_new_dictionaries_loaded (G_GNUC_UNUSED GObject* source_object, - GAsyncResult* res, G_GNUC_UNUSED gpointer user_data) -{ - g.loading = FALSE; - - GError *error = NULL; - GPtrArray *new_dictionaries = - g_task_propagate_pointer (G_TASK (res), &error); - if (!new_dictionaries) - { - show_error_dialog (error); - return; - } - - while (gtk_notebook_get_n_pages (GTK_NOTEBOOK (g.notebook))) - gtk_notebook_remove_page (GTK_NOTEBOOK (g.notebook), -1); - - g.dictionary = -1; - if (g.dictionaries) - g_ptr_array_free (g.dictionaries, TRUE); - - stardict_view_set_position (STARDICT_VIEW (g.view), NULL, 0); - g.dictionaries = new_dictionaries; - init_tabs (); -} - -static void -on_reload_dictionaries_task (GTask *task, G_GNUC_UNUSED gpointer source_object, - gpointer task_data, G_GNUC_UNUSED GCancellable *cancellable) -{ - GError *error = NULL; - if (load_dictionaries (task_data, &error)) - { - g_task_return_pointer (task, - g_ptr_array_ref (task_data), (GDestroyNotify) g_ptr_array_unref); - } - else - g_task_return_error (task, error); -} - -static gboolean -reload_dictionaries (GPtrArray *new_dictionaries, GError **error) -{ - // TODO: We could cancel that task. - if (g.loading) - { - g_set_error (error, G_IO_ERROR, G_IO_ERROR_FAILED, - "already loading dictionaries"); - return FALSE; - } - - // TODO: Some other kind of indication. - // Note that "action widgets" aren't visible without GtkNotebook tabs. - g.loading = TRUE; - - GTask *task = g_task_new (NULL, NULL, on_new_dictionaries_loaded, NULL); - g_task_set_name (task, __func__); - g_task_set_task_data (task, - new_dictionaries, (GDestroyNotify) g_ptr_array_unref); - g_task_run_in_thread (task, on_reload_dictionaries_task); - g_object_unref (task); - return TRUE; -} - -static void -on_open (G_GNUC_UNUSED GtkMenuItem *item, G_GNUC_UNUSED gpointer data) -{ - // The default is local-only. Paths are returned absolute. - GtkWidget *dialog = gtk_file_chooser_dialog_new (_("Open dictionary"), - GTK_WINDOW (g.window), GTK_FILE_CHOOSER_ACTION_OPEN, - _("_Cancel"), GTK_RESPONSE_CANCEL, - _("_Open"), GTK_RESPONSE_ACCEPT, NULL); - - GtkFileFilter *filter = gtk_file_filter_new (); - gtk_file_filter_add_pattern (filter, "*.ifo"); - gtk_file_filter_set_name (filter, "*.ifo"); - GtkFileChooser *chooser = GTK_FILE_CHOOSER (dialog); - gtk_file_chooser_add_filter (chooser, filter); - gtk_file_chooser_set_select_multiple (chooser, TRUE); - - GPtrArray *new_dictionaries = - g_ptr_array_new_with_free_func ((GDestroyNotify) dictionary_destroy); - if (gtk_dialog_run (GTK_DIALOG (dialog)) == GTK_RESPONSE_ACCEPT) - { - GSList *paths = gtk_file_chooser_get_filenames (chooser); - for (GSList *iter = paths; iter; iter = iter->next) - { - Dictionary *dict = g_malloc0 (sizeof *dict); - dict->filename = iter->data; - g_ptr_array_add (new_dictionaries, dict); - } - g_slist_free (paths); - } - - gtk_widget_destroy (dialog); - - GError *error = NULL; - if (!new_dictionaries->len - || !reload_dictionaries (new_dictionaries, &error)) - g_ptr_array_free (new_dictionaries, TRUE); - - if (error) - show_error_dialog (error); -} - -static void -on_drag_data_received (G_GNUC_UNUSED GtkWidget *widget, GdkDragContext *context, - G_GNUC_UNUSED gint x, G_GNUC_UNUSED gint y, GtkSelectionData *data, - G_GNUC_UNUSED guint info, guint time, G_GNUC_UNUSED gpointer user_data) -{ - GError *error = NULL; - gchar **dropped_uris = gtk_selection_data_get_uris (data); - if (!dropped_uris) - return; - - GPtrArray *new_dictionaries = - g_ptr_array_new_with_free_func ((GDestroyNotify) dictionary_destroy); - for (gsize i = 0; !error && dropped_uris[i]; i++) - { - Dictionary *dict = g_malloc0 (sizeof *dict); - dict->filename = g_filename_from_uri (dropped_uris[i], NULL, &error); - g_ptr_array_add (new_dictionaries, dict); - } - - g_strfreev (dropped_uris); - if (!new_dictionaries->len - || !reload_dictionaries (new_dictionaries, &error)) - g_ptr_array_free (new_dictionaries, TRUE); - - gtk_drag_finish (context, error == NULL, FALSE, time); - - if (error) - show_error_dialog (error); -} - -static void -on_destroy (G_GNUC_UNUSED GtkWidget *widget, G_GNUC_UNUSED gpointer data) -{ - gtk_main_quit (); -} - -static void -die_with_dialog (const gchar *message) -{ - GtkWidget *dialog = gtk_message_dialog_new (NULL, 0, - GTK_MESSAGE_ERROR, GTK_BUTTONS_CLOSE, "%s", message); - gtk_dialog_run (GTK_DIALOG (dialog)); - gtk_widget_destroy (dialog); - exit (EXIT_FAILURE); -} - -int -main (int argc, char *argv[]) -{ - if (!setlocale (LC_ALL, "")) - g_printerr ("%s: %s\n", _("Warning"), _("failed to set the locale")); - - bindtextdomain (GETTEXT_PACKAGE, GETTEXT_DIRNAME); - bind_textdomain_codeset (GETTEXT_PACKAGE, "UTF-8"); - textdomain (GETTEXT_PACKAGE); - - gchar **filenames = NULL; - GOptionEntry option_entries[] = - { - {G_OPTION_REMAINING, 0, 0, G_OPTION_ARG_FILENAME_ARRAY, &filenames, - NULL, N_("[FILE]...")}, - {}, - }; - - GError *error = NULL; - gtk_init_with_args (&argc, &argv, N_("- StarDict GTK+ UI"), - option_entries, GETTEXT_PACKAGE, &error); - if (error) - { - g_warning ("%s", error->message); - g_error_free (error); - return 1; - } - - gtk_window_set_default_icon_name (PROJECT_NAME); - - GPtrArray *new_dictionaries = - g_ptr_array_new_with_free_func ((GDestroyNotify) dictionary_destroy); - if (filenames) - { - load_from_filenames (new_dictionaries, filenames); - g_strfreev (filenames); - } - else if (!load_from_config (new_dictionaries, &error) && error) - die_with_dialog (error->message); - - if (!new_dictionaries->len) - die_with_dialog (_("No dictionaries found either in " - "the configuration or on the command line")); - - // Some Adwaita stupidity, plus defaults for our own widget. - // All the named colours have been there since GNOME 3.4 - // (see gnome-extra-themes git history, Adwaita used to live there). - const char *style = "notebook header tab { padding: 2px 8px; margin: 0; }" - // `gsettings set org.gnome.desktop.interface gtk-key-theme "Emacs"` - // isn't quite what I want, and note that ^U works by default - "@binding-set Readline {" - "bind 'H' { 'delete-from-cursor' (chars, -1) };" - "bind 'W' { 'delete-from-cursor' (word-ends, -1) }; }" - "entry { -gtk-key-bindings: Readline; border-radius: 0; }" - "stardict-view { padding: 0 .25em; }" - "stardict-view.odd {" - "background: @theme_base_color; " - "color: @theme_text_color; }" - "stardict-view.odd:backdrop {" - "background: @theme_unfocused_base_color; " - "color: @theme_fg_color; /* should be more faded than 'text' */ }" - "stardict-view.even {" - "background: mix(@theme_base_color, @theme_text_color, 0.03); " - "color: @theme_text_color; }" - "stardict-view.even:backdrop {" - "background: mix(@theme_unfocused_base_color, " - "@theme_fg_color, 0.03); " - "color: @theme_fg_color; /* should be more faded than 'text' */ }" - "stardict-view:selected {" - "background-color: @theme_selected_bg_color; " - "color: @theme_selected_fg_color; }"; - - GdkScreen *screen = gdk_screen_get_default (); - GtkCssProvider *provider = gtk_css_provider_new (); - gtk_css_provider_load_from_data (provider, style, strlen (style), NULL); - gtk_style_context_add_provider_for_screen (screen, - GTK_STYLE_PROVIDER (provider), GTK_STYLE_PROVIDER_PRIORITY_APPLICATION); - - GtkWidget *item_open = gtk_menu_item_new_with_mnemonic (_("_Open...")); - g_signal_connect (item_open, "activate", G_CALLBACK (on_open), NULL); - - g.watch_selection = TRUE; - GtkWidget *item_selection = - gtk_check_menu_item_new_with_mnemonic (_("_Follow selection")); - gtk_check_menu_item_set_active - (GTK_CHECK_MENU_ITEM (item_selection), g.watch_selection); - g_signal_connect (item_selection, "toggled", - G_CALLBACK (on_selection_watch_toggle), NULL); - - GtkWidget *menu = gtk_menu_new (); - gtk_widget_set_halign (menu, GTK_ALIGN_END); - gtk_menu_shell_append (GTK_MENU_SHELL (menu), item_open); -#ifndef G_OS_WIN32 - gtk_menu_shell_append (GTK_MENU_SHELL (menu), item_selection); -#endif // ! G_OS_WIN32 - gtk_widget_show_all (menu); - - g.hamburger = gtk_menu_button_new (); - gtk_button_set_relief (GTK_BUTTON (g.hamburger), GTK_RELIEF_NONE); - gtk_button_set_image (GTK_BUTTON (g.hamburger), gtk_image_new_from_icon_name - ("open-menu-symbolic", GTK_ICON_SIZE_BUTTON)); - gtk_menu_button_set_popup (GTK_MENU_BUTTON (g.hamburger), menu); - gtk_widget_show (g.hamburger); - - g.notebook = gtk_notebook_new (); - g_signal_connect (g.notebook, "switch-page", - G_CALLBACK (on_switch_page), NULL); - gtk_notebook_set_scrollable (GTK_NOTEBOOK (g.notebook), TRUE); - gtk_notebook_set_action_widget - (GTK_NOTEBOOK (g.notebook), g.hamburger, GTK_PACK_END); - - g.entry = gtk_search_entry_new (); - g_signal_connect (g.entry, "changed", G_CALLBACK (on_changed), g.view); - - g.window = gtk_window_new (GTK_WINDOW_TOPLEVEL); - gtk_window_set_title (GTK_WINDOW (g.window), PROJECT_NAME); - gtk_window_set_default_size (GTK_WINDOW (g.window), 300, 600); - g_signal_connect (g.window, "destroy", - G_CALLBACK (on_destroy), NULL); - g_signal_connect (g.window, "key-press-event", - G_CALLBACK (on_key_press), NULL); - - GtkWidget *superbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 1); - gtk_container_add (GTK_CONTAINER (g.window), superbox); - gtk_container_add (GTK_CONTAINER (superbox), g.notebook); - gtk_container_add (GTK_CONTAINER (superbox), g.entry); - gtk_container_add (GTK_CONTAINER (superbox), - gtk_separator_new (GTK_ORIENTATION_HORIZONTAL)); - - g.view = stardict_view_new (); - gtk_box_pack_end (GTK_BOX (superbox), g.view, TRUE, TRUE, 0); - - GtkClipboard *clipboard = gtk_clipboard_get (GDK_SELECTION_PRIMARY); - g_signal_connect (clipboard, "owner-change", - G_CALLBACK (on_selection), NULL); - - gtk_drag_dest_set (g.view, - GTK_DEST_DEFAULT_ALL, NULL, 0, GDK_ACTION_COPY); - gtk_drag_dest_add_uri_targets (g.view); - g_signal_connect (g.view, "drag-data-received", - G_CALLBACK (on_drag_data_received), NULL); - g_signal_connect (g.view, "send", - G_CALLBACK (on_send), NULL); - - if (!reload_dictionaries (new_dictionaries, &error)) - die_with_dialog (error->message); - - gtk_widget_show_all (g.window); - gtk_main (); - return 0; -} diff --git a/src/sdtui.c b/src/sdtui.c deleted file mode 100644 index c078f1a..0000000 --- a/src/sdtui.c +++ /dev/null @@ -1,2531 +0,0 @@ -/* - * StarDict terminal UI - * - * Copyright (c) 2013 - 2022, Přemysl Eric Janouch - * - * Permission to use, copy, modify, and/or distribute this software for any - * purpose with or without fee is hereby granted. - * - * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES - * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF - * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY - * SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES - * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION - * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN - * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. - * - */ - -#include -#include -#include -#include -#include -#include - -#include -#include -#include -#include -#include - -#include -#include -#include -#include - -#include // input -#include // output -#include -#include - -#include "config.h" -#include "stardict.h" -#include "utils.h" - -#define CTRL_KEY(x) ((x) - 'A' + 1) - -#define TOP_BAR_CUTOFF 2 ///< How many lines are reserved on top -#define APP_TITLE PROJECT_NAME " " ///< Left top corner - -#ifndef A_ITALIC -#define A_ITALIC 0 -#endif - -// --- Utilities --------------------------------------------------------------- - -static size_t -unichar_width (gunichar ch) -{ - if (g_unichar_iszerowidth (ch)) - return 0; - return 1 + g_unichar_iswide (ch); -} - -void -update_curses_terminal_size (void) -{ -#if defined HAVE_RESIZETERM && defined TIOCGWINSZ - struct winsize size; - if (!ioctl (STDOUT_FILENO, TIOCGWINSZ, (char *) &size)) - { - char *row = getenv ("LINES"); - char *col = getenv ("COLUMNS"); - unsigned long tmp; - resizeterm ( - (row && xstrtoul (&tmp, row, 10)) ? tmp : size.ws_row, - (col && xstrtoul (&tmp, col, 10)) ? tmp : size.ws_col); - } -#else // HAVE_RESIZETERM && TIOCGWINSZ - // The standard endwin/refresh sequence makes the terminal flicker. - endwin (); - refresh (); -#endif // HAVE_RESIZETERM && TIOCGWINSZ -} - -static guint -add_read_watch (int fd, GIOFunc func, gpointer user_data) -{ - GIOChannel *channel = g_io_channel_unix_new (fd); - guint res = g_io_add_watch (channel, G_IO_IN, func, user_data); - g_io_channel_unref (channel); - return res; -} - -// --- Application ------------------------------------------------------------- - -#define ATTRIBUTE_TABLE(XX) \ - XX( HEADER, "header", -1, -1, A_REVERSE ) \ - XX( ACTIVE, "header-active", -1, -1, A_UNDERLINE ) \ - XX( SEARCH, "search", -1, -1, A_UNDERLINE ) \ - XX( EVEN, "even", -1, -1, 0 ) \ - XX( ODD, "odd", -1, -1, 0 ) \ - XX( SELECTION, "selection", -1, -1, A_REVERSE ) \ - XX( DEFOCUSED, "defocused", -1, -1, A_REVERSE ) - -enum -{ -#define XX(name, config, fg_, bg_, attrs_) ATTRIBUTE_ ## name, - ATTRIBUTE_TABLE (XX) -#undef XX - ATTRIBUTE_COUNT -}; - -struct attrs -{ - short fg; ///< Foreground color index - short bg; ///< Background color index - chtype attrs; ///< Other attributes -}; - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -/// Data relating to one entry within the dictionary. -typedef struct view_entry ViewEntry; -/// Data relating to a dictionary file. -typedef struct app_dictionary AppDictionary; -/// Encloses application data. -typedef struct application Application; - -struct view_entry -{ - gchar * word; ///< Word - GPtrArray * definitions; ///< Word definition entries (gchar *) - GPtrArray * formatting; ///< chtype * or NULL per definition -}; - -struct app_dictionary -{ - Dictionary super; ///< Superclass - gsize name_width; ///< Visible width of the name -}; - -struct application -{ - GMainLoop * loop; ///< Main loop - termo_t * tk; ///< termo handle - guint tk_timer; ///< termo timeout timer - GIConv ucs4_to_locale; ///< UTF-32 -> locale conversion - gboolean locale_is_utf8; ///< The locale is Unicode - gboolean focused; ///< Whether the terminal has focus - - GPtrArray * dictionaries; ///< All loaded AppDictionaries - - StardictDict * dict; ///< The current dictionary - StardictDict * last; ///< The last dictionary - guint show_help : 1; ///< Whether help can be shown - guint center_search : 1; ///< Whether to center the search - guint underline_last : 1; ///< Underline the last definition - guint hl_prefix : 1; ///< Highlight the common prefix - guint watch_x11_sel : 1; ///< Requested X11 selection watcher - - guint dict_offset; ///< Scroll position of the tab bar - guint32 top_position; ///< Index of the topmost dict. entry - guint top_offset; ///< Offset into the top entry - guint selected; ///< Offset to the selected definition - GPtrArray * entries; ///< ViewEntry-s within the view - - gchar * search_label; ///< Text of the "Search" label - gsize search_label_width; ///< Visible width of "search_label" - GArray * input; ///< The current search input - guint input_pos; ///< Cursor position within input - guint input_offset; ///< Render offset in codepoints - gboolean input_confirmed; ///< Input has been confirmed - - gfloat division; ///< Position of the division column - - struct attrs attrs[ATTRIBUTE_COUNT]; -}; - -/// Shortcuts to retrieve named terminal attributes -#define APP_ATTR(name) self->attrs[ATTRIBUTE_ ## name].attrs -#define APP_ATTR_IF(b, name1, name2) ((b) ? APP_ATTR (name1) : APP_ATTR (name2)) - -/// Returns if the Unicode character is representable in the current locale. -static gboolean -app_is_character_in_locale (Application *self, gunichar ch) -{ - // Avoid the overhead joined with calling iconv() for all characters - if (self->locale_is_utf8) - return TRUE; - - gchar *tmp = g_convert_with_iconv ((const gchar *) &ch, sizeof ch, - self->ucs4_to_locale, NULL, NULL, NULL); - if (!tmp) - return FALSE; - g_free (tmp); - return TRUE; -} - -static gsize -app_char_width (Application *app, gunichar c) -{ - if (!app_is_character_in_locale (app, c)) - return 1; - return unichar_width (c); -} - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -#if !GLIB_CHECK_VERSION(2, 68, 0) -#define g_memdup2 g_memdup -#endif - -/// Splits the entry and adds it to a pointer array. -static void -view_entry_split_add (ViewEntry *ve, const gchar *text, const chtype *attrs) -{ - const gchar *p = text, *nl; - for (; (nl = strchr (p, '\n')); p = nl + 1) - if (nl != p) - { - g_ptr_array_add (ve->definitions, g_strndup (p, nl - p)); - g_ptr_array_add (ve->formatting, !attrs ? NULL - : g_memdup2 (attrs + (p - text), (nl - p) * sizeof *attrs)); - } - if (*p) - { - g_ptr_array_add (ve->definitions, g_strdup (p)); - g_ptr_array_add (ve->formatting, !attrs ? NULL - : g_memdup2 (attrs + (p - text), strlen (p) * sizeof *attrs)); - } -} - -static chtype -app_pango_iterator_to_attrs (PangoAttrIterator *iterator) -{ - chtype attrs = 0; - PangoAttrInt *attr = NULL; - if ((attr = (PangoAttrInt *) pango_attr_iterator_get (iterator, - PANGO_ATTR_WEIGHT)) && attr->value >= PANGO_WEIGHT_BOLD) - attrs |= A_BOLD; - if ((attr = (PangoAttrInt *) pango_attr_iterator_get (iterator, - PANGO_ATTR_UNDERLINE)) && attr->value == PANGO_UNDERLINE_SINGLE) - attrs |= A_UNDERLINE; - if ((attr = (PangoAttrInt *) pango_attr_iterator_get (iterator, - PANGO_ATTR_STYLE)) && attr->value == PANGO_STYLE_ITALIC) - attrs |= A_ITALIC; - return attrs; -} - -static void -view_entry_split_add_pango (ViewEntry *ve, const gchar *markup) -{ - // This function skips leading whitespace, but it's the canonical one - gchar *text = NULL; - PangoAttrList *attrs = NULL; - if (!pango_parse_markup (markup, -1, 0, &attrs, &text, NULL, NULL)) - { - gchar *replacement = g_strdup_printf ("<%s>", _("error in entry")); - view_entry_split_add (ve, replacement, NULL); - g_free (replacement); - return; - } - - PangoAttrIterator *iterator = pango_attr_list_get_iterator (attrs); - chtype *formatting = g_malloc0_n (strlen (text), sizeof *formatting); - do - { - gint start = 0, end = 0; - pango_attr_iterator_range (iterator, &start, &end); - if (end == G_MAXINT) - end = strlen (text); - - chtype attrs = app_pango_iterator_to_attrs (iterator); - while (start < end) - formatting[start++] = attrs; - } - while (pango_attr_iterator_next (iterator)); - - view_entry_split_add (ve, text, formatting); - g_free (formatting); - pango_attr_iterator_destroy (iterator); - pango_attr_list_unref (attrs); - g_free (text); -} - -static void -view_entry_split_add_xdxf (ViewEntry *ve, const gchar *xml) -{ - gchar *markup = xdxf_to_pango_markup_with_reduced_effort (xml); - view_entry_split_add_pango (ve, markup); - g_free (markup); -} - -/// Decomposes a dictionary entry into the format we want. -static ViewEntry * -view_entry_new (StardictIterator *iterator) -{ - g_return_val_if_fail (stardict_iterator_is_valid (iterator), NULL); - - ViewEntry *ve = g_slice_alloc (sizeof *ve); - GString *word = g_string_new (stardict_iterator_get_word (iterator)); - - StardictEntry *entry = stardict_iterator_get_entry (iterator); - g_return_val_if_fail (entry != NULL, NULL); - - ve->definitions = g_ptr_array_new_with_free_func (g_free); - ve->formatting = g_ptr_array_new_with_free_func (g_free); - gboolean found_anything_displayable = FALSE; - for (const GList *fields = stardict_entry_get_fields (entry); fields; ) - { - const StardictEntryField *field = fields->data; - switch (field->type) - { - case STARDICT_FIELD_MEANING: - view_entry_split_add (ve, field->data, NULL); - found_anything_displayable = TRUE; - break; - case STARDICT_FIELD_PANGO: - view_entry_split_add_pango (ve, field->data); - found_anything_displayable = TRUE; - break; - case STARDICT_FIELD_XDXF: - view_entry_split_add_xdxf (ve, field->data); - found_anything_displayable = TRUE; - break; - case STARDICT_FIELD_PHONETIC: - // FIXME this makes it highlightable - g_string_append_printf (word, " /%s/", (const gchar *) field->data); - break; - default: - // TODO support more of them - break; - } - fields = fields->next; - } - g_object_unref (entry); - - if (!found_anything_displayable) - g_ptr_array_add (ve->definitions, - g_strdup_printf ("<%s>", _("no usable field found"))); - - ve->word = g_string_free (word, FALSE); - return ve; -} - -/// Release resources associated with the view entry. -static void -view_entry_free (ViewEntry *ve) -{ - g_free (ve->word); - g_ptr_array_free (ve->definitions, TRUE); - g_ptr_array_free (ve->formatting, TRUE); - g_slice_free1 (sizeof *ve, ve); -} - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -/// Reload view items. -static void -app_reload_view (Application *self) -{ - if (self->entries->len != 0) - g_ptr_array_remove_range (self->entries, 0, self->entries->len); - - gint remains = LINES - TOP_BAR_CUTOFF + self->top_offset; - StardictIterator *iterator = - stardict_iterator_new (self->dict, self->top_position); - while (remains > 0 && stardict_iterator_is_valid (iterator)) - { - ViewEntry *entry = view_entry_new (iterator); - remains -= entry->definitions->len; - g_ptr_array_add (self->entries, entry); - stardict_iterator_next (iterator); - } - g_object_unref (iterator); -} - -/// Load configuration for a color using a subset of git config colors. -static void -app_load_color (Application *self, GKeyFile *kf, const gchar *name, int id) -{ - gchar *value = g_key_file_get_string (kf, "Colors", name, NULL); - if (!value) - return; - - struct attrs attrs = { -1, -1, 0 }; - gchar **values = g_strsplit (value, " ", 0); - gint colors = 0; - for (gchar **it = values; *it; it++) - { - gchar *end = NULL; - gint64 n = g_ascii_strtoll (*it, &end, 10); - if (*it != end && !*end && n >= G_MINSHORT && n <= G_MAXSHORT) - { - if (colors == 0) attrs.fg = n; - if (colors == 1) attrs.bg = n; - colors++; - } - else if (!strcmp (*it, "bold")) attrs.attrs |= A_BOLD; - else if (!strcmp (*it, "dim")) attrs.attrs |= A_DIM; - else if (!strcmp (*it, "ul")) attrs.attrs |= A_UNDERLINE; - else if (!strcmp (*it, "blink")) attrs.attrs |= A_BLINK; - else if (!strcmp (*it, "reverse")) attrs.attrs |= A_REVERSE; - else if (!strcmp (*it, "italic")) attrs.attrs |= A_ITALIC; - } - g_strfreev (values); - - g_free (value); - self->attrs[id] = attrs; -} - -static gboolean -app_load_bool (GKeyFile *kf, const gchar *name, gboolean def) -{ - GError *e = NULL; - bool value = g_key_file_get_boolean (kf, "Settings", name, &e); - if (e) - { - g_error_free (e); - return def; - } - return value; -} - -static void -app_load_config_values (Application *self, GKeyFile *kf) -{ - self->center_search = - app_load_bool (kf, "center-search", self->center_search); - self->underline_last = - app_load_bool (kf, "underline-last", self->underline_last); - self->hl_prefix = - app_load_bool (kf, "hl-common-prefix", self->hl_prefix); - self->watch_x11_sel = - app_load_bool (kf, "watch-selection", self->watch_x11_sel); - -#define XX(name, config, fg_, bg_, attrs_) \ - app_load_color (self, kf, config, ATTRIBUTE_ ## name); - ATTRIBUTE_TABLE (XX) -#undef XX - - const gchar *dictionaries = "Dictionaries"; - gchar **names = g_key_file_get_keys (kf, dictionaries, NULL, NULL); - if (!names) - return; - - for (gchar **it = names; *it; it++) - { - gchar *path = g_key_file_get_string (kf, dictionaries, *it, NULL); - if (!path) - continue; - - // Try to resolve relative paths and expand tildes - gchar *resolved = - resolve_filename (path, resolve_relative_config_filename); - if (resolved) - g_free (path); - else - resolved = path; - - AppDictionary *dict = g_malloc0 (sizeof *dict); - dict->super.name = g_strdup (*it); - dict->super.filename = resolved; - g_ptr_array_add (self->dictionaries, dict); - } - g_strfreev (names); -} - -static void -app_load_config (Application *self, GError **error) -{ - // TODO: proper error handling showing all relevant information; - // we can afford that here since the terminal hasn't been initialized yet - GKeyFile *key_file = load_project_config_file (error); - if (key_file) - { - app_load_config_values (self, key_file); - g_key_file_free (key_file); - } -} - -static void -app_init_attrs (Application *self) -{ -#define XX(name, config, fg_, bg_, attrs_) \ - self->attrs[ATTRIBUTE_ ## name].fg = fg_; \ - self->attrs[ATTRIBUTE_ ## name].bg = bg_; \ - self->attrs[ATTRIBUTE_ ## name].attrs = attrs_; - ATTRIBUTE_TABLE (XX) -#undef XX -} - -static gsize -app_utf8_width (Application *self, const char *utf8) -{ - gsize width = 0; - gunichar *ucs4 = g_utf8_to_ucs4_fast (utf8, -1, NULL); - for (gunichar *it = ucs4; *it; it++) - width += app_char_width (self, *it); - g_free (ucs4); - return width; -} - -static gboolean -app_load_dictionaries (Application *self, GError **e) -{ - if (!load_dictionaries (self->dictionaries, e)) - return FALSE; - - for (gsize i = 0; i < self->dictionaries->len; i++) - { - AppDictionary *dict = g_ptr_array_index (self->dictionaries, i); - - // Add some padding for decorative purposes - gchar *tmp = g_strdup_printf (" %s ", dict->super.name); - g_free (dict->super.name); - dict->super.name = tmp; - dict->name_width = app_utf8_width (self, dict->super.name); - } - return TRUE; -} - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -/// Initialize the application core. -static void -app_init (Application *self, char **filenames) -{ - self->loop = NULL; - - self->tk = NULL; - self->tk_timer = 0; - - const char *charset = NULL; - self->locale_is_utf8 = g_get_charset (&charset); -#if G_BYTE_ORDER == G_LITTLE_ENDIAN - self->ucs4_to_locale = g_iconv_open (charset, "UTF-32LE"); -#else // G_BYTE_ORDER != G_LITTLE_ENDIAN - self->ucs4_to_locale = g_iconv_open (charset, "UTF-32BE"); -#endif // G_BYTE_ORDER != G_LITTLE_ENDIAN - self->focused = TRUE; - - self->show_help = TRUE; - self->center_search = TRUE; - self->underline_last = TRUE; - self->hl_prefix = TRUE; - self->watch_x11_sel = FALSE; - - self->top_position = 0; - self->top_offset = 0; - self->selected = 0; - self->entries = g_ptr_array_new_with_free_func - ((GDestroyNotify) view_entry_free); - - self->search_label = g_strdup_printf ("%s: ", _("Search")); - self->search_label_width = app_utf8_width (self, self->search_label); - - self->input = g_array_new (TRUE, FALSE, sizeof (gunichar)); - self->input_pos = self->input_offset = 0; - self->input_confirmed = FALSE; - - self->division = 0.5; - - app_init_attrs (self); - self->dictionaries = - g_ptr_array_new_with_free_func ((GDestroyNotify) dictionary_destroy); - - GError *error = NULL; - app_load_config (self, &error); - if (error) - { - g_printerr ("%s: %s\n", _("Cannot load configuration"), error->message); - exit (EXIT_FAILURE); - } - - self->loop = g_main_loop_new (NULL, FALSE); - - // Dictionaries given on the command line override the configuration - if (*filenames) - { - g_ptr_array_set_size (self->dictionaries, 0); - while (*filenames) - { - AppDictionary *dict = g_malloc0 (sizeof *dict); - dict->super.filename = g_strdup (*filenames++); - g_ptr_array_add (self->dictionaries, dict); - } - } - - if (!app_load_dictionaries (self, &error)) - { - g_printerr ("%s: %s\n", _("Error loading dictionary"), error->message); - exit (EXIT_FAILURE); - } - if (!self->dictionaries->len) - { - g_printerr ("%s\n", _("No dictionaries found either in " - "the configuration or on the command line")); - exit (EXIT_FAILURE); - } - self->dict = ((AppDictionary *) - g_ptr_array_index (self->dictionaries, 0))->super.dict; - app_reload_view (self); -} - -static void -app_init_terminal (Application *self) -{ - TERMO_CHECK_VERSION; - if (!(self->tk = termo_new (STDIN_FILENO, NULL, 0))) - abort (); - if (!initscr () || nonl () == ERR) - abort (); - - // By default we don't use any colors so they're not required... - if (start_color () == ERR - || use_default_colors () == ERR - || COLOR_PAIRS <= ATTRIBUTE_COUNT) - return; - - gboolean failed = FALSE; - for (int a = 0; a < ATTRIBUTE_COUNT; a++) - { - if (self->attrs[a].fg == -1 && - self->attrs[a].bg == -1) - continue; - - if (self->attrs[a].fg >= COLORS || self->attrs[a].fg < -1 - || self->attrs[a].bg >= COLORS || self->attrs[a].bg < -1) - { - failed = TRUE; - continue; - } - - init_pair (a + 1, self->attrs[a].fg, self->attrs[a].bg); - self->attrs[a].attrs |= COLOR_PAIR (a + 1); - } - - // ...thus we can reset back to defaults even after initializing some - if (failed) - app_init_attrs (self); -} - -/// Free any resources used by the application. -static void -app_destroy (Application *self) -{ - if (self->loop) - g_main_loop_unref (self->loop); - if (self->tk) - termo_destroy (self->tk); - if (self->tk_timer) - g_source_remove (self->tk_timer); - - g_ptr_array_free (self->entries, TRUE); - g_free (self->search_label); - g_array_free (self->input, TRUE); - g_ptr_array_free (self->dictionaries, TRUE); - - g_iconv_close (self->ucs4_to_locale); -} - -/// Run the main event dispatch loop. -static void -app_run (Application *self) -{ - g_main_loop_run (self->loop); -} - -/// Quit the main event dispatch loop. -static void -app_quit (Application *self) -{ - g_main_loop_quit (self->loop); -} - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -// Necessary abstraction to simplify aligned, formatted character output - -typedef struct row_char RowChar; -typedef struct row_buffer RowBuffer; - -struct row_char -{ - gunichar c; ///< Unicode codepoint - chtype attrs; ///< Special attributes - int width; ///< How many cells this takes -}; - -struct row_buffer -{ - Application *app; ///< Reference to Application - GArray *chars; ///< Characters - int total_width; ///< Total width of all characters -}; - -static RowBuffer -row_buffer_make (Application *app) -{ - return (RowBuffer) - { - .app = app, - .chars = g_array_new (FALSE, TRUE, sizeof (RowChar)), - .total_width = 0, - }; -} - -#define row_buffer_free(self) g_array_unref ((self)->chars) - -/// Replace invalid chars and push all codepoints to the array w/ attributes. -static void -row_buffer_append_length (RowBuffer *self, - const gchar *text, glong length, chtype attrs) -{ - if (length == 0) - return; - - glong ucs4_len; - gunichar *ucs4 = g_utf8_to_ucs4_fast (text, length, &ucs4_len); - for (glong i = 0; i < ucs4_len; i++) - { - // XXX: this is very crude as it disrespects combining marks - gunichar c = - app_is_character_in_locale (self->app, ucs4[i]) ? ucs4[i] : '?'; - RowChar rc = { c, attrs, unichar_width (c) }; - g_array_append_val (self->chars, rc); - self->total_width += rc.width; - } - g_free (ucs4); -} - -static void -row_buffer_append (RowBuffer *self, const gchar *text, chtype attrs) -{ - row_buffer_append_length (self, text, -1, attrs); -} - -/// Combine attributes, taking care to replace colour bits entirely -static void -row_buffer_merge_attributes (chtype *target, int merged) -{ - if (merged & A_COLOR) - *target = (*target & ~A_COLOR) | merged; - else - *target |= merged; -} - -static void -row_buffer_append_with_formatting (RowBuffer *self, - const gchar *text, const chtype *formatting, chtype default_attrs) -{ - if (!formatting) - { - row_buffer_append (self, text, default_attrs); - return; - } - - while (*text) - { - glong chunk_length = 1; - while (text[chunk_length] && formatting[chunk_length] == *formatting) - chunk_length++; - - chtype merged = default_attrs; - row_buffer_merge_attributes (&merged, *formatting); - row_buffer_append_length (self, text, chunk_length, merged); - - text += chunk_length; - formatting += chunk_length; - } -} - -/// Pop as many codepoints as needed to free up "space" character cells. -/// Given the suffix nature of combining marks, this should work pretty fine. -static gint -row_buffer_pop_cells (RowBuffer *self, gint space) -{ - int made = 0; - while (self->chars->len && made < space) - { - guint last = self->chars->len - 1; - made += g_array_index (self->chars, RowChar, last).width; - g_array_remove_index (self->chars, last); - } - self->total_width -= made; - return made; -} - -static void -row_buffer_ellipsis (RowBuffer *self, int target, chtype attrs) -{ - row_buffer_pop_cells (self, self->total_width - target); - - gunichar ellipsis = L'…'; - if (app_is_character_in_locale (self->app, ellipsis)) - { - if (self->total_width >= target) - row_buffer_pop_cells (self, 1); - if (self->total_width + 1 <= target) - row_buffer_append (self, "…", attrs); - } - else if (target >= 3) - { - if (self->total_width >= target) - row_buffer_pop_cells (self, 3); - if (self->total_width + 3 <= target) - row_buffer_append (self, "...", attrs); - } -} - -static void -row_buffer_align (RowBuffer *self, int target, chtype attrs) -{ - if (target >= 0 && self->total_width > target) - row_buffer_ellipsis (self, target, attrs); - - while (self->total_width < target) - { - struct row_char rc = { ' ', attrs, 1 }; - g_array_append_val (self->chars, rc); - self->total_width += rc.width; - } -} - -static void -row_buffer_print (RowBuffer *self, gunichar *ucs4, size_t len, chtype attrs) -{ - gsize locale_str_len; - gchar *str = g_convert_with_iconv ((const gchar *) ucs4, len * sizeof *ucs4, - self->app->ucs4_to_locale, NULL, &locale_str_len, NULL); - g_return_if_fail (str != NULL); - - attrset (attrs); - addstr (str); - attrset (0); - g_free (str); -} - -static void -row_buffer_flush (RowBuffer *self) -{ - if (!self->chars->len) - return; - - gunichar ucs4[self->chars->len]; - for (guint i = 0; i < self->chars->len; i++) - ucs4[i] = g_array_index (self->chars, RowChar, i).c; - - guint mark = 0; - for (guint i = 1; i < self->chars->len; i++) - { - chtype attrs = g_array_index (self->chars, RowChar, i - 1).attrs; - if (attrs != g_array_index (self->chars, RowChar, i).attrs) - { - row_buffer_print (self, ucs4 + mark, i - mark, attrs); - mark = i; - } - } - row_buffer_print (self, ucs4 + mark, self->chars->len - mark, - g_array_index (self->chars, RowChar, self->chars->len - 1).attrs); -} - -/// Align the buffer to @a width (if not lesser than zero) using @a attrs -static void -row_buffer_finish (RowBuffer *self, int width, chtype attrs) -{ - row_buffer_align (self, width, attrs); - row_buffer_flush (self); - row_buffer_free (self); -} - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -static gint -app_input_width (Application *self, guint begin, guint end) -{ - gint width = 0; - for (guint i = begin; i < end; i++) - width += app_char_width (self, - g_array_index (self->input, gunichar, i)); - return width; -} - -static guint -app_scroll_back_input (Application *self, guint from, gint target) -{ - guint last_spacing = from; - while (from--) - { - gint width = app_input_width (self, from, from + 1); - if (target < width) - break; - - if (width) - { - last_spacing = from; - target -= width; - } - } - return last_spacing; -} - -static guint -app_adjust_input_offset (Application *self, gint space) -{ - gint to_cursor = - app_input_width (self, 0, self->input_pos); - gint at_cursor = - app_input_width (self, self->input_pos, self->input_pos + 1); - gint past_cursor = - app_input_width (self, self->input_pos + 1, self->input->len); - - // 1. If everything fits, no scrolling is desired, and no arrows present - if (to_cursor + at_cursor + past_cursor <= space) - return 0; - - // TODO: try to prevent 2. and 3. from fighting with each other - - // 2. If everything up to and including the cursor, plus right arrow fits, - // start at the beginning - if (to_cursor + at_cursor + 1 /* right arrow */ <= space) - return 0; - - // 3. If everything from the cursor to the right fits, fill the line, - // but keep one extra space for a trailing caret - gint reserved = self->input_pos != self->input->len; - gint from_cursor_with_trailing_caret = at_cursor + past_cursor + reserved; - if (1 /* left arrow */ + from_cursor_with_trailing_caret <= space) - return app_scroll_back_input (self, self->input->len, space - 1 - 1); - - // At this point, we know there will be arrows on both sides - space -= 2; - - // 4. If the cursor has moved too much to either side, follow it - if (self->input_pos < self->input_offset - || app_input_width (self, self->input_offset, self->input_pos + 1) > space) - return app_scroll_back_input (self, self->input_pos, space / 2); - - // 5. Otherwise, don't fiddle with the offset at all, it's not necessary - return self->input_offset; -} - -/// Render the top bar. -static void -app_redraw_top (Application *self) -{ - RowBuffer buf = row_buffer_make (self); - row_buffer_append (&buf, APP_TITLE, APP_ATTR (HEADER) | A_BOLD); - - // Trivially ensure the current dictionary's tab is visible. - int available = COLS - buf.total_width, width = 0; - self->dict_offset = 0; - for (guint i = 0; i < self->dictionaries->len; i++) - { - AppDictionary *dict = g_ptr_array_index (self->dictionaries, i); - width += dict->name_width; - if (self->dict != dict->super.dict) - continue; - - gboolean is_last = i + 1 == self->dictionaries->len; - while (self->dict_offset < i - && (available < width || (available == width && !is_last))) - { - dict = g_ptr_array_index (self->dictionaries, self->dict_offset++); - width -= dict->name_width; - } - break; - } - - for (guint i = self->dict_offset; i < self->dictionaries->len; i++) - { - AppDictionary *dict = g_ptr_array_index (self->dictionaries, i); - row_buffer_append (&buf, dict->super.name, - APP_ATTR_IF (self->dictionaries->len > 1 - && self->dict == dict->super.dict, ACTIVE, HEADER)); - } - move (0, 0); - row_buffer_finish (&buf, COLS, APP_ATTR (HEADER)); - - buf = row_buffer_make (self); - row_buffer_append (&buf, self->search_label, APP_ATTR (SEARCH)); - gint indent = buf.total_width; - - int word_attrs = APP_ATTR (SEARCH); - if (self->input_confirmed) - word_attrs |= A_BOLD; - - self->input_offset = app_adjust_input_offset (self, COLS - indent); - if (self->input_offset) - { - row_buffer_append (&buf, "<", word_attrs ^ A_BOLD); - indent++; - } - - gchar *input_utf8 = g_ucs4_to_utf8 ((gunichar *) self->input->data - + self->input_offset, -1, NULL, NULL, NULL); - g_return_if_fail (input_utf8 != NULL); - row_buffer_append (&buf, input_utf8, word_attrs); - g_free (input_utf8); - - gint overflow = buf.total_width - COLS; - if (overflow > 0) - { - row_buffer_pop_cells (&buf, overflow + 1 /* right arrow */); - row_buffer_align (&buf, COLS - 1 /* right arrow */, APP_ATTR (SEARCH)); - row_buffer_append (&buf, ">", word_attrs ^ A_BOLD); - } - - row_buffer_finish (&buf, COLS, APP_ATTR (SEARCH)); - gint offset = app_input_width (self, self->input_offset, self->input_pos); - - move (1, MIN (indent + offset, COLS - 1)); - refresh (); -} - -/// Computes width for the left column. -static guint -app_get_left_column_width (Application *self) -{ - gint width = COLS * self->division + 0.5; - if (width < 1) - width = 1; - else if (width > COLS - 2) - width = COLS - 2; - return width; -} - -/// Display a message in the view area. -static void -app_show_message (Application *self, const gchar *lines[], gsize len) -{ - gint top = (LINES - TOP_BAR_CUTOFF - len) / 2; - - gint i; - for (i = 0; i < top; i++) - { - move (TOP_BAR_CUTOFF + i, 0); - clrtoeol (); - } - - while (len-- && i < LINES - TOP_BAR_CUTOFF) - { - RowBuffer buf = row_buffer_make (self); - row_buffer_append (&buf, *lines, 0); - gint x = (COLS - buf.total_width) / 2; - - move (TOP_BAR_CUTOFF + i, 0); - clrtoeol (); - move (TOP_BAR_CUTOFF + i, MAX (x, 0)); - row_buffer_finish (&buf, -1, 0); - - lines++; - i++; - } - - clrtobot (); - refresh (); -} - -/// Show some information about the program. -static void -app_show_help (Application *self) -{ - const gchar *lines[] = - { - PROJECT_NAME " " PROJECT_VERSION, - _("Terminal UI for StarDict dictionaries"), - "Copyright (c) 2013 - 2022, Přemysl Eric Janouch", - "", - _("Type to search") - }; - - app_show_message (self, lines, G_N_ELEMENTS (lines)); -} - -static void -app_draw_word (Application *self, - ViewEntry *ve, size_t common_prefix, int width, chtype attrs) -{ - RowBuffer buf = row_buffer_make (self); - row_buffer_append_length (&buf, ve->word, common_prefix, attrs | A_BOLD); - row_buffer_append (&buf, ve->word + common_prefix, attrs); - row_buffer_finish (&buf, width, attrs); -} - -static void -app_draw_definition (Application *self, - ViewEntry *ve, guint index, int width, chtype attrs) -{ - RowBuffer buf = row_buffer_make (self); - row_buffer_append (&buf, " ", attrs); - row_buffer_append_with_formatting (&buf, - g_ptr_array_index (ve->definitions, index), - g_ptr_array_index (ve->formatting, index), attrs); - row_buffer_finish (&buf, width, attrs); -} - -/// Redraw the dictionary view. -static void -app_redraw_view (Application *self) -{ - if (self->show_help) - { - app_show_help (self); - return; - } - - move (TOP_BAR_CUTOFF, 0); - clrtobot (); - - gint left_width = app_get_left_column_width (self); - gchar *input_utf8 = g_ucs4_to_utf8 ((gunichar *) self->input->data, -1, - NULL, NULL, NULL); - - guint i, offset = self->top_offset, shown = 0; - for (i = 0; i < self->entries->len; i++) - { - ViewEntry *ve = g_ptr_array_index (self->entries, i); - size_t common_prefix = 0; - if (self->hl_prefix) - { - common_prefix = stardict_longest_common_collation_prefix - (self->dict, ve->word, input_utf8); - } - chtype ve_attrs = APP_ATTR_IF ((self->top_position + i) & 1, ODD, EVEN); - for (; offset < ve->definitions->len; offset++) - { - chtype attrs = ve_attrs; - if ((offset + 1 == ve->definitions->len) && self->underline_last) - attrs |= A_UNDERLINE; - if (shown == self->selected) - row_buffer_merge_attributes (&attrs, - APP_ATTR_IF (self->focused, SELECTION, DEFOCUSED)); - - app_draw_word (self, ve, common_prefix, left_width, attrs); - app_draw_definition (self, ve, offset, COLS - left_width, attrs); - if ((gint) ++shown == LINES - TOP_BAR_CUTOFF) - goto done; - } - - offset = 0; - } - -done: - free (input_utf8); - refresh (); -} - -static ViewEntry * -entry_for_position (Application *self, guint32 position) -{ - StardictIterator *iterator = stardict_iterator_new (self->dict, position); - ViewEntry *ve = NULL; - if (stardict_iterator_is_valid (iterator)) - ve = view_entry_new (iterator); - g_object_unref (iterator); - return ve; -} - -/// Just prepends a new view entry into the entries array. -static ViewEntry * -prepend_entry (Application *self, guint32 position) -{ - ViewEntry *ve = entry_for_position (self, position); - g_ptr_array_add (self->entries, NULL); - memmove (self->entries->pdata + 1, self->entries->pdata, - sizeof ve * (self->entries->len - 1)); - return g_ptr_array_index (self->entries, 0) = ve; -} - -/// Counts the number of definitions available for seeing. -static guint -app_count_view_items (Application *self) -{ - guint i, n_definitions = 0; - for (i = 0; i < self->entries->len; i++) - { - ViewEntry *entry = g_ptr_array_index (self->entries, i); - n_definitions += entry->definitions->len; - } - return n_definitions; -} - -/// Scroll up @a n entries. Doesn't redraw. -static gint -app_scroll_up (Application *self, guint n) -{ - guint n_definitions = app_count_view_items (self); - gint scrolled = 0; - for (; n--; scrolled++) - { - if (self->top_offset > 0) - { - self->top_offset--; - continue; - } - - // We've reached the top - if (self->top_position == 0) - break; - - ViewEntry *ve = prepend_entry (self, --self->top_position); - self->top_offset = ve->definitions->len - 1; - n_definitions += ve->definitions->len; - - // Remove the last entry if not shown - ViewEntry *last_entry = - g_ptr_array_index (self->entries, self->entries->len - 1); - if ((gint) (n_definitions - self->top_offset - - last_entry->definitions->len) >= LINES - TOP_BAR_CUTOFF) - { - n_definitions -= last_entry->definitions->len; - g_ptr_array_remove_index_fast - (self->entries, self->entries->len - 1); - } - } - return scrolled; -} - -/// Scroll down @a n entries. Doesn't redraw. -static gint -app_scroll_down (Application *self, guint n) -{ - guint n_definitions = app_count_view_items (self); - gint scrolled = 0; - for (; n--; scrolled++) - { - if (self->entries->len == 0) - break; - - // Simulate the movement first to disallow scrolling past the end - guint to_be_offset = self->top_offset; - guint to_be_definitions = n_definitions; - - ViewEntry *first_entry = g_ptr_array_index (self->entries, 0); - if (++to_be_offset >= first_entry->definitions->len) - { - to_be_definitions -= first_entry->definitions->len; - to_be_offset = 0; - } - if ((gint) (to_be_definitions - to_be_offset) < LINES - TOP_BAR_CUTOFF) - { - ViewEntry *new_entry = entry_for_position - (self, self->top_position + self->entries->len); - if (!new_entry) - break; - - g_ptr_array_add (self->entries, new_entry); - to_be_definitions += new_entry->definitions->len; - } - if (to_be_offset == 0) - { - g_ptr_array_remove_index (self->entries, 0); - self->top_position++; - } - - self->top_offset = to_be_offset; - n_definitions = to_be_definitions; - } - return scrolled; -} - -/// Moves the selection one entry up. -static gboolean -app_one_entry_up (Application *self) -{ - if (self->selected == 0 && self->top_offset == 0) - { - if (self->top_position == 0) - return FALSE; - prepend_entry (self, --self->top_position); - } - - // Find the last entry that starts above the selection - gint first = -self->top_offset; - guint i; - for (i = 0; i < self->entries->len; i++) - { - ViewEntry *ve = g_ptr_array_index (self->entries, i); - gint new_first = first + ve->definitions->len; - if (new_first >= (gint) self->selected) - break; - first = new_first; - } - - if (first < 0) - { - self->selected = 0; - app_scroll_up (self, -first); - } - else - self->selected = first; - - app_redraw_view (self); - return TRUE; -} - -/// Moves the selection one entry down. -static void -app_one_entry_down (Application *self) -{ - // Find the first entry that starts below the selection - gint first = -self->top_offset; - guint i; - for (i = 0; i < self->entries->len; i++) - { - ViewEntry *ve = g_ptr_array_index (self->entries, i); - first += ve->definitions->len; - if (first > (gint) self->selected) - break; - } - - // FIXME: selection can still get past the end - if (first >= LINES - TOP_BAR_CUTOFF) - { - app_scroll_down (self, first - (LINES - TOP_BAR_CUTOFF - 1)); - self->selected = LINES - TOP_BAR_CUTOFF - 1; - } - else - self->selected = first; - - app_redraw_view (self); -} - -/// Redraw everything. -static void -app_redraw (Application *self) -{ - app_redraw_view (self); - app_redraw_top (self); -} - -/// When dictionary contents are longer than the screen, eliminate empty space -static void -app_fill_view (Application *self) -{ - gint missing = LINES - TOP_BAR_CUTOFF - - (gint) (app_count_view_items (self) - self->top_offset); - if (missing > 0) - self->selected += app_scroll_up (self, missing); -} - -/// Search for the current entry. -static void -app_search_for_entry (Application *self) -{ - gchar *input_utf8 = g_ucs4_to_utf8 - ((gunichar *) self->input->data, -1, NULL, NULL, NULL); - g_return_if_fail (input_utf8 != NULL); - - StardictIterator *iterator = - stardict_dict_search (self->dict, input_utf8, NULL); - g_free (input_utf8); - - self->top_position = stardict_iterator_get_offset (iterator); - self->top_offset = 0; - self->selected = 0; - g_object_unref (iterator); - - self->show_help = FALSE; - app_reload_view (self); - - // Don't let the iterator get past the end of the dictionary - if (!self->entries->len) - (void) app_scroll_up (self, 1); - - // If the user wants it centered, just move the view up half a screen; - // actually, one third seems to be a better guess - if (self->center_search) - { - gint half = (LINES - TOP_BAR_CUTOFF) / 3; - if (half > 0) - self->selected += app_scroll_up (self, half); - } - - app_fill_view (self); - app_redraw_view (self); -} - -static void -app_set_input (Application *self, const gchar *text, gsize text_len) -{ - glong size; - gunichar *output = g_utf8_to_ucs4 (text, text_len, NULL, &size, NULL); - - // XXX: signal invalid data? - if (!output) - return; - - g_array_free (self->input, TRUE); - self->input = g_array_new (TRUE, FALSE, sizeof (gunichar)); - self->input_pos = self->input_offset = 0; - - gunichar *p = output; - gboolean last_was_space = false; - while (size--) - { - // Normalize whitespace, to cover OCR anomalies - gunichar c = *p++; - if (!g_unichar_isspace (c)) - last_was_space = FALSE; - else if (last_was_space) - continue; - else - { - c = ' '; - last_was_space = TRUE; - } - - // XXX: skip? Might be some binary nonsense. - if (!g_unichar_isprint (c)) - break; - - g_array_insert_val (self->input, self->input_pos++, c); - } - g_free (output); - - self->input_confirmed = FALSE; - app_search_for_entry (self); - app_redraw_top (self); -} - -static void -app_set_trimmed_input_if_not_empty (Application *self, const gchar *text) -{ - // Strip ASCII whitespace: this is compatible with UTF-8 - while (g_ascii_isspace (*text)) - text++; - gsize text_len = strlen (text); - while (text_len && g_ascii_isspace (text[text_len - 1])) - text_len--; - - if (text_len) - app_set_input (self, text, text_len); -} - -static const gchar * -app_get_current_definition (Application *self) -{ - guint offset = self->top_offset + self->selected; - for (guint i = 0; i < self->entries->len; i++) - { - ViewEntry *ve = g_ptr_array_index (self->entries, i); - if (offset < ve->definitions->len) - return g_ptr_array_index (ve->definitions, offset); - offset -= ve->definitions->len; - } - return NULL; -} - -static void -app_goto_dictionary_directly (Application *self, StardictDict *dict) -{ - if (dict == self->dict) - return; - - self->last = self->dict; - self->dict = dict; - app_search_for_entry (self); - app_redraw_top (self); -} - -/// Switch to a different dictionary by number. -static gboolean -app_goto_dictionary (Application *self, guint n) -{ - if (n >= self->dictionaries->len) - return FALSE; - - Dictionary *dict = g_ptr_array_index (self->dictionaries, n); - app_goto_dictionary_directly (self, dict->dict); - return TRUE; -} - -/// Switch to a different dictionary by delta. -static gboolean -app_goto_dictionary_delta (Application *self, gint n) -{ - GPtrArray *dicts = self->dictionaries; - if (dicts->len <= 1) - return FALSE; - - guint i = 0; - while (i < dicts->len && - ((Dictionary *) g_ptr_array_index (dicts, i))->dict != self->dict) - i++; - - return app_goto_dictionary (self, (i + dicts->len + n) % dicts->len); -} - -/// The terminal has been resized, make appropriate changes. -static gboolean -app_process_resize (Application *self) -{ - app_reload_view (self); - app_fill_view (self); - - guint n_visible = app_count_view_items (self) - self->top_offset; - if ((gint) n_visible > LINES - TOP_BAR_CUTOFF) - n_visible = LINES - TOP_BAR_CUTOFF; - if (self->selected >= n_visible) - { - app_scroll_down (self, self->selected - n_visible + 1); - self->selected = n_visible - 1; - } - - app_redraw (self); - return TRUE; -} - -// --- User input handling ----------------------------------------------------- - -/// All the actions that can be performed by the user. -typedef enum user_action UserAction; - -enum user_action -{ - USER_ACTION_NONE, - - USER_ACTION_QUIT, - USER_ACTION_REDRAW, - - USER_ACTION_MOVE_SPLITTER_LEFT, - USER_ACTION_MOVE_SPLITTER_RIGHT, - - USER_ACTION_GOTO_ENTRY_PREVIOUS, - USER_ACTION_GOTO_ENTRY_NEXT, - USER_ACTION_GOTO_DEFINITION_PREVIOUS, - USER_ACTION_GOTO_DEFINITION_NEXT, - USER_ACTION_GOTO_PAGE_PREVIOUS, - USER_ACTION_GOTO_PAGE_NEXT, - USER_ACTION_GOTO_DICTIONARY_PREVIOUS, - USER_ACTION_GOTO_DICTIONARY_NEXT, - USER_ACTION_GOTO_DICTIONARY_LAST, - - USER_ACTION_FLIP, - - USER_ACTION_INPUT_CONFIRM, - USER_ACTION_INPUT_HOME, - USER_ACTION_INPUT_END, - USER_ACTION_INPUT_LEFT, - USER_ACTION_INPUT_RIGHT, - USER_ACTION_INPUT_DELETE_PREVIOUS, - USER_ACTION_INPUT_DELETE_NEXT, - USER_ACTION_INPUT_DELETE_TO_HOME, - USER_ACTION_INPUT_DELETE_TO_END, - USER_ACTION_INPUT_DELETE_PREVIOUS_WORD, - USER_ACTION_INPUT_TRANSPOSE, - - USER_ACTION_COUNT -}; - -#define SAVE_CURSOR \ - int last_x, last_y; \ - getyx (stdscr, last_y, last_x); - -#define RESTORE_CURSOR \ - move (last_y, last_x); \ - refresh (); - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -static gboolean -app_process_user_action (Application *self, UserAction action) -{ - SAVE_CURSOR - switch (action) - { - case USER_ACTION_QUIT: - return FALSE; - case USER_ACTION_REDRAW: - clear (); - app_redraw (self); - return TRUE; - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - case USER_ACTION_MOVE_SPLITTER_LEFT: - self->division = (app_get_left_column_width (self) - 1.) / COLS; - app_redraw_view (self); - RESTORE_CURSOR - return TRUE; - case USER_ACTION_MOVE_SPLITTER_RIGHT: - self->division = (app_get_left_column_width (self) + 1.) / COLS; - app_redraw_view (self); - RESTORE_CURSOR - return TRUE; - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - case USER_ACTION_GOTO_DEFINITION_PREVIOUS: - if (self->selected > 0) - self->selected--; - else - app_scroll_up (self, 1); - app_redraw_view (self); - RESTORE_CURSOR - return TRUE; - case USER_ACTION_GOTO_DEFINITION_NEXT: - if ((gint) self->selected < LINES - TOP_BAR_CUTOFF - 1 && - self->selected < app_count_view_items (self) - self->top_offset - 1) - self->selected++; - else - app_scroll_down (self, 1); - app_redraw_view (self); - RESTORE_CURSOR - return TRUE; - - case USER_ACTION_GOTO_ENTRY_PREVIOUS: - app_one_entry_up (self); - RESTORE_CURSOR - return TRUE; - case USER_ACTION_GOTO_ENTRY_NEXT: - app_one_entry_down (self); - RESTORE_CURSOR - return TRUE; - - case USER_ACTION_GOTO_PAGE_PREVIOUS: - app_scroll_up (self, LINES - TOP_BAR_CUTOFF); - app_redraw_view (self); - RESTORE_CURSOR - return TRUE; - case USER_ACTION_GOTO_PAGE_NEXT: - app_scroll_down (self, LINES - TOP_BAR_CUTOFF); - app_redraw_view (self); - RESTORE_CURSOR - return TRUE; - - case USER_ACTION_GOTO_DICTIONARY_PREVIOUS: - if (!app_goto_dictionary_delta (self, -1)) - beep (); - return TRUE; - case USER_ACTION_GOTO_DICTIONARY_NEXT: - if (!app_goto_dictionary_delta (self, +1)) - beep (); - return TRUE; - case USER_ACTION_GOTO_DICTIONARY_LAST: - if (!self->last) - beep (); - else - app_goto_dictionary_directly (self, self->last); - return TRUE; - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - case USER_ACTION_FLIP: - { - const gchar *definition = app_get_current_definition (self); - if (!definition) - beep (); - else - app_set_trimmed_input_if_not_empty (self, definition); - } - return TRUE; - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - case USER_ACTION_INPUT_HOME: - self->input_pos = 0; - app_redraw_top (self); - return TRUE; - case USER_ACTION_INPUT_END: - self->input_pos = self->input->len; - app_redraw_top (self); - return TRUE; - case USER_ACTION_INPUT_LEFT: - if (self->input_pos > 0) - { - do self->input_pos--; - while (self->input_pos > 0 && g_unichar_ismark - (g_array_index (self->input, gunichar, self->input_pos))); - app_redraw_top (self); - } - return TRUE; - case USER_ACTION_INPUT_RIGHT: - if (self->input_pos < self->input->len) - { - do self->input_pos++; - while (self->input_pos < self->input->len && g_unichar_ismark - (g_array_index (self->input, gunichar, self->input_pos))); - app_redraw_top (self); - } - return TRUE; - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - case USER_ACTION_INPUT_CONFIRM: - self->input_confirmed = TRUE; - app_redraw_top (self); - return TRUE; - - case USER_ACTION_INPUT_TRANSPOSE: - { - if (!self->input_pos || self->input->len < 2) - break; - - guint start = self->input_pos - 1; - if (self->input_pos >= self->input->len) - start--; - - gunichar tmp = g_array_index (self->input, gunichar, start); - g_array_index (self->input, gunichar, start) - = g_array_index (self->input, gunichar, start + 1); - g_array_index (self->input, gunichar, start + 1) = tmp; - - if (self->input_pos < self->input->len) - self->input_pos++; - - app_search_for_entry (self); - app_redraw_top (self); - return TRUE; - } - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - case USER_ACTION_INPUT_DELETE_PREVIOUS: - if (self->input_pos > 0) - { - g_array_remove_index (self->input, --self->input_pos); - app_search_for_entry (self); - app_redraw_top (self); - } - return TRUE; - case USER_ACTION_INPUT_DELETE_NEXT: - if (self->input_pos < self->input->len) - { - g_array_remove_index (self->input, self->input_pos); - app_search_for_entry (self); - app_redraw_top (self); - } - return TRUE; - case USER_ACTION_INPUT_DELETE_TO_HOME: - if (self->input->len != 0) - { - g_array_remove_range (self->input, 0, self->input_pos); - self->input_pos = 0; - - app_search_for_entry (self); - app_redraw_top (self); - } - return TRUE; - case USER_ACTION_INPUT_DELETE_TO_END: - if (self->input_pos < self->input->len) - { - g_array_remove_range (self->input, - self->input_pos, self->input->len - self->input_pos); - app_search_for_entry (self); - app_redraw_top (self); - } - return TRUE; - case USER_ACTION_INPUT_DELETE_PREVIOUS_WORD: - { - if (self->input_pos == 0) - return TRUE; - - gint i = self->input_pos; - while (i) - if (g_array_index (self->input, gunichar, --i) != L' ') - break; - while (i--) - if (g_array_index (self->input, gunichar, i) == L' ') - break; - - i++; - g_array_remove_range (self->input, i, self->input_pos - i); - self->input_pos = i; - - app_search_for_entry (self); - app_redraw_top (self); - return TRUE; - } - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - case USER_ACTION_NONE: - return TRUE; - default: - g_assert_not_reached (); - } - return TRUE; -} - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -static gboolean -app_process_keysym (Application *self, termo_key_t *event) -{ - UserAction action = USER_ACTION_NONE; - typedef const UserAction ActionMap[TERMO_N_SYMS]; - - static ActionMap actions = - { - [TERMO_SYM_ESCAPE] = USER_ACTION_QUIT, - - [TERMO_SYM_UP] = USER_ACTION_GOTO_DEFINITION_PREVIOUS, - [TERMO_SYM_DOWN] = USER_ACTION_GOTO_DEFINITION_NEXT, - [TERMO_SYM_PAGEUP] = USER_ACTION_GOTO_PAGE_PREVIOUS, - [TERMO_SYM_PAGEDOWN] = USER_ACTION_GOTO_PAGE_NEXT, - - [TERMO_SYM_TAB] = USER_ACTION_FLIP, - [TERMO_SYM_ENTER] = USER_ACTION_INPUT_CONFIRM, - - [TERMO_SYM_HOME] = USER_ACTION_INPUT_HOME, - [TERMO_SYM_END] = USER_ACTION_INPUT_END, - [TERMO_SYM_LEFT] = USER_ACTION_INPUT_LEFT, - [TERMO_SYM_RIGHT] = USER_ACTION_INPUT_RIGHT, - - [TERMO_SYM_BACKSPACE] = USER_ACTION_INPUT_DELETE_PREVIOUS, - [TERMO_SYM_DEL] = USER_ACTION_INPUT_DELETE_PREVIOUS, - [TERMO_SYM_DELETE] = USER_ACTION_INPUT_DELETE_NEXT, - }; - static ActionMap actions_alt = - { - [TERMO_SYM_LEFT] = USER_ACTION_MOVE_SPLITTER_LEFT, - [TERMO_SYM_RIGHT] = USER_ACTION_MOVE_SPLITTER_RIGHT, - [TERMO_SYM_TAB] = USER_ACTION_GOTO_DICTIONARY_LAST, - }; - static ActionMap actions_ctrl = - { - [TERMO_SYM_UP] = USER_ACTION_GOTO_ENTRY_PREVIOUS, - [TERMO_SYM_DOWN] = USER_ACTION_GOTO_ENTRY_NEXT, - [TERMO_SYM_LEFT] = USER_ACTION_GOTO_DICTIONARY_PREVIOUS, - [TERMO_SYM_RIGHT] = USER_ACTION_GOTO_DICTIONARY_NEXT, - [TERMO_SYM_PAGEUP] = USER_ACTION_GOTO_DICTIONARY_PREVIOUS, - [TERMO_SYM_PAGEDOWN] = USER_ACTION_GOTO_DICTIONARY_NEXT, - }; - - if (!event->modifiers) - action = actions[event->code.sym]; - else if (event->modifiers == TERMO_KEYMOD_ALT) - action = actions_alt[event->code.sym]; - else if (event->modifiers == TERMO_KEYMOD_CTRL) - action = actions_ctrl[event->code.sym]; - - return app_process_user_action (self, action); -} - -static gboolean -app_process_ctrl_key (Application *self, termo_key_t *event) -{ - static const UserAction actions[32] = - { - [CTRL_KEY ('L')] = USER_ACTION_REDRAW, - - [CTRL_KEY ('P')] = USER_ACTION_GOTO_DEFINITION_PREVIOUS, - [CTRL_KEY ('N')] = USER_ACTION_GOTO_DEFINITION_NEXT, - [CTRL_KEY ('B')] = USER_ACTION_GOTO_PAGE_PREVIOUS, - [CTRL_KEY ('F')] = USER_ACTION_GOTO_PAGE_NEXT, - - [CTRL_KEY ('A')] = USER_ACTION_INPUT_HOME, - [CTRL_KEY ('E')] = USER_ACTION_INPUT_END, - - [CTRL_KEY ('H')] = USER_ACTION_INPUT_DELETE_PREVIOUS, - [CTRL_KEY ('K')] = USER_ACTION_INPUT_DELETE_TO_END, - [CTRL_KEY ('W')] = USER_ACTION_INPUT_DELETE_PREVIOUS_WORD, - [CTRL_KEY ('U')] = USER_ACTION_INPUT_DELETE_TO_HOME, - [CTRL_KEY ('T')] = USER_ACTION_INPUT_TRANSPOSE, - }; - - gint64 i = (gint64) event->code.codepoint - 'a' + 1; - if (i > 0 && i < (gint64) G_N_ELEMENTS (actions)) - return app_process_user_action (self, actions[i]); - - return TRUE; -} - -static gboolean -app_process_alt_key (Application *self, termo_key_t *event) -{ - if (event->code.codepoint == 'c') - self->center_search = !self->center_search; - - if (event->code.codepoint >= '0' - && event->code.codepoint <= '9') - { - gint n = event->code.codepoint - '0'; - if (!app_goto_dictionary (self, (n == 0 ? 10 : n) - 1)) - beep (); - } - return TRUE; -} - -static gboolean -app_process_key (Application *self, termo_key_t *event) -{ - if (event->modifiers == TERMO_KEYMOD_CTRL) - return app_process_ctrl_key (self, event); - if (event->modifiers == TERMO_KEYMOD_ALT) - return app_process_alt_key (self, event); - if (event->modifiers) - return TRUE; - - gunichar c = event->code.codepoint; - if (!g_unichar_isprint (c)) - { - beep (); - return TRUE; - } - - if (self->input_confirmed) - { - if (self->input->len != 0) - g_array_remove_range (self->input, 0, self->input->len); - self->input_pos = self->input_offset = 0; - self->input_confirmed = FALSE; - } - - g_array_insert_val (self->input, self->input_pos++, c); - app_search_for_entry (self); - app_redraw_top (self); - return TRUE; -} - -static void -app_process_left_mouse_click (Application *self, int line, int column) -{ - SAVE_CURSOR - if (line == 0) - { - int indent = strlen (APP_TITLE); - if (column < indent) - return; - - for (guint i = self->dict_offset; i < self->dictionaries->len; i++) - { - AppDictionary *dict = g_ptr_array_index (self->dictionaries, i); - if (column < (indent += dict->name_width)) - { - app_goto_dictionary (self, i); - return; - } - } - } - else if (line == 1) - { - gint pos = column - self->search_label_width; - if (pos >= 0) - { - // On clicking the left arrow, go to that invisible character - // behind the arrow (skiping over non-spacing suffixes) - guint i = self->input_offset; - if (i && !pos--) - { - while (i-- && !app_input_width (self, i, i + 1)) - ; - } - for (gint occupied = 0; i < self->input->len; i++) - { - size_t width = app_input_width (self, i, i + 1); - if ((occupied += width) > pos) - break; - } - - self->input_pos = i; - app_redraw_top (self); - } - } - else if (line <= (int) (app_count_view_items (self) - self->top_offset)) - { - self->selected = line - TOP_BAR_CUTOFF; - app_redraw_view (self); - RESTORE_CURSOR - } -} - -/// Process mouse input. -static gboolean -app_process_mouse (Application *self, termo_key_t *event) -{ - int line, column, button; - termo_mouse_event_t type; - termo_interpret_mouse (self->tk, event, &type, &button, &line, &column); - - if (type != TERMO_MOUSE_PRESS) - return TRUE; - - if (button == 1) - app_process_left_mouse_click (self, line, column); - else if (button == 4) - app_process_user_action (self, USER_ACTION_GOTO_DEFINITION_PREVIOUS); - else if (button == 5) - app_process_user_action (self, USER_ACTION_GOTO_DEFINITION_NEXT); - - return TRUE; -} - -/// Process input events from the terminal. -static gboolean -app_process_termo_event (Application *self, termo_key_t *event) -{ - switch (event->type) - { - case TERMO_TYPE_MOUSE: - return app_process_mouse (self, event); - case TERMO_TYPE_KEY: - return app_process_key (self, event); - case TERMO_TYPE_KEYSYM: - return app_process_keysym (self, event); - case TERMO_TYPE_FOCUS: - { - SAVE_CURSOR - self->focused = !!event->code.focused; - app_redraw_view (self); - RESTORE_CURSOR - return TRUE; - } - default: - return TRUE; - } -} - -// --- SIGWINCH ---------------------------------------------------------------- - -static int g_winch_pipe[2]; ///< SIGWINCH signalling pipe. - -static void -winch_handler (int signum) -{ - (void) signum; - write (g_winch_pipe[1], "x", 1); -} - -static void -install_winch_handler (void) -{ - struct sigaction act, oldact; - - if (pipe (g_winch_pipe) == -1) - abort (); - - act.sa_handler = winch_handler; - act.sa_flags = SA_RESTART; - sigemptyset (&act.sa_mask); - sigaction (SIGWINCH, &act, &oldact); -} - -// --- X11 selection watcher --------------------------------------------------- - -#ifdef WITH_X11 - -#include -#include - -/// Data relating to one entry within the dictionary. -typedef struct selection_watch SelectionWatch; - -struct selection_watch -{ - Application *app; - xcb_connection_t *X; - const xcb_query_extension_reply_t *xfixes; - - guint watch; ///< X11 connection watcher - xcb_window_t wid; ///< Withdrawn communications window - xcb_atom_t atom_incr; ///< INCR - xcb_atom_t atom_utf8_string; ///< UTF8_STRING - xcb_timestamp_t in_progress; ///< Timestamp of last processed event - GString * buffer; ///< UTF-8 text buffer - - gboolean incr; ///< INCR running - gboolean incr_failure; ///< INCR failure indicator -}; - -static gboolean -is_xcb_ok (xcb_connection_t *X) -{ - int xcb_error = xcb_connection_has_error (X); - if (xcb_error) - { - g_warning (_("X11 connection failed (error code %d)"), xcb_error); - return FALSE; - } - return TRUE; -} - -static xcb_atom_t -resolve_atom (xcb_connection_t *X, const char *atom) -{ - xcb_intern_atom_reply_t *iar = xcb_intern_atom_reply (X, - xcb_intern_atom (X, false, strlen (atom), atom), NULL); - xcb_atom_t result = iar ? iar->atom : XCB_NONE; - free (iar); - return result; -} - -// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -static gboolean -read_utf8_property (SelectionWatch *self, xcb_window_t wid, xcb_atom_t property, - gboolean *empty) -{ - guint32 offset = 0; - gboolean more_data = TRUE, ok = TRUE; - xcb_get_property_reply_t *gpr; - while (ok && more_data) - { - if (!(gpr = xcb_get_property_reply (self->X, - xcb_get_property (self->X, FALSE /* delete */, wid, - property, XCB_GET_PROPERTY_TYPE_ANY, offset, 0x8000), NULL))) - return FALSE; - - int len = xcb_get_property_value_length (gpr); - if (offset == 0 && len == 0 && empty) - *empty = TRUE; - - ok = gpr->type == self->atom_utf8_string && gpr->format == 8; - more_data = gpr->bytes_after != 0; - if (ok) - { - offset += len >> 2; - g_string_append_len (self->buffer, - xcb_get_property_value (gpr), len); - } - free (gpr); - } - return ok; -} - -static void -on_x11_selection_change (SelectionWatch *self, - xcb_xfixes_selection_notify_event_t *e) -{ - // Not checking whether we should give up when this interrupts our - // current retrieval attempt--the timeout mostly solves this for all cases - if (e->owner == XCB_NONE) - return; - - // Don't try to process two things at once. Each request gets a few seconds - // to finish, then we move on, hoping that a property race doesn't commence. - // Ideally we'd set up a separate queue for these skipped requests and - // process them later. - if (self->in_progress != 0 && e->timestamp - self->in_progress < 5000) - return; - - // ICCCM says we should ensure the named property doesn't exist - (void) xcb_delete_property (self->X, self->wid, XCB_ATOM_PRIMARY); - - (void) xcb_convert_selection (self->X, self->wid, e->selection, - self->atom_utf8_string, XCB_ATOM_PRIMARY, e->timestamp); - - self->in_progress = e->timestamp; - self->incr = FALSE; -} - -static void -on_x11_selection_receive (SelectionWatch *self, - xcb_selection_notify_event_t *e) -{ - if (e->requestor != self->wid - || e->time != self->in_progress) - return; - - self->in_progress = 0; - if (e->property == XCB_ATOM_NONE) - return; - - xcb_get_property_reply_t *gpr = xcb_get_property_reply (self->X, - xcb_get_property (self->X, FALSE /* delete */, e->requestor, - e->property, XCB_GET_PROPERTY_TYPE_ANY, 0, 0), NULL); - if (!gpr) - return; - - // Garbage collection, GString only ever expands in size - g_string_free (self->buffer, TRUE); - self->buffer = g_string_new (NULL); - - // When you select a lot of text in VIM, it starts the ICCCM INCR mechanism, - // from which there is no opt-out - if (gpr->type == self->atom_incr) - { - self->in_progress = e->time; - self->incr = TRUE; - self->incr_failure = FALSE; - } - else if (read_utf8_property (self, e->requestor, e->property, NULL)) - app_set_trimmed_input_if_not_empty (self->app, self->buffer->str); - - free (gpr); - (void) xcb_delete_property (self->X, self->wid, e->property); -} - -static void -on_x11_property_notify (SelectionWatch *self, xcb_property_notify_event_t *e) -{ - if (!self->incr - || e->window != self->wid - || e->state != XCB_PROPERTY_NEW_VALUE - || e->atom != XCB_ATOM_PRIMARY) - return; - - gboolean empty = FALSE; - if (!read_utf8_property (self, e->window, e->atom, &empty)) - // We need to keep deleting the property - self->incr_failure = TRUE; - - // Once it's empty, we've consumed everything and can move on undisturbed - if (empty) - { - if (!self->incr_failure) - app_set_trimmed_input_if_not_empty (self->app, self->buffer->str); - - self->in_progress = 0; - self->incr = FALSE; - } - - (void) xcb_delete_property (self->X, e->window, e->atom); -} - -static void -process_x11_event (SelectionWatch *self, xcb_generic_event_t *event) -{ - int event_code = event->response_type & 0x7f; - if (event_code == 0) - { - xcb_generic_error_t *err = (xcb_generic_error_t *) event; - g_warning (_("X11 request error (%d, major %d, minor %d)"), - err->error_code, err->major_code, err->minor_code); - } - else if (event_code == - self->xfixes->first_event + XCB_XFIXES_SELECTION_NOTIFY) - on_x11_selection_change (self, - (xcb_xfixes_selection_notify_event_t *) event); - else if (event_code == XCB_SELECTION_NOTIFY) - on_x11_selection_receive (self, - (xcb_selection_notify_event_t *) event); - else if (event_code == XCB_PROPERTY_NOTIFY) - on_x11_property_notify (self, - (xcb_property_notify_event_t *) event); -} - -static gboolean -process_x11 (G_GNUC_UNUSED GIOChannel *source, - G_GNUC_UNUSED GIOCondition condition, gpointer data) -{ - SelectionWatch *self = data; - - xcb_generic_event_t *event; - while ((event = xcb_poll_for_event (self->X))) - { - process_x11_event (self, event); - free (event); - } - (void) xcb_flush (self->X); - return is_xcb_ok (self->X); -} - -static void -selection_watch_init (SelectionWatch *self, Application *app) -{ - memset (self, 0, sizeof *self); - if (!app->watch_x11_sel) - return; - self->app = app; - - int which_screen = -1; - self->X = xcb_connect (NULL, &which_screen); - if (!is_xcb_ok (self->X)) - return; - - // Most modern applications support this, though an XCB_ATOM_STRING - // fallback might be good to add (COMPOUND_TEXT is complex) - g_return_if_fail - ((self->atom_utf8_string = resolve_atom (self->X, "UTF8_STRING"))); - g_return_if_fail - ((self->atom_incr = resolve_atom (self->X, "INCR"))); - - self->xfixes = xcb_get_extension_data (self->X, &xcb_xfixes_id); - g_return_if_fail (self->xfixes->present); - - (void) xcb_xfixes_query_version_unchecked (self->X, - XCB_XFIXES_MAJOR_VERSION, XCB_XFIXES_MINOR_VERSION); - - const xcb_setup_t *setup = xcb_get_setup (self->X); - xcb_screen_iterator_t setup_iter = xcb_setup_roots_iterator (setup); - while (which_screen--) - xcb_screen_next (&setup_iter); - - xcb_screen_t *screen = setup_iter.data; - self->wid = xcb_generate_id (self->X); - const uint32_t values[] = {XCB_EVENT_MASK_PROPERTY_CHANGE}; - (void) xcb_create_window (self->X, screen->root_depth, self->wid, - screen->root, 0, 0, 1, 1, 0, XCB_WINDOW_CLASS_INPUT_OUTPUT, - screen->root_visual, XCB_CW_EVENT_MASK, values); - - (void) xcb_xfixes_select_selection_input (self->X, self->wid, - XCB_ATOM_PRIMARY, XCB_XFIXES_SELECTION_EVENT_MASK_SET_SELECTION_OWNER | - XCB_XFIXES_SELECTION_EVENT_MASK_SELECTION_WINDOW_DESTROY | - XCB_XFIXES_SELECTION_EVENT_MASK_SELECTION_CLIENT_CLOSE); - - (void) xcb_flush (self->X); - self->watch = add_read_watch - (xcb_get_file_descriptor (self->X), process_x11, self); - - // Never NULL so that we don't need to care about pointer validity - self->buffer = g_string_new (NULL); -} - -static void -selection_watch_destroy (SelectionWatch *self) -{ - if (self->X) - xcb_disconnect (self->X); - if (self->watch) - g_source_remove (self->watch); - if (self->buffer) - g_string_free (self->buffer, TRUE); -} - -#endif // WITH_X11 - -// --- Initialisation, event handling ------------------------------------------ - -static gboolean on_stdin_input_timeout (gpointer data); - -static gboolean -process_stdin_input (G_GNUC_UNUSED GIOChannel *source, - G_GNUC_UNUSED GIOCondition condition, gpointer data) -{ - Application *app = data; - if (app->tk_timer) - { - g_source_remove (app->tk_timer); - app->tk_timer = 0; - } - - termo_advisereadable (app->tk); - - termo_key_t event; - termo_result_t res; - while ((res = termo_getkey (app->tk, &event)) == TERMO_RES_KEY) - if (!app_process_termo_event (app, &event)) - goto quit; - - if (res == TERMO_RES_AGAIN) - app->tk_timer = g_timeout_add (termo_get_waittime (app->tk), - on_stdin_input_timeout, app); - else if (res == TERMO_RES_ERROR || res == TERMO_RES_EOF) - goto quit; - - return TRUE; - -quit: - app_quit (app); - return FALSE; -} - -static gboolean -on_stdin_input_timeout (gpointer data) -{ - Application *app = data; - termo_key_t event; - if (termo_getkey_force (app->tk, &event) == TERMO_RES_KEY) - if (!app_process_termo_event (app, &event)) - app_quit (app); - - app->tk_timer = 0; - return FALSE; -} - -static gboolean -process_winch_input (GIOChannel *source, - G_GNUC_UNUSED GIOCondition condition, gpointer data) - { - char c; - (void) read (g_io_channel_unix_get_fd (source), &c, 1); - - update_curses_terminal_size (); - app_process_resize (data); - return TRUE; -} - -static gboolean -on_terminated (gpointer user_data) -{ - app_quit (user_data); - return TRUE; -} - -static void -log_handler_curses (Application *self, const gchar *message) -{ - // Beep, beep, I'm a jeep; let the user know - beep (); - - // We certainly don't want to end up in a possibly infinite recursion - static gboolean in_processing; - if (in_processing) - return; - - in_processing = TRUE; - SAVE_CURSOR - - RowBuffer buf = row_buffer_make (self); - row_buffer_append (&buf, message, A_REVERSE); - move (0, 0); - row_buffer_finish (&buf, COLS, A_REVERSE); - - RESTORE_CURSOR - in_processing = FALSE; -} - -static void -log_handler (const gchar *domain, GLogLevelFlags level, - const gchar *message, gpointer data) -{ - // There's probably no point in trying to display a fatal message nicely - if (level & G_LOG_FLAG_FATAL) - g_log_default_handler (domain, level, message, NULL); - - const gchar *prefix; - switch (level & G_LOG_LEVEL_MASK) - { - case G_LOG_LEVEL_ERROR: prefix = "E"; break; - case G_LOG_LEVEL_CRITICAL: prefix = "C"; break; - case G_LOG_LEVEL_WARNING: prefix = "W"; break; - case G_LOG_LEVEL_MESSAGE: prefix = "M"; break; - case G_LOG_LEVEL_INFO: prefix = "I"; break; - case G_LOG_LEVEL_DEBUG: prefix = "D"; break; - default: prefix = "?"; - } - - gchar *out; - if (domain) - out = g_strdup_printf ("%s: %s: %s", prefix, domain, message); - else - out = g_strdup_printf ("%s: %s", prefix, message); - - // If the standard error output isn't redirected, try our best at showing - // the message to the user; it will probably get overdrawn soon - if (isatty (STDERR_FILENO)) - log_handler_curses (data, out); - else - fprintf (stderr, "%s\n", out); - - g_free (out); -} - -int -main (int argc, char *argv[]) -{ -G_GNUC_BEGIN_IGNORE_DEPRECATIONS - if (glib_check_version (2, 36, 0)) - g_type_init (); -G_GNUC_END_IGNORE_DEPRECATIONS - - gboolean show_version = FALSE; - GOptionEntry entries[] = - { - { "version", 0, G_OPTION_FLAG_IN_MAIN, - G_OPTION_ARG_NONE, &show_version, - N_("Output version information and exit"), NULL }, - { NULL } - }; - - if (!setlocale (LC_ALL, "")) - g_printerr ("%s: %s\n", _("Warning"), _("failed to set the locale")); - - bindtextdomain (GETTEXT_PACKAGE, GETTEXT_DIRNAME); - bind_textdomain_codeset (GETTEXT_PACKAGE, "UTF-8"); - textdomain (GETTEXT_PACKAGE); - - GError *error = NULL; - GOptionContext *ctx = g_option_context_new - (N_("[dictionary.ifo...] - StarDict terminal UI")); - GOptionGroup *group = g_option_group_new ("", "", "", NULL, NULL); - g_option_group_add_entries (group, entries); - g_option_group_set_translation_domain (group, GETTEXT_PACKAGE); - g_option_context_add_group (ctx, group); - g_option_context_set_translation_domain (ctx, GETTEXT_PACKAGE); - if (!g_option_context_parse (ctx, &argc, &argv, &error)) - { - g_printerr ("%s: %s: %s\n", _("Error"), _("option parsing failed"), - error->message); - exit (EXIT_FAILURE); - } - g_option_context_free (ctx); - - if (show_version) - { - g_print (PROJECT_NAME " " PROJECT_VERSION "\n"); - exit (EXIT_SUCCESS); - } - - Application app; - app_init (&app, argv + 1); - app_init_terminal (&app); - app_redraw (&app); - - // g_unix_signal_add() cannot handle SIGWINCH - install_winch_handler (); - - // Avoid disruptive warnings - g_log_set_default_handler (log_handler, &app); - - // Message loop - guint watch_term = g_unix_signal_add (SIGTERM, on_terminated, &app); - guint watch_int = g_unix_signal_add (SIGINT, on_terminated, &app); - guint watch_stdin = add_read_watch - (STDIN_FILENO, process_stdin_input, &app); - guint watch_winch = add_read_watch - (g_winch_pipe[0], process_winch_input, &app); - -#ifdef WITH_X11 - SelectionWatch sw; - selection_watch_init (&sw, &app); -#endif // WITH_X11 - - app_run (&app); - -#ifdef WITH_X11 - selection_watch_destroy (&sw); -#endif // WITH_X11 - - g_source_remove (watch_term); - g_source_remove (watch_int); - g_source_remove (watch_stdin); - g_source_remove (watch_winch); - - endwin (); - g_log_set_default_handler (g_log_default_handler, NULL); - app_destroy (&app); - - if (close (g_winch_pipe[0]) == -1 - || close (g_winch_pipe[1]) == -1) - abort (); - - return 0; -} - diff --git a/src/tdv-gui.c b/src/tdv-gui.c new file mode 100644 index 0000000..fcb254f --- /dev/null +++ b/src/tdv-gui.c @@ -0,0 +1,576 @@ +/* + * StarDict GTK+ UI + * + * Copyright (c) 2020 - 2022, Přemysl Eric Janouch + * + * Permission to use, copy, modify, and/or distribute this software for any + * purpose with or without fee is hereby granted. + * + * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES + * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF + * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY + * SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES + * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION + * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN + * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. + * + */ + +#include +#include + +#include + +#include "config.h" +#include "stardict.h" +#include "utils.h" +#include "stardict-view.h" + +static struct +{ + GtkWidget *window; ///< Top-level window + GtkWidget *notebook; ///< Notebook with tabs + GtkWidget *hamburger; ///< Hamburger menu + GtkWidget *entry; ///< Search entry widget + GtkWidget *view; ///< Entries view + + gint dictionary; ///< Index of the current dictionary + gint last; ///< The last dictionary index + GPtrArray *dictionaries; ///< All open dictionaries + + gboolean loading; ///< Dictionaries are being loaded + + gboolean watch_selection; ///< Following X11 PRIMARY? +} +g; + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + +static void +load_from_filenames (GPtrArray *out, gchar **filenames) +{ + for (gsize i = 0; filenames[i]; i++) + { + Dictionary *dict = g_malloc0 (sizeof *dict); + dict->filename = g_strdup (filenames[i]); + g_ptr_array_add (out, dict); + } +} + +// TODO: try to deduplicate, similar to app_load_config_values() +static gboolean +load_from_key_file (GPtrArray *out, GKeyFile *kf, GError **error) +{ + const gchar *dictionaries = "Dictionaries"; + gchar **names = g_key_file_get_keys (kf, dictionaries, NULL, NULL); + if (!names) + return TRUE; + + for (gsize i = 0; names[i]; i++) + { + Dictionary *dict = g_malloc0 (sizeof *dict); + dict->name = names[i]; + g_ptr_array_add (out, dict); + } + g_free (names); + + for (gsize i = 0; i < out->len; i++) + { + Dictionary *dict = g_ptr_array_index (out, i); + gchar *path = + g_key_file_get_string (kf, dictionaries, dict->name, error); + if (!path) + return FALSE; + + // Try to resolve relative paths and expand tildes + if (!(dict->filename = + resolve_filename (path, resolve_relative_config_filename))) + dict->filename = path; + else + g_free (path); + } + return TRUE; +} + +static gboolean +load_from_config (GPtrArray *out, GError **error) +{ + GKeyFile *key_file = load_project_config_file (error); + if (!key_file) + return FALSE; + + gboolean result = load_from_key_file (out, key_file, error); + g_key_file_free (key_file); + return result; +} + +static void +search (Dictionary *dict) +{ + GtkEntryBuffer *buf = gtk_entry_get_buffer (GTK_ENTRY (g.entry)); + const gchar *input_utf8 = gtk_entry_buffer_get_text (buf); + if (!dict->dict) + return; + + StardictIterator *iterator = + stardict_dict_search (dict->dict, input_utf8, NULL); + stardict_view_set_position (STARDICT_VIEW (g.view), + dict->dict, stardict_iterator_get_offset (iterator)); + g_object_unref (iterator); + + stardict_view_set_matched (STARDICT_VIEW (g.view), input_utf8); +} + +static void +on_changed (G_GNUC_UNUSED GtkWidget *widget, G_GNUC_UNUSED gpointer data) +{ + search (g_ptr_array_index (g.dictionaries, g.dictionary)); +} + +static void +on_send (G_GNUC_UNUSED StardictView *view, + const char *word, G_GNUC_UNUSED gpointer data) +{ + GtkEntryBuffer *buf = gtk_entry_get_buffer (GTK_ENTRY (g.entry)); + gtk_entry_buffer_set_text (buf, word, -1); + gtk_editable_select_region (GTK_EDITABLE (g.entry), 0, -1); +} + +static void +on_selection_received (G_GNUC_UNUSED GtkClipboard *clipboard, const gchar *text, + G_GNUC_UNUSED gpointer data) +{ + if (!text) + return; + + gchar *trimmed = g_strstrip (g_strdup (text)); + gtk_entry_set_text (GTK_ENTRY (g.entry), trimmed); + g_free (trimmed); + g_signal_emit_by_name (g.entry, + "move-cursor", GTK_MOVEMENT_BUFFER_ENDS, 1, FALSE); +} + +static void +on_selection (GtkClipboard *clipboard, GdkEvent *event, + G_GNUC_UNUSED gpointer data) +{ + if (g.watch_selection + && !gtk_window_has_toplevel_focus (GTK_WINDOW (g.window)) + && event->owner_change.owner != NULL) + gtk_clipboard_request_text (clipboard, on_selection_received, NULL); +} + +static void +on_selection_watch_toggle (GtkCheckMenuItem *item, G_GNUC_UNUSED gpointer data) +{ + g.watch_selection = gtk_check_menu_item_get_active (item); +} + +static void +on_switch_page (G_GNUC_UNUSED GtkWidget *widget, G_GNUC_UNUSED GtkWidget *page, + guint page_num, G_GNUC_UNUSED gpointer data) +{ + g.last = g.dictionary; + g.dictionary = page_num; + search (g_ptr_array_index (g.dictionaries, g.dictionary)); + + // Hack: Make right-clicking notebook arrows also re-focus the entry. + GdkEvent *event = gtk_get_current_event (); + if (event && event->type == GDK_BUTTON_PRESS) + gtk_widget_grab_focus (g.entry); +} + +static gboolean +accelerate_hamburger (GdkEvent *event) +{ + gchar *accelerator = NULL; + g_object_get (gtk_widget_get_settings (g.window), "gtk-menu-bar-accel", + &accelerator, NULL); + if (!accelerator) + return FALSE; + + guint key = 0; + GdkModifierType mods = 0; + gtk_accelerator_parse (accelerator, &key, &mods); + g_free (accelerator); + + guint mask = gtk_accelerator_get_default_mod_mask (); + if (!key || event->key.keyval != key || (event->key.state & mask) != mods) + return FALSE; + + gtk_button_clicked (GTK_BUTTON (g.hamburger)); + return TRUE; +} + +static gboolean +on_key_press (G_GNUC_UNUSED GtkWidget *widget, GdkEvent *event, + G_GNUC_UNUSED gpointer data) +{ + // The "activate" signal of the GtkMenuButton cannot be used + // from a real accelerator, due to "no trigger event for menu popup". + if (accelerate_hamburger (event)) + return TRUE; + + GtkNotebook *notebook = GTK_NOTEBOOK (g.notebook); + guint mods = event->key.state & gtk_accelerator_get_default_mod_mask (); + if (mods == GDK_CONTROL_MASK) + { + // Can't use gtk_widget_add_accelerator() to change-current-page(-1/+1) + // because that signal has arguments, which cannot be passed. + gint current = gtk_notebook_get_current_page (notebook); + if (event->key.keyval == GDK_KEY_Page_Up) + return gtk_notebook_set_current_page (notebook, --current), TRUE; + if (event->key.keyval == GDK_KEY_Page_Down) + return gtk_notebook_set_current_page (notebook, + ++current % gtk_notebook_get_n_pages (notebook)), TRUE; + } + if (mods == GDK_MOD1_MASK) + { + if (event->key.keyval >= GDK_KEY_0 + && event->key.keyval <= GDK_KEY_9) + { + gint n = event->key.keyval - GDK_KEY_0; + gtk_notebook_set_current_page (notebook, (n ? n : 10) - 1); + return TRUE; + } + if (event->key.keyval == GDK_KEY_Tab) + { + gtk_notebook_set_current_page (notebook, g.last); + return TRUE; + } + } + if (mods == 0) + { + StardictView *view = STARDICT_VIEW (g.view); + if (event->key.keyval == GDK_KEY_Page_Up) + return stardict_view_scroll (view, GTK_SCROLL_PAGES, -0.5), TRUE; + if (event->key.keyval == GDK_KEY_Page_Down) + return stardict_view_scroll (view, GTK_SCROLL_PAGES, +0.5), TRUE; + if (event->key.keyval == GDK_KEY_Up) + return stardict_view_scroll (view, GTK_SCROLL_STEPS, -1), TRUE; + if (event->key.keyval == GDK_KEY_Down) + return stardict_view_scroll (view, GTK_SCROLL_STEPS, +1), TRUE; + } + return FALSE; +} + +static gboolean +on_tab_focus (G_GNUC_UNUSED GtkWidget *widget, + G_GNUC_UNUSED GtkDirectionType direction, G_GNUC_UNUSED gpointer user_data) +{ + // Hack: Make it so that tab headers don't retain newly gained focus + // when clicked, re-focus the entry instead. + GdkEvent *event = gtk_get_current_event (); + if (!event || event->type != GDK_BUTTON_PRESS + || event->button.button != GDK_BUTTON_PRIMARY) + return FALSE; + + gtk_widget_grab_focus (g.entry); + return TRUE; +} + +static void +init_tabs (void) +{ + for (gsize i = g.dictionaries->len; i--; ) + { + Dictionary *dict = g_ptr_array_index (g.dictionaries, i); + GtkWidget *dummy = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0); + g_signal_connect (dummy, "focus", G_CALLBACK (on_tab_focus), NULL); + GtkWidget *label = gtk_label_new (dict->name); + gtk_notebook_insert_page (GTK_NOTEBOOK (g.notebook), dummy, label, 0); + } + + gtk_widget_show_all (g.notebook); + gtk_widget_grab_focus (g.entry); +} + +static void +show_error_dialog (GError *error) +{ + GtkWidget *dialog = gtk_message_dialog_new (GTK_WINDOW (g.window), 0, + GTK_MESSAGE_ERROR, GTK_BUTTONS_CLOSE, "%s", error->message); + gtk_dialog_run (GTK_DIALOG (dialog)); + gtk_widget_destroy (dialog); + g_error_free (error); +} + +static void +on_new_dictionaries_loaded (G_GNUC_UNUSED GObject* source_object, + GAsyncResult* res, G_GNUC_UNUSED gpointer user_data) +{ + g.loading = FALSE; + + GError *error = NULL; + GPtrArray *new_dictionaries = + g_task_propagate_pointer (G_TASK (res), &error); + if (!new_dictionaries) + { + show_error_dialog (error); + return; + } + + while (gtk_notebook_get_n_pages (GTK_NOTEBOOK (g.notebook))) + gtk_notebook_remove_page (GTK_NOTEBOOK (g.notebook), -1); + + g.dictionary = -1; + if (g.dictionaries) + g_ptr_array_free (g.dictionaries, TRUE); + + stardict_view_set_position (STARDICT_VIEW (g.view), NULL, 0); + g.dictionaries = new_dictionaries; + init_tabs (); +} + +static void +on_reload_dictionaries_task (GTask *task, G_GNUC_UNUSED gpointer source_object, + gpointer task_data, G_GNUC_UNUSED GCancellable *cancellable) +{ + GError *error = NULL; + if (load_dictionaries (task_data, &error)) + { + g_task_return_pointer (task, + g_ptr_array_ref (task_data), (GDestroyNotify) g_ptr_array_unref); + } + else + g_task_return_error (task, error); +} + +static gboolean +reload_dictionaries (GPtrArray *new_dictionaries, GError **error) +{ + // TODO: We could cancel that task. + if (g.loading) + { + g_set_error (error, G_IO_ERROR, G_IO_ERROR_FAILED, + "already loading dictionaries"); + return FALSE; + } + + // TODO: Some other kind of indication. + // Note that "action widgets" aren't visible without GtkNotebook tabs. + g.loading = TRUE; + + GTask *task = g_task_new (NULL, NULL, on_new_dictionaries_loaded, NULL); + g_task_set_name (task, __func__); + g_task_set_task_data (task, + new_dictionaries, (GDestroyNotify) g_ptr_array_unref); + g_task_run_in_thread (task, on_reload_dictionaries_task); + g_object_unref (task); + return TRUE; +} + +static void +on_open (G_GNUC_UNUSED GtkMenuItem *item, G_GNUC_UNUSED gpointer data) +{ + // The default is local-only. Paths are returned absolute. + GtkWidget *dialog = gtk_file_chooser_dialog_new (_("Open dictionary"), + GTK_WINDOW (g.window), GTK_FILE_CHOOSER_ACTION_OPEN, + _("_Cancel"), GTK_RESPONSE_CANCEL, + _("_Open"), GTK_RESPONSE_ACCEPT, NULL); + + GtkFileFilter *filter = gtk_file_filter_new (); + gtk_file_filter_add_pattern (filter, "*.ifo"); + gtk_file_filter_set_name (filter, "*.ifo"); + GtkFileChooser *chooser = GTK_FILE_CHOOSER (dialog); + gtk_file_chooser_add_filter (chooser, filter); + gtk_file_chooser_set_select_multiple (chooser, TRUE); + + GPtrArray *new_dictionaries = + g_ptr_array_new_with_free_func ((GDestroyNotify) dictionary_destroy); + if (gtk_dialog_run (GTK_DIALOG (dialog)) == GTK_RESPONSE_ACCEPT) + { + GSList *paths = gtk_file_chooser_get_filenames (chooser); + for (GSList *iter = paths; iter; iter = iter->next) + { + Dictionary *dict = g_malloc0 (sizeof *dict); + dict->filename = iter->data; + g_ptr_array_add (new_dictionaries, dict); + } + g_slist_free (paths); + } + + gtk_widget_destroy (dialog); + + GError *error = NULL; + if (!new_dictionaries->len + || !reload_dictionaries (new_dictionaries, &error)) + g_ptr_array_free (new_dictionaries, TRUE); + + if (error) + show_error_dialog (error); +} + +static void +on_drag_data_received (G_GNUC_UNUSED GtkWidget *widget, GdkDragContext *context, + G_GNUC_UNUSED gint x, G_GNUC_UNUSED gint y, GtkSelectionData *data, + G_GNUC_UNUSED guint info, guint time, G_GNUC_UNUSED gpointer user_data) +{ + GError *error = NULL; + gchar **dropped_uris = gtk_selection_data_get_uris (data); + if (!dropped_uris) + return; + + GPtrArray *new_dictionaries = + g_ptr_array_new_with_free_func ((GDestroyNotify) dictionary_destroy); + for (gsize i = 0; !error && dropped_uris[i]; i++) + { + Dictionary *dict = g_malloc0 (sizeof *dict); + dict->filename = g_filename_from_uri (dropped_uris[i], NULL, &error); + g_ptr_array_add (new_dictionaries, dict); + } + + g_strfreev (dropped_uris); + if (!new_dictionaries->len + || !reload_dictionaries (new_dictionaries, &error)) + g_ptr_array_free (new_dictionaries, TRUE); + + gtk_drag_finish (context, error == NULL, FALSE, time); + + if (error) + show_error_dialog (error); +} + +static void +on_destroy (G_GNUC_UNUSED GtkWidget *widget, G_GNUC_UNUSED gpointer data) +{ + gtk_main_quit (); +} + +static void +die_with_dialog (const gchar *message) +{ + GtkWidget *dialog = gtk_message_dialog_new (NULL, 0, + GTK_MESSAGE_ERROR, GTK_BUTTONS_CLOSE, "%s", message); + gtk_dialog_run (GTK_DIALOG (dialog)); + gtk_widget_destroy (dialog); + exit (EXIT_FAILURE); +} + +int +gui_main (char *argv[]) +{ + // Just like with GtkApplication, argv has been parsed by the option group. + gtk_init (NULL, NULL); + + gtk_window_set_default_icon_name (PROJECT_NAME); + + GError *error = NULL; + GPtrArray *new_dictionaries = + g_ptr_array_new_with_free_func ((GDestroyNotify) dictionary_destroy); + if (argv[0]) + load_from_filenames (new_dictionaries, argv); + else if (!load_from_config (new_dictionaries, &error) && error) + die_with_dialog (error->message); + + if (!new_dictionaries->len) + die_with_dialog (_("No dictionaries found either in " + "the configuration or on the command line")); + + // Some Adwaita stupidity, plus defaults for our own widget. + // All the named colours have been there since GNOME 3.4 + // (see gnome-extra-themes git history, Adwaita used to live there). + const char *style = "notebook header tab { padding: 2px 8px; margin: 0; }" + // `gsettings set org.gnome.desktop.interface gtk-key-theme "Emacs"` + // isn't quite what I want, and note that ^U works by default + "@binding-set Readline {" + "bind 'H' { 'delete-from-cursor' (chars, -1) };" + "bind 'W' { 'delete-from-cursor' (word-ends, -1) }; }" + "entry { -gtk-key-bindings: Readline; border-radius: 0; }" + "stardict-view { padding: 0 .25em; }" + "stardict-view.odd {" + "background: @theme_base_color; " + "color: @theme_text_color; }" + "stardict-view.odd:backdrop {" + "background: @theme_unfocused_base_color; " + "color: @theme_fg_color; /* should be more faded than 'text' */ }" + "stardict-view.even {" + "background: mix(@theme_base_color, @theme_text_color, 0.03); " + "color: @theme_text_color; }" + "stardict-view.even:backdrop {" + "background: mix(@theme_unfocused_base_color, " + "@theme_fg_color, 0.03); " + "color: @theme_fg_color; /* should be more faded than 'text' */ }" + "stardict-view:selected {" + "background-color: @theme_selected_bg_color; " + "color: @theme_selected_fg_color; }"; + + GdkScreen *screen = gdk_screen_get_default (); + GtkCssProvider *provider = gtk_css_provider_new (); + gtk_css_provider_load_from_data (provider, style, strlen (style), NULL); + gtk_style_context_add_provider_for_screen (screen, + GTK_STYLE_PROVIDER (provider), GTK_STYLE_PROVIDER_PRIORITY_APPLICATION); + + GtkWidget *item_open = gtk_menu_item_new_with_mnemonic (_("_Open...")); + g_signal_connect (item_open, "activate", G_CALLBACK (on_open), NULL); + + g.watch_selection = TRUE; + GtkWidget *item_selection = + gtk_check_menu_item_new_with_mnemonic (_("_Follow selection")); + gtk_check_menu_item_set_active + (GTK_CHECK_MENU_ITEM (item_selection), g.watch_selection); + g_signal_connect (item_selection, "toggled", + G_CALLBACK (on_selection_watch_toggle), NULL); + + GtkWidget *menu = gtk_menu_new (); + gtk_widget_set_halign (menu, GTK_ALIGN_END); + gtk_menu_shell_append (GTK_MENU_SHELL (menu), item_open); +#ifndef G_OS_WIN32 + gtk_menu_shell_append (GTK_MENU_SHELL (menu), item_selection); +#endif // ! G_OS_WIN32 + gtk_widget_show_all (menu); + + g.hamburger = gtk_menu_button_new (); + gtk_button_set_relief (GTK_BUTTON (g.hamburger), GTK_RELIEF_NONE); + gtk_button_set_image (GTK_BUTTON (g.hamburger), gtk_image_new_from_icon_name + ("open-menu-symbolic", GTK_ICON_SIZE_BUTTON)); + gtk_menu_button_set_popup (GTK_MENU_BUTTON (g.hamburger), menu); + gtk_widget_show (g.hamburger); + + g.notebook = gtk_notebook_new (); + g_signal_connect (g.notebook, "switch-page", + G_CALLBACK (on_switch_page), NULL); + gtk_notebook_set_scrollable (GTK_NOTEBOOK (g.notebook), TRUE); + gtk_notebook_set_action_widget + (GTK_NOTEBOOK (g.notebook), g.hamburger, GTK_PACK_END); + + g.entry = gtk_search_entry_new (); + g_signal_connect (g.entry, "changed", G_CALLBACK (on_changed), g.view); + + g.window = gtk_window_new (GTK_WINDOW_TOPLEVEL); + gtk_window_set_title (GTK_WINDOW (g.window), PROJECT_NAME); + gtk_window_set_default_size (GTK_WINDOW (g.window), 300, 600); + g_signal_connect (g.window, "destroy", + G_CALLBACK (on_destroy), NULL); + g_signal_connect (g.window, "key-press-event", + G_CALLBACK (on_key_press), NULL); + + GtkWidget *superbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 1); + gtk_container_add (GTK_CONTAINER (g.window), superbox); + gtk_container_add (GTK_CONTAINER (superbox), g.notebook); + gtk_container_add (GTK_CONTAINER (superbox), g.entry); + gtk_container_add (GTK_CONTAINER (superbox), + gtk_separator_new (GTK_ORIENTATION_HORIZONTAL)); + + g.view = stardict_view_new (); + gtk_box_pack_end (GTK_BOX (superbox), g.view, TRUE, TRUE, 0); + + GtkClipboard *clipboard = gtk_clipboard_get (GDK_SELECTION_PRIMARY); + g_signal_connect (clipboard, "owner-change", + G_CALLBACK (on_selection), NULL); + + gtk_drag_dest_set (g.view, + GTK_DEST_DEFAULT_ALL, NULL, 0, GDK_ACTION_COPY); + gtk_drag_dest_add_uri_targets (g.view); + g_signal_connect (g.view, "drag-data-received", + G_CALLBACK (on_drag_data_received), NULL); + g_signal_connect (g.view, "send", + G_CALLBACK (on_send), NULL); + + if (!reload_dictionaries (new_dictionaries, &error)) + die_with_dialog (error->message); + + gtk_widget_show_all (g.window); + gtk_main (); + return 0; +} diff --git a/src/tdv-tui.c b/src/tdv-tui.c new file mode 100644 index 0000000..2863884 --- /dev/null +++ b/src/tdv-tui.c @@ -0,0 +1,2486 @@ +/* + * StarDict terminal UI + * + * Copyright (c) 2013 - 2022, Přemysl Eric Janouch + * + * Permission to use, copy, modify, and/or distribute this software for any + * purpose with or without fee is hereby granted. + * + * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES + * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF + * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY + * SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES + * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION + * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN + * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. + * + */ + +#include +#include +#include +#include +#include + +#include +#include +#include +#include +#include + +#include +#include +#include +#include + +#include // input +#include // output +#include +#include + +#include "config.h" +#include "stardict.h" +#include "utils.h" + +#define CTRL_KEY(x) ((x) - 'A' + 1) + +#define TOP_BAR_CUTOFF 2 ///< How many lines are reserved on top +#define APP_TITLE PROJECT_NAME " " ///< Left top corner + +#ifndef A_ITALIC +#define A_ITALIC 0 +#endif + +// --- Utilities --------------------------------------------------------------- + +static size_t +unichar_width (gunichar ch) +{ + if (g_unichar_iszerowidth (ch)) + return 0; + return 1 + g_unichar_iswide (ch); +} + +void +update_curses_terminal_size (void) +{ +#if defined HAVE_RESIZETERM && defined TIOCGWINSZ + struct winsize size; + if (!ioctl (STDOUT_FILENO, TIOCGWINSZ, (char *) &size)) + { + char *row = getenv ("LINES"); + char *col = getenv ("COLUMNS"); + unsigned long tmp; + resizeterm ( + (row && xstrtoul (&tmp, row, 10)) ? tmp : size.ws_row, + (col && xstrtoul (&tmp, col, 10)) ? tmp : size.ws_col); + } +#else // HAVE_RESIZETERM && TIOCGWINSZ + // The standard endwin/refresh sequence makes the terminal flicker. + endwin (); + refresh (); +#endif // HAVE_RESIZETERM && TIOCGWINSZ +} + +static guint +add_read_watch (int fd, GIOFunc func, gpointer user_data) +{ + GIOChannel *channel = g_io_channel_unix_new (fd); + guint res = g_io_add_watch (channel, G_IO_IN, func, user_data); + g_io_channel_unref (channel); + return res; +} + +// --- Application ------------------------------------------------------------- + +#define ATTRIBUTE_TABLE(XX) \ + XX( HEADER, "header", -1, -1, A_REVERSE ) \ + XX( ACTIVE, "header-active", -1, -1, A_UNDERLINE ) \ + XX( SEARCH, "search", -1, -1, A_UNDERLINE ) \ + XX( EVEN, "even", -1, -1, 0 ) \ + XX( ODD, "odd", -1, -1, 0 ) \ + XX( SELECTION, "selection", -1, -1, A_REVERSE ) \ + XX( DEFOCUSED, "defocused", -1, -1, A_REVERSE ) + +enum +{ +#define XX(name, config, fg_, bg_, attrs_) ATTRIBUTE_ ## name, + ATTRIBUTE_TABLE (XX) +#undef XX + ATTRIBUTE_COUNT +}; + +struct attrs +{ + short fg; ///< Foreground color index + short bg; ///< Background color index + chtype attrs; ///< Other attributes +}; + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + +/// Data relating to one entry within the dictionary. +typedef struct view_entry ViewEntry; +/// Data relating to a dictionary file. +typedef struct app_dictionary AppDictionary; +/// Encloses application data. +typedef struct application Application; + +struct view_entry +{ + gchar * word; ///< Word + GPtrArray * definitions; ///< Word definition entries (gchar *) + GPtrArray * formatting; ///< chtype * or NULL per definition +}; + +struct app_dictionary +{ + Dictionary super; ///< Superclass + gsize name_width; ///< Visible width of the name +}; + +struct application +{ + GMainLoop * loop; ///< Main loop + termo_t * tk; ///< termo handle + guint tk_timer; ///< termo timeout timer + GIConv ucs4_to_locale; ///< UTF-32 -> locale conversion + gboolean locale_is_utf8; ///< The locale is Unicode + gboolean focused; ///< Whether the terminal has focus + + GPtrArray * dictionaries; ///< All loaded AppDictionaries + + StardictDict * dict; ///< The current dictionary + StardictDict * last; ///< The last dictionary + guint show_help : 1; ///< Whether help can be shown + guint center_search : 1; ///< Whether to center the search + guint underline_last : 1; ///< Underline the last definition + guint hl_prefix : 1; ///< Highlight the common prefix + guint watch_x11_sel : 1; ///< Requested X11 selection watcher + + guint dict_offset; ///< Scroll position of the tab bar + guint32 top_position; ///< Index of the topmost dict. entry + guint top_offset; ///< Offset into the top entry + guint selected; ///< Offset to the selected definition + GPtrArray * entries; ///< ViewEntry-s within the view + + gchar * search_label; ///< Text of the "Search" label + gsize search_label_width; ///< Visible width of "search_label" + GArray * input; ///< The current search input + guint input_pos; ///< Cursor position within input + guint input_offset; ///< Render offset in codepoints + gboolean input_confirmed; ///< Input has been confirmed + + gfloat division; ///< Position of the division column + + struct attrs attrs[ATTRIBUTE_COUNT]; +}; + +/// Shortcuts to retrieve named terminal attributes +#define APP_ATTR(name) self->attrs[ATTRIBUTE_ ## name].attrs +#define APP_ATTR_IF(b, name1, name2) ((b) ? APP_ATTR (name1) : APP_ATTR (name2)) + +/// Returns if the Unicode character is representable in the current locale. +static gboolean +app_is_character_in_locale (Application *self, gunichar ch) +{ + // Avoid the overhead joined with calling iconv() for all characters + if (self->locale_is_utf8) + return TRUE; + + gchar *tmp = g_convert_with_iconv ((const gchar *) &ch, sizeof ch, + self->ucs4_to_locale, NULL, NULL, NULL); + if (!tmp) + return FALSE; + g_free (tmp); + return TRUE; +} + +static gsize +app_char_width (Application *app, gunichar c) +{ + if (!app_is_character_in_locale (app, c)) + return 1; + return unichar_width (c); +} + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + +#if !GLIB_CHECK_VERSION(2, 68, 0) +#define g_memdup2 g_memdup +#endif + +/// Splits the entry and adds it to a pointer array. +static void +view_entry_split_add (ViewEntry *ve, const gchar *text, const chtype *attrs) +{ + const gchar *p = text, *nl; + for (; (nl = strchr (p, '\n')); p = nl + 1) + if (nl != p) + { + g_ptr_array_add (ve->definitions, g_strndup (p, nl - p)); + g_ptr_array_add (ve->formatting, !attrs ? NULL + : g_memdup2 (attrs + (p - text), (nl - p) * sizeof *attrs)); + } + if (*p) + { + g_ptr_array_add (ve->definitions, g_strdup (p)); + g_ptr_array_add (ve->formatting, !attrs ? NULL + : g_memdup2 (attrs + (p - text), strlen (p) * sizeof *attrs)); + } +} + +static chtype +app_pango_iterator_to_attrs (PangoAttrIterator *iterator) +{ + chtype attrs = 0; + PangoAttrInt *attr = NULL; + if ((attr = (PangoAttrInt *) pango_attr_iterator_get (iterator, + PANGO_ATTR_WEIGHT)) && attr->value >= PANGO_WEIGHT_BOLD) + attrs |= A_BOLD; + if ((attr = (PangoAttrInt *) pango_attr_iterator_get (iterator, + PANGO_ATTR_UNDERLINE)) && attr->value == PANGO_UNDERLINE_SINGLE) + attrs |= A_UNDERLINE; + if ((attr = (PangoAttrInt *) pango_attr_iterator_get (iterator, + PANGO_ATTR_STYLE)) && attr->value == PANGO_STYLE_ITALIC) + attrs |= A_ITALIC; + return attrs; +} + +static void +view_entry_split_add_pango (ViewEntry *ve, const gchar *markup) +{ + // This function skips leading whitespace, but it's the canonical one + gchar *text = NULL; + PangoAttrList *attrs = NULL; + if (!pango_parse_markup (markup, -1, 0, &attrs, &text, NULL, NULL)) + { + gchar *replacement = g_strdup_printf ("<%s>", _("error in entry")); + view_entry_split_add (ve, replacement, NULL); + g_free (replacement); + return; + } + + PangoAttrIterator *iterator = pango_attr_list_get_iterator (attrs); + chtype *formatting = g_malloc0_n (strlen (text), sizeof *formatting); + do + { + gint start = 0, end = 0; + pango_attr_iterator_range (iterator, &start, &end); + if (end == G_MAXINT) + end = strlen (text); + + chtype attrs = app_pango_iterator_to_attrs (iterator); + while (start < end) + formatting[start++] = attrs; + } + while (pango_attr_iterator_next (iterator)); + + view_entry_split_add (ve, text, formatting); + g_free (formatting); + pango_attr_iterator_destroy (iterator); + pango_attr_list_unref (attrs); + g_free (text); +} + +static void +view_entry_split_add_xdxf (ViewEntry *ve, const gchar *xml) +{ + gchar *markup = xdxf_to_pango_markup_with_reduced_effort (xml); + view_entry_split_add_pango (ve, markup); + g_free (markup); +} + +/// Decomposes a dictionary entry into the format we want. +static ViewEntry * +view_entry_new (StardictIterator *iterator) +{ + g_return_val_if_fail (stardict_iterator_is_valid (iterator), NULL); + + ViewEntry *ve = g_slice_alloc (sizeof *ve); + GString *word = g_string_new (stardict_iterator_get_word (iterator)); + + StardictEntry *entry = stardict_iterator_get_entry (iterator); + g_return_val_if_fail (entry != NULL, NULL); + + ve->definitions = g_ptr_array_new_with_free_func (g_free); + ve->formatting = g_ptr_array_new_with_free_func (g_free); + gboolean found_anything_displayable = FALSE; + for (const GList *fields = stardict_entry_get_fields (entry); fields; ) + { + const StardictEntryField *field = fields->data; + switch (field->type) + { + case STARDICT_FIELD_MEANING: + view_entry_split_add (ve, field->data, NULL); + found_anything_displayable = TRUE; + break; + case STARDICT_FIELD_PANGO: + view_entry_split_add_pango (ve, field->data); + found_anything_displayable = TRUE; + break; + case STARDICT_FIELD_XDXF: + view_entry_split_add_xdxf (ve, field->data); + found_anything_displayable = TRUE; + break; + case STARDICT_FIELD_PHONETIC: + // FIXME this makes it highlightable + g_string_append_printf (word, " /%s/", (const gchar *) field->data); + break; + default: + // TODO support more of them + break; + } + fields = fields->next; + } + g_object_unref (entry); + + if (!found_anything_displayable) + g_ptr_array_add (ve->definitions, + g_strdup_printf ("<%s>", _("no usable field found"))); + + ve->word = g_string_free (word, FALSE); + return ve; +} + +/// Release resources associated with the view entry. +static void +view_entry_free (ViewEntry *ve) +{ + g_free (ve->word); + g_ptr_array_free (ve->definitions, TRUE); + g_ptr_array_free (ve->formatting, TRUE); + g_slice_free1 (sizeof *ve, ve); +} + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + +/// Reload view items. +static void +app_reload_view (Application *self) +{ + if (self->entries->len != 0) + g_ptr_array_remove_range (self->entries, 0, self->entries->len); + + gint remains = LINES - TOP_BAR_CUTOFF + self->top_offset; + StardictIterator *iterator = + stardict_iterator_new (self->dict, self->top_position); + while (remains > 0 && stardict_iterator_is_valid (iterator)) + { + ViewEntry *entry = view_entry_new (iterator); + remains -= entry->definitions->len; + g_ptr_array_add (self->entries, entry); + stardict_iterator_next (iterator); + } + g_object_unref (iterator); +} + +/// Load configuration for a color using a subset of git config colors. +static void +app_load_color (Application *self, GKeyFile *kf, const gchar *name, int id) +{ + gchar *value = g_key_file_get_string (kf, "Colors", name, NULL); + if (!value) + return; + + struct attrs attrs = { -1, -1, 0 }; + gchar **values = g_strsplit (value, " ", 0); + gint colors = 0; + for (gchar **it = values; *it; it++) + { + gchar *end = NULL; + gint64 n = g_ascii_strtoll (*it, &end, 10); + if (*it != end && !*end && n >= G_MINSHORT && n <= G_MAXSHORT) + { + if (colors == 0) attrs.fg = n; + if (colors == 1) attrs.bg = n; + colors++; + } + else if (!strcmp (*it, "bold")) attrs.attrs |= A_BOLD; + else if (!strcmp (*it, "dim")) attrs.attrs |= A_DIM; + else if (!strcmp (*it, "ul")) attrs.attrs |= A_UNDERLINE; + else if (!strcmp (*it, "blink")) attrs.attrs |= A_BLINK; + else if (!strcmp (*it, "reverse")) attrs.attrs |= A_REVERSE; + else if (!strcmp (*it, "italic")) attrs.attrs |= A_ITALIC; + } + g_strfreev (values); + + g_free (value); + self->attrs[id] = attrs; +} + +static gboolean +app_load_bool (GKeyFile *kf, const gchar *name, gboolean def) +{ + GError *e = NULL; + bool value = g_key_file_get_boolean (kf, "Settings", name, &e); + if (e) + { + g_error_free (e); + return def; + } + return value; +} + +static void +app_load_config_values (Application *self, GKeyFile *kf) +{ + self->center_search = + app_load_bool (kf, "center-search", self->center_search); + self->underline_last = + app_load_bool (kf, "underline-last", self->underline_last); + self->hl_prefix = + app_load_bool (kf, "hl-common-prefix", self->hl_prefix); + self->watch_x11_sel = + app_load_bool (kf, "watch-selection", self->watch_x11_sel); + +#define XX(name, config, fg_, bg_, attrs_) \ + app_load_color (self, kf, config, ATTRIBUTE_ ## name); + ATTRIBUTE_TABLE (XX) +#undef XX + + const gchar *dictionaries = "Dictionaries"; + gchar **names = g_key_file_get_keys (kf, dictionaries, NULL, NULL); + if (!names) + return; + + for (gchar **it = names; *it; it++) + { + gchar *path = g_key_file_get_string (kf, dictionaries, *it, NULL); + if (!path) + continue; + + // Try to resolve relative paths and expand tildes + gchar *resolved = + resolve_filename (path, resolve_relative_config_filename); + if (resolved) + g_free (path); + else + resolved = path; + + AppDictionary *dict = g_malloc0 (sizeof *dict); + dict->super.name = g_strdup (*it); + dict->super.filename = resolved; + g_ptr_array_add (self->dictionaries, dict); + } + g_strfreev (names); +} + +static void +app_load_config (Application *self, GError **error) +{ + // TODO: proper error handling showing all relevant information; + // we can afford that here since the terminal hasn't been initialized yet + GKeyFile *key_file = load_project_config_file (error); + if (key_file) + { + app_load_config_values (self, key_file); + g_key_file_free (key_file); + } +} + +static void +app_init_attrs (Application *self) +{ +#define XX(name, config, fg_, bg_, attrs_) \ + self->attrs[ATTRIBUTE_ ## name].fg = fg_; \ + self->attrs[ATTRIBUTE_ ## name].bg = bg_; \ + self->attrs[ATTRIBUTE_ ## name].attrs = attrs_; + ATTRIBUTE_TABLE (XX) +#undef XX +} + +static gsize +app_utf8_width (Application *self, const char *utf8) +{ + gsize width = 0; + gunichar *ucs4 = g_utf8_to_ucs4_fast (utf8, -1, NULL); + for (gunichar *it = ucs4; *it; it++) + width += app_char_width (self, *it); + g_free (ucs4); + return width; +} + +static gboolean +app_load_dictionaries (Application *self, GError **e) +{ + if (!load_dictionaries (self->dictionaries, e)) + return FALSE; + + for (gsize i = 0; i < self->dictionaries->len; i++) + { + AppDictionary *dict = g_ptr_array_index (self->dictionaries, i); + + // Add some padding for decorative purposes + gchar *tmp = g_strdup_printf (" %s ", dict->super.name); + g_free (dict->super.name); + dict->super.name = tmp; + dict->name_width = app_utf8_width (self, dict->super.name); + } + return TRUE; +} + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + +/// Initialize the application core. +static void +app_init (Application *self, char **filenames) +{ + self->loop = NULL; + + self->tk = NULL; + self->tk_timer = 0; + + const char *charset = NULL; + self->locale_is_utf8 = g_get_charset (&charset); +#if G_BYTE_ORDER == G_LITTLE_ENDIAN + self->ucs4_to_locale = g_iconv_open (charset, "UTF-32LE"); +#else // G_BYTE_ORDER != G_LITTLE_ENDIAN + self->ucs4_to_locale = g_iconv_open (charset, "UTF-32BE"); +#endif // G_BYTE_ORDER != G_LITTLE_ENDIAN + self->focused = TRUE; + + self->show_help = TRUE; + self->center_search = TRUE; + self->underline_last = TRUE; + self->hl_prefix = TRUE; + self->watch_x11_sel = FALSE; + + self->top_position = 0; + self->top_offset = 0; + self->selected = 0; + self->entries = g_ptr_array_new_with_free_func + ((GDestroyNotify) view_entry_free); + + self->search_label = g_strdup_printf ("%s: ", _("Search")); + self->search_label_width = app_utf8_width (self, self->search_label); + + self->input = g_array_new (TRUE, FALSE, sizeof (gunichar)); + self->input_pos = self->input_offset = 0; + self->input_confirmed = FALSE; + + self->division = 0.5; + + app_init_attrs (self); + self->dictionaries = + g_ptr_array_new_with_free_func ((GDestroyNotify) dictionary_destroy); + + GError *error = NULL; + app_load_config (self, &error); + if (error) + { + g_printerr ("%s: %s\n", _("Cannot load configuration"), error->message); + exit (EXIT_FAILURE); + } + + self->loop = g_main_loop_new (NULL, FALSE); + + // Dictionaries given on the command line override the configuration + if (*filenames) + { + g_ptr_array_set_size (self->dictionaries, 0); + while (*filenames) + { + AppDictionary *dict = g_malloc0 (sizeof *dict); + dict->super.filename = g_strdup (*filenames++); + g_ptr_array_add (self->dictionaries, dict); + } + } + + if (!app_load_dictionaries (self, &error)) + { + g_printerr ("%s: %s\n", _("Error loading dictionary"), error->message); + exit (EXIT_FAILURE); + } + if (!self->dictionaries->len) + { + g_printerr ("%s\n", _("No dictionaries found either in " + "the configuration or on the command line")); + exit (EXIT_FAILURE); + } + self->dict = ((AppDictionary *) + g_ptr_array_index (self->dictionaries, 0))->super.dict; + app_reload_view (self); +} + +static void +app_init_terminal (Application *self) +{ + TERMO_CHECK_VERSION; + if (!(self->tk = termo_new (STDIN_FILENO, NULL, 0))) + abort (); + if (!initscr () || nonl () == ERR) + abort (); + + // By default we don't use any colors so they're not required... + if (start_color () == ERR + || use_default_colors () == ERR + || COLOR_PAIRS <= ATTRIBUTE_COUNT) + return; + + gboolean failed = FALSE; + for (int a = 0; a < ATTRIBUTE_COUNT; a++) + { + if (self->attrs[a].fg == -1 && + self->attrs[a].bg == -1) + continue; + + if (self->attrs[a].fg >= COLORS || self->attrs[a].fg < -1 + || self->attrs[a].bg >= COLORS || self->attrs[a].bg < -1) + { + failed = TRUE; + continue; + } + + init_pair (a + 1, self->attrs[a].fg, self->attrs[a].bg); + self->attrs[a].attrs |= COLOR_PAIR (a + 1); + } + + // ...thus we can reset back to defaults even after initializing some + if (failed) + app_init_attrs (self); +} + +/// Free any resources used by the application. +static void +app_destroy (Application *self) +{ + if (self->loop) + g_main_loop_unref (self->loop); + if (self->tk) + termo_destroy (self->tk); + if (self->tk_timer) + g_source_remove (self->tk_timer); + + g_ptr_array_free (self->entries, TRUE); + g_free (self->search_label); + g_array_free (self->input, TRUE); + g_ptr_array_free (self->dictionaries, TRUE); + + g_iconv_close (self->ucs4_to_locale); +} + +/// Run the main event dispatch loop. +static void +app_run (Application *self) +{ + g_main_loop_run (self->loop); +} + +/// Quit the main event dispatch loop. +static void +app_quit (Application *self) +{ + g_main_loop_quit (self->loop); +} + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + +// Necessary abstraction to simplify aligned, formatted character output + +typedef struct row_char RowChar; +typedef struct row_buffer RowBuffer; + +struct row_char +{ + gunichar c; ///< Unicode codepoint + chtype attrs; ///< Special attributes + int width; ///< How many cells this takes +}; + +struct row_buffer +{ + Application *app; ///< Reference to Application + GArray *chars; ///< Characters + int total_width; ///< Total width of all characters +}; + +static RowBuffer +row_buffer_make (Application *app) +{ + return (RowBuffer) + { + .app = app, + .chars = g_array_new (FALSE, TRUE, sizeof (RowChar)), + .total_width = 0, + }; +} + +#define row_buffer_free(self) g_array_unref ((self)->chars) + +/// Replace invalid chars and push all codepoints to the array w/ attributes. +static void +row_buffer_append_length (RowBuffer *self, + const gchar *text, glong length, chtype attrs) +{ + if (length == 0) + return; + + glong ucs4_len; + gunichar *ucs4 = g_utf8_to_ucs4_fast (text, length, &ucs4_len); + for (glong i = 0; i < ucs4_len; i++) + { + // XXX: this is very crude as it disrespects combining marks + gunichar c = + app_is_character_in_locale (self->app, ucs4[i]) ? ucs4[i] : '?'; + RowChar rc = { c, attrs, unichar_width (c) }; + g_array_append_val (self->chars, rc); + self->total_width += rc.width; + } + g_free (ucs4); +} + +static void +row_buffer_append (RowBuffer *self, const gchar *text, chtype attrs) +{ + row_buffer_append_length (self, text, -1, attrs); +} + +/// Combine attributes, taking care to replace colour bits entirely +static void +row_buffer_merge_attributes (chtype *target, int merged) +{ + if (merged & A_COLOR) + *target = (*target & ~A_COLOR) | merged; + else + *target |= merged; +} + +static void +row_buffer_append_with_formatting (RowBuffer *self, + const gchar *text, const chtype *formatting, chtype default_attrs) +{ + if (!formatting) + { + row_buffer_append (self, text, default_attrs); + return; + } + + while (*text) + { + glong chunk_length = 1; + while (text[chunk_length] && formatting[chunk_length] == *formatting) + chunk_length++; + + chtype merged = default_attrs; + row_buffer_merge_attributes (&merged, *formatting); + row_buffer_append_length (self, text, chunk_length, merged); + + text += chunk_length; + formatting += chunk_length; + } +} + +/// Pop as many codepoints as needed to free up "space" character cells. +/// Given the suffix nature of combining marks, this should work pretty fine. +static gint +row_buffer_pop_cells (RowBuffer *self, gint space) +{ + int made = 0; + while (self->chars->len && made < space) + { + guint last = self->chars->len - 1; + made += g_array_index (self->chars, RowChar, last).width; + g_array_remove_index (self->chars, last); + } + self->total_width -= made; + return made; +} + +static void +row_buffer_ellipsis (RowBuffer *self, int target, chtype attrs) +{ + row_buffer_pop_cells (self, self->total_width - target); + + gunichar ellipsis = L'…'; + if (app_is_character_in_locale (self->app, ellipsis)) + { + if (self->total_width >= target) + row_buffer_pop_cells (self, 1); + if (self->total_width + 1 <= target) + row_buffer_append (self, "…", attrs); + } + else if (target >= 3) + { + if (self->total_width >= target) + row_buffer_pop_cells (self, 3); + if (self->total_width + 3 <= target) + row_buffer_append (self, "...", attrs); + } +} + +static void +row_buffer_align (RowBuffer *self, int target, chtype attrs) +{ + if (target >= 0 && self->total_width > target) + row_buffer_ellipsis (self, target, attrs); + + while (self->total_width < target) + { + struct row_char rc = { ' ', attrs, 1 }; + g_array_append_val (self->chars, rc); + self->total_width += rc.width; + } +} + +static void +row_buffer_print (RowBuffer *self, gunichar *ucs4, size_t len, chtype attrs) +{ + gsize locale_str_len; + gchar *str = g_convert_with_iconv ((const gchar *) ucs4, len * sizeof *ucs4, + self->app->ucs4_to_locale, NULL, &locale_str_len, NULL); + g_return_if_fail (str != NULL); + + attrset (attrs); + addstr (str); + attrset (0); + g_free (str); +} + +static void +row_buffer_flush (RowBuffer *self) +{ + if (!self->chars->len) + return; + + gunichar ucs4[self->chars->len]; + for (guint i = 0; i < self->chars->len; i++) + ucs4[i] = g_array_index (self->chars, RowChar, i).c; + + guint mark = 0; + for (guint i = 1; i < self->chars->len; i++) + { + chtype attrs = g_array_index (self->chars, RowChar, i - 1).attrs; + if (attrs != g_array_index (self->chars, RowChar, i).attrs) + { + row_buffer_print (self, ucs4 + mark, i - mark, attrs); + mark = i; + } + } + row_buffer_print (self, ucs4 + mark, self->chars->len - mark, + g_array_index (self->chars, RowChar, self->chars->len - 1).attrs); +} + +/// Align the buffer to @a width (if not lesser than zero) using @a attrs +static void +row_buffer_finish (RowBuffer *self, int width, chtype attrs) +{ + row_buffer_align (self, width, attrs); + row_buffer_flush (self); + row_buffer_free (self); +} + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + +static gint +app_input_width (Application *self, guint begin, guint end) +{ + gint width = 0; + for (guint i = begin; i < end; i++) + width += app_char_width (self, + g_array_index (self->input, gunichar, i)); + return width; +} + +static guint +app_scroll_back_input (Application *self, guint from, gint target) +{ + guint last_spacing = from; + while (from--) + { + gint width = app_input_width (self, from, from + 1); + if (target < width) + break; + + if (width) + { + last_spacing = from; + target -= width; + } + } + return last_spacing; +} + +static guint +app_adjust_input_offset (Application *self, gint space) +{ + gint to_cursor = + app_input_width (self, 0, self->input_pos); + gint at_cursor = + app_input_width (self, self->input_pos, self->input_pos + 1); + gint past_cursor = + app_input_width (self, self->input_pos + 1, self->input->len); + + // 1. If everything fits, no scrolling is desired, and no arrows present + if (to_cursor + at_cursor + past_cursor <= space) + return 0; + + // TODO: try to prevent 2. and 3. from fighting with each other + + // 2. If everything up to and including the cursor, plus right arrow fits, + // start at the beginning + if (to_cursor + at_cursor + 1 /* right arrow */ <= space) + return 0; + + // 3. If everything from the cursor to the right fits, fill the line, + // but keep one extra space for a trailing caret + gint reserved = self->input_pos != self->input->len; + gint from_cursor_with_trailing_caret = at_cursor + past_cursor + reserved; + if (1 /* left arrow */ + from_cursor_with_trailing_caret <= space) + return app_scroll_back_input (self, self->input->len, space - 1 - 1); + + // At this point, we know there will be arrows on both sides + space -= 2; + + // 4. If the cursor has moved too much to either side, follow it + if (self->input_pos < self->input_offset + || app_input_width (self, self->input_offset, self->input_pos + 1) > space) + return app_scroll_back_input (self, self->input_pos, space / 2); + + // 5. Otherwise, don't fiddle with the offset at all, it's not necessary + return self->input_offset; +} + +/// Render the top bar. +static void +app_redraw_top (Application *self) +{ + RowBuffer buf = row_buffer_make (self); + row_buffer_append (&buf, APP_TITLE, APP_ATTR (HEADER) | A_BOLD); + + // Trivially ensure the current dictionary's tab is visible. + int available = COLS - buf.total_width, width = 0; + self->dict_offset = 0; + for (guint i = 0; i < self->dictionaries->len; i++) + { + AppDictionary *dict = g_ptr_array_index (self->dictionaries, i); + width += dict->name_width; + if (self->dict != dict->super.dict) + continue; + + gboolean is_last = i + 1 == self->dictionaries->len; + while (self->dict_offset < i + && (available < width || (available == width && !is_last))) + { + dict = g_ptr_array_index (self->dictionaries, self->dict_offset++); + width -= dict->name_width; + } + break; + } + + for (guint i = self->dict_offset; i < self->dictionaries->len; i++) + { + AppDictionary *dict = g_ptr_array_index (self->dictionaries, i); + row_buffer_append (&buf, dict->super.name, + APP_ATTR_IF (self->dictionaries->len > 1 + && self->dict == dict->super.dict, ACTIVE, HEADER)); + } + move (0, 0); + row_buffer_finish (&buf, COLS, APP_ATTR (HEADER)); + + buf = row_buffer_make (self); + row_buffer_append (&buf, self->search_label, APP_ATTR (SEARCH)); + gint indent = buf.total_width; + + int word_attrs = APP_ATTR (SEARCH); + if (self->input_confirmed) + word_attrs |= A_BOLD; + + self->input_offset = app_adjust_input_offset (self, COLS - indent); + if (self->input_offset) + { + row_buffer_append (&buf, "<", word_attrs ^ A_BOLD); + indent++; + } + + gchar *input_utf8 = g_ucs4_to_utf8 ((gunichar *) self->input->data + + self->input_offset, -1, NULL, NULL, NULL); + g_return_if_fail (input_utf8 != NULL); + row_buffer_append (&buf, input_utf8, word_attrs); + g_free (input_utf8); + + gint overflow = buf.total_width - COLS; + if (overflow > 0) + { + row_buffer_pop_cells (&buf, overflow + 1 /* right arrow */); + row_buffer_align (&buf, COLS - 1 /* right arrow */, APP_ATTR (SEARCH)); + row_buffer_append (&buf, ">", word_attrs ^ A_BOLD); + } + + row_buffer_finish (&buf, COLS, APP_ATTR (SEARCH)); + gint offset = app_input_width (self, self->input_offset, self->input_pos); + + move (1, MIN (indent + offset, COLS - 1)); + refresh (); +} + +/// Computes width for the left column. +static guint +app_get_left_column_width (Application *self) +{ + gint width = COLS * self->division + 0.5; + if (width < 1) + width = 1; + else if (width > COLS - 2) + width = COLS - 2; + return width; +} + +/// Display a message in the view area. +static void +app_show_message (Application *self, const gchar *lines[], gsize len) +{ + gint top = (LINES - TOP_BAR_CUTOFF - len) / 2; + + gint i; + for (i = 0; i < top; i++) + { + move (TOP_BAR_CUTOFF + i, 0); + clrtoeol (); + } + + while (len-- && i < LINES - TOP_BAR_CUTOFF) + { + RowBuffer buf = row_buffer_make (self); + row_buffer_append (&buf, *lines, 0); + gint x = (COLS - buf.total_width) / 2; + + move (TOP_BAR_CUTOFF + i, 0); + clrtoeol (); + move (TOP_BAR_CUTOFF + i, MAX (x, 0)); + row_buffer_finish (&buf, -1, 0); + + lines++; + i++; + } + + clrtobot (); + refresh (); +} + +/// Show some information about the program. +static void +app_show_help (Application *self) +{ + const gchar *lines[] = + { + PROJECT_NAME " " PROJECT_VERSION, + _("Terminal UI for StarDict dictionaries"), + "Copyright (c) 2013 - 2022, Přemysl Eric Janouch", + "", + _("Type to search") + }; + + app_show_message (self, lines, G_N_ELEMENTS (lines)); +} + +static void +app_draw_word (Application *self, + ViewEntry *ve, size_t common_prefix, int width, chtype attrs) +{ + RowBuffer buf = row_buffer_make (self); + row_buffer_append_length (&buf, ve->word, common_prefix, attrs | A_BOLD); + row_buffer_append (&buf, ve->word + common_prefix, attrs); + row_buffer_finish (&buf, width, attrs); +} + +static void +app_draw_definition (Application *self, + ViewEntry *ve, guint index, int width, chtype attrs) +{ + RowBuffer buf = row_buffer_make (self); + row_buffer_append (&buf, " ", attrs); + row_buffer_append_with_formatting (&buf, + g_ptr_array_index (ve->definitions, index), + g_ptr_array_index (ve->formatting, index), attrs); + row_buffer_finish (&buf, width, attrs); +} + +/// Redraw the dictionary view. +static void +app_redraw_view (Application *self) +{ + if (self->show_help) + { + app_show_help (self); + return; + } + + move (TOP_BAR_CUTOFF, 0); + clrtobot (); + + gint left_width = app_get_left_column_width (self); + gchar *input_utf8 = g_ucs4_to_utf8 ((gunichar *) self->input->data, -1, + NULL, NULL, NULL); + + guint i, offset = self->top_offset, shown = 0; + for (i = 0; i < self->entries->len; i++) + { + ViewEntry *ve = g_ptr_array_index (self->entries, i); + size_t common_prefix = 0; + if (self->hl_prefix) + { + common_prefix = stardict_longest_common_collation_prefix + (self->dict, ve->word, input_utf8); + } + chtype ve_attrs = APP_ATTR_IF ((self->top_position + i) & 1, ODD, EVEN); + for (; offset < ve->definitions->len; offset++) + { + chtype attrs = ve_attrs; + if ((offset + 1 == ve->definitions->len) && self->underline_last) + attrs |= A_UNDERLINE; + if (shown == self->selected) + row_buffer_merge_attributes (&attrs, + APP_ATTR_IF (self->focused, SELECTION, DEFOCUSED)); + + app_draw_word (self, ve, common_prefix, left_width, attrs); + app_draw_definition (self, ve, offset, COLS - left_width, attrs); + if ((gint) ++shown == LINES - TOP_BAR_CUTOFF) + goto done; + } + + offset = 0; + } + +done: + free (input_utf8); + refresh (); +} + +static ViewEntry * +entry_for_position (Application *self, guint32 position) +{ + StardictIterator *iterator = stardict_iterator_new (self->dict, position); + ViewEntry *ve = NULL; + if (stardict_iterator_is_valid (iterator)) + ve = view_entry_new (iterator); + g_object_unref (iterator); + return ve; +} + +/// Just prepends a new view entry into the entries array. +static ViewEntry * +prepend_entry (Application *self, guint32 position) +{ + ViewEntry *ve = entry_for_position (self, position); + g_ptr_array_add (self->entries, NULL); + memmove (self->entries->pdata + 1, self->entries->pdata, + sizeof ve * (self->entries->len - 1)); + return g_ptr_array_index (self->entries, 0) = ve; +} + +/// Counts the number of definitions available for seeing. +static guint +app_count_view_items (Application *self) +{ + guint i, n_definitions = 0; + for (i = 0; i < self->entries->len; i++) + { + ViewEntry *entry = g_ptr_array_index (self->entries, i); + n_definitions += entry->definitions->len; + } + return n_definitions; +} + +/// Scroll up @a n entries. Doesn't redraw. +static gint +app_scroll_up (Application *self, guint n) +{ + guint n_definitions = app_count_view_items (self); + gint scrolled = 0; + for (; n--; scrolled++) + { + if (self->top_offset > 0) + { + self->top_offset--; + continue; + } + + // We've reached the top + if (self->top_position == 0) + break; + + ViewEntry *ve = prepend_entry (self, --self->top_position); + self->top_offset = ve->definitions->len - 1; + n_definitions += ve->definitions->len; + + // Remove the last entry if not shown + ViewEntry *last_entry = + g_ptr_array_index (self->entries, self->entries->len - 1); + if ((gint) (n_definitions - self->top_offset + - last_entry->definitions->len) >= LINES - TOP_BAR_CUTOFF) + { + n_definitions -= last_entry->definitions->len; + g_ptr_array_remove_index_fast + (self->entries, self->entries->len - 1); + } + } + return scrolled; +} + +/// Scroll down @a n entries. Doesn't redraw. +static gint +app_scroll_down (Application *self, guint n) +{ + guint n_definitions = app_count_view_items (self); + gint scrolled = 0; + for (; n--; scrolled++) + { + if (self->entries->len == 0) + break; + + // Simulate the movement first to disallow scrolling past the end + guint to_be_offset = self->top_offset; + guint to_be_definitions = n_definitions; + + ViewEntry *first_entry = g_ptr_array_index (self->entries, 0); + if (++to_be_offset >= first_entry->definitions->len) + { + to_be_definitions -= first_entry->definitions->len; + to_be_offset = 0; + } + if ((gint) (to_be_definitions - to_be_offset) < LINES - TOP_BAR_CUTOFF) + { + ViewEntry *new_entry = entry_for_position + (self, self->top_position + self->entries->len); + if (!new_entry) + break; + + g_ptr_array_add (self->entries, new_entry); + to_be_definitions += new_entry->definitions->len; + } + if (to_be_offset == 0) + { + g_ptr_array_remove_index (self->entries, 0); + self->top_position++; + } + + self->top_offset = to_be_offset; + n_definitions = to_be_definitions; + } + return scrolled; +} + +/// Moves the selection one entry up. +static gboolean +app_one_entry_up (Application *self) +{ + if (self->selected == 0 && self->top_offset == 0) + { + if (self->top_position == 0) + return FALSE; + prepend_entry (self, --self->top_position); + } + + // Find the last entry that starts above the selection + gint first = -self->top_offset; + guint i; + for (i = 0; i < self->entries->len; i++) + { + ViewEntry *ve = g_ptr_array_index (self->entries, i); + gint new_first = first + ve->definitions->len; + if (new_first >= (gint) self->selected) + break; + first = new_first; + } + + if (first < 0) + { + self->selected = 0; + app_scroll_up (self, -first); + } + else + self->selected = first; + + app_redraw_view (self); + return TRUE; +} + +/// Moves the selection one entry down. +static void +app_one_entry_down (Application *self) +{ + // Find the first entry that starts below the selection + gint first = -self->top_offset; + guint i; + for (i = 0; i < self->entries->len; i++) + { + ViewEntry *ve = g_ptr_array_index (self->entries, i); + first += ve->definitions->len; + if (first > (gint) self->selected) + break; + } + + // FIXME: selection can still get past the end + if (first >= LINES - TOP_BAR_CUTOFF) + { + app_scroll_down (self, first - (LINES - TOP_BAR_CUTOFF - 1)); + self->selected = LINES - TOP_BAR_CUTOFF - 1; + } + else + self->selected = first; + + app_redraw_view (self); +} + +/// Redraw everything. +static void +app_redraw (Application *self) +{ + app_redraw_view (self); + app_redraw_top (self); +} + +/// When dictionary contents are longer than the screen, eliminate empty space +static void +app_fill_view (Application *self) +{ + gint missing = LINES - TOP_BAR_CUTOFF + - (gint) (app_count_view_items (self) - self->top_offset); + if (missing > 0) + self->selected += app_scroll_up (self, missing); +} + +/// Search for the current entry. +static void +app_search_for_entry (Application *self) +{ + gchar *input_utf8 = g_ucs4_to_utf8 + ((gunichar *) self->input->data, -1, NULL, NULL, NULL); + g_return_if_fail (input_utf8 != NULL); + + StardictIterator *iterator = + stardict_dict_search (self->dict, input_utf8, NULL); + g_free (input_utf8); + + self->top_position = stardict_iterator_get_offset (iterator); + self->top_offset = 0; + self->selected = 0; + g_object_unref (iterator); + + self->show_help = FALSE; + app_reload_view (self); + + // Don't let the iterator get past the end of the dictionary + if (!self->entries->len) + (void) app_scroll_up (self, 1); + + // If the user wants it centered, just move the view up half a screen; + // actually, one third seems to be a better guess + if (self->center_search) + { + gint half = (LINES - TOP_BAR_CUTOFF) / 3; + if (half > 0) + self->selected += app_scroll_up (self, half); + } + + app_fill_view (self); + app_redraw_view (self); +} + +static void +app_set_input (Application *self, const gchar *text, gsize text_len) +{ + glong size; + gunichar *output = g_utf8_to_ucs4 (text, text_len, NULL, &size, NULL); + + // XXX: signal invalid data? + if (!output) + return; + + g_array_free (self->input, TRUE); + self->input = g_array_new (TRUE, FALSE, sizeof (gunichar)); + self->input_pos = self->input_offset = 0; + + gunichar *p = output; + gboolean last_was_space = false; + while (size--) + { + // Normalize whitespace, to cover OCR anomalies + gunichar c = *p++; + if (!g_unichar_isspace (c)) + last_was_space = FALSE; + else if (last_was_space) + continue; + else + { + c = ' '; + last_was_space = TRUE; + } + + // XXX: skip? Might be some binary nonsense. + if (!g_unichar_isprint (c)) + break; + + g_array_insert_val (self->input, self->input_pos++, c); + } + g_free (output); + + self->input_confirmed = FALSE; + app_search_for_entry (self); + app_redraw_top (self); +} + +static void +app_set_trimmed_input_if_not_empty (Application *self, const gchar *text) +{ + // Strip ASCII whitespace: this is compatible with UTF-8 + while (g_ascii_isspace (*text)) + text++; + gsize text_len = strlen (text); + while (text_len && g_ascii_isspace (text[text_len - 1])) + text_len--; + + if (text_len) + app_set_input (self, text, text_len); +} + +static const gchar * +app_get_current_definition (Application *self) +{ + guint offset = self->top_offset + self->selected; + for (guint i = 0; i < self->entries->len; i++) + { + ViewEntry *ve = g_ptr_array_index (self->entries, i); + if (offset < ve->definitions->len) + return g_ptr_array_index (ve->definitions, offset); + offset -= ve->definitions->len; + } + return NULL; +} + +static void +app_goto_dictionary_directly (Application *self, StardictDict *dict) +{ + if (dict == self->dict) + return; + + self->last = self->dict; + self->dict = dict; + app_search_for_entry (self); + app_redraw_top (self); +} + +/// Switch to a different dictionary by number. +static gboolean +app_goto_dictionary (Application *self, guint n) +{ + if (n >= self->dictionaries->len) + return FALSE; + + Dictionary *dict = g_ptr_array_index (self->dictionaries, n); + app_goto_dictionary_directly (self, dict->dict); + return TRUE; +} + +/// Switch to a different dictionary by delta. +static gboolean +app_goto_dictionary_delta (Application *self, gint n) +{ + GPtrArray *dicts = self->dictionaries; + if (dicts->len <= 1) + return FALSE; + + guint i = 0; + while (i < dicts->len && + ((Dictionary *) g_ptr_array_index (dicts, i))->dict != self->dict) + i++; + + return app_goto_dictionary (self, (i + dicts->len + n) % dicts->len); +} + +/// The terminal has been resized, make appropriate changes. +static gboolean +app_process_resize (Application *self) +{ + app_reload_view (self); + app_fill_view (self); + + guint n_visible = app_count_view_items (self) - self->top_offset; + if ((gint) n_visible > LINES - TOP_BAR_CUTOFF) + n_visible = LINES - TOP_BAR_CUTOFF; + if (self->selected >= n_visible) + { + app_scroll_down (self, self->selected - n_visible + 1); + self->selected = n_visible - 1; + } + + app_redraw (self); + return TRUE; +} + +// --- User input handling ----------------------------------------------------- + +/// All the actions that can be performed by the user. +typedef enum user_action UserAction; + +enum user_action +{ + USER_ACTION_NONE, + + USER_ACTION_QUIT, + USER_ACTION_REDRAW, + + USER_ACTION_MOVE_SPLITTER_LEFT, + USER_ACTION_MOVE_SPLITTER_RIGHT, + + USER_ACTION_GOTO_ENTRY_PREVIOUS, + USER_ACTION_GOTO_ENTRY_NEXT, + USER_ACTION_GOTO_DEFINITION_PREVIOUS, + USER_ACTION_GOTO_DEFINITION_NEXT, + USER_ACTION_GOTO_PAGE_PREVIOUS, + USER_ACTION_GOTO_PAGE_NEXT, + USER_ACTION_GOTO_DICTIONARY_PREVIOUS, + USER_ACTION_GOTO_DICTIONARY_NEXT, + USER_ACTION_GOTO_DICTIONARY_LAST, + + USER_ACTION_FLIP, + + USER_ACTION_INPUT_CONFIRM, + USER_ACTION_INPUT_HOME, + USER_ACTION_INPUT_END, + USER_ACTION_INPUT_LEFT, + USER_ACTION_INPUT_RIGHT, + USER_ACTION_INPUT_DELETE_PREVIOUS, + USER_ACTION_INPUT_DELETE_NEXT, + USER_ACTION_INPUT_DELETE_TO_HOME, + USER_ACTION_INPUT_DELETE_TO_END, + USER_ACTION_INPUT_DELETE_PREVIOUS_WORD, + USER_ACTION_INPUT_TRANSPOSE, + + USER_ACTION_COUNT +}; + +#define SAVE_CURSOR \ + int last_x, last_y; \ + getyx (stdscr, last_y, last_x); + +#define RESTORE_CURSOR \ + move (last_y, last_x); \ + refresh (); + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + +static gboolean +app_process_user_action (Application *self, UserAction action) +{ + SAVE_CURSOR + switch (action) + { + case USER_ACTION_QUIT: + return FALSE; + case USER_ACTION_REDRAW: + clear (); + app_redraw (self); + return TRUE; + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + case USER_ACTION_MOVE_SPLITTER_LEFT: + self->division = (app_get_left_column_width (self) - 1.) / COLS; + app_redraw_view (self); + RESTORE_CURSOR + return TRUE; + case USER_ACTION_MOVE_SPLITTER_RIGHT: + self->division = (app_get_left_column_width (self) + 1.) / COLS; + app_redraw_view (self); + RESTORE_CURSOR + return TRUE; + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + case USER_ACTION_GOTO_DEFINITION_PREVIOUS: + if (self->selected > 0) + self->selected--; + else + app_scroll_up (self, 1); + app_redraw_view (self); + RESTORE_CURSOR + return TRUE; + case USER_ACTION_GOTO_DEFINITION_NEXT: + if ((gint) self->selected < LINES - TOP_BAR_CUTOFF - 1 && + self->selected < app_count_view_items (self) - self->top_offset - 1) + self->selected++; + else + app_scroll_down (self, 1); + app_redraw_view (self); + RESTORE_CURSOR + return TRUE; + + case USER_ACTION_GOTO_ENTRY_PREVIOUS: + app_one_entry_up (self); + RESTORE_CURSOR + return TRUE; + case USER_ACTION_GOTO_ENTRY_NEXT: + app_one_entry_down (self); + RESTORE_CURSOR + return TRUE; + + case USER_ACTION_GOTO_PAGE_PREVIOUS: + app_scroll_up (self, LINES - TOP_BAR_CUTOFF); + app_redraw_view (self); + RESTORE_CURSOR + return TRUE; + case USER_ACTION_GOTO_PAGE_NEXT: + app_scroll_down (self, LINES - TOP_BAR_CUTOFF); + app_redraw_view (self); + RESTORE_CURSOR + return TRUE; + + case USER_ACTION_GOTO_DICTIONARY_PREVIOUS: + if (!app_goto_dictionary_delta (self, -1)) + beep (); + return TRUE; + case USER_ACTION_GOTO_DICTIONARY_NEXT: + if (!app_goto_dictionary_delta (self, +1)) + beep (); + return TRUE; + case USER_ACTION_GOTO_DICTIONARY_LAST: + if (!self->last) + beep (); + else + app_goto_dictionary_directly (self, self->last); + return TRUE; + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + case USER_ACTION_FLIP: + { + const gchar *definition = app_get_current_definition (self); + if (!definition) + beep (); + else + app_set_trimmed_input_if_not_empty (self, definition); + } + return TRUE; + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + case USER_ACTION_INPUT_HOME: + self->input_pos = 0; + app_redraw_top (self); + return TRUE; + case USER_ACTION_INPUT_END: + self->input_pos = self->input->len; + app_redraw_top (self); + return TRUE; + case USER_ACTION_INPUT_LEFT: + if (self->input_pos > 0) + { + do self->input_pos--; + while (self->input_pos > 0 && g_unichar_ismark + (g_array_index (self->input, gunichar, self->input_pos))); + app_redraw_top (self); + } + return TRUE; + case USER_ACTION_INPUT_RIGHT: + if (self->input_pos < self->input->len) + { + do self->input_pos++; + while (self->input_pos < self->input->len && g_unichar_ismark + (g_array_index (self->input, gunichar, self->input_pos))); + app_redraw_top (self); + } + return TRUE; + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + case USER_ACTION_INPUT_CONFIRM: + self->input_confirmed = TRUE; + app_redraw_top (self); + return TRUE; + + case USER_ACTION_INPUT_TRANSPOSE: + { + if (!self->input_pos || self->input->len < 2) + break; + + guint start = self->input_pos - 1; + if (self->input_pos >= self->input->len) + start--; + + gunichar tmp = g_array_index (self->input, gunichar, start); + g_array_index (self->input, gunichar, start) + = g_array_index (self->input, gunichar, start + 1); + g_array_index (self->input, gunichar, start + 1) = tmp; + + if (self->input_pos < self->input->len) + self->input_pos++; + + app_search_for_entry (self); + app_redraw_top (self); + return TRUE; + } + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + case USER_ACTION_INPUT_DELETE_PREVIOUS: + if (self->input_pos > 0) + { + g_array_remove_index (self->input, --self->input_pos); + app_search_for_entry (self); + app_redraw_top (self); + } + return TRUE; + case USER_ACTION_INPUT_DELETE_NEXT: + if (self->input_pos < self->input->len) + { + g_array_remove_index (self->input, self->input_pos); + app_search_for_entry (self); + app_redraw_top (self); + } + return TRUE; + case USER_ACTION_INPUT_DELETE_TO_HOME: + if (self->input->len != 0) + { + g_array_remove_range (self->input, 0, self->input_pos); + self->input_pos = 0; + + app_search_for_entry (self); + app_redraw_top (self); + } + return TRUE; + case USER_ACTION_INPUT_DELETE_TO_END: + if (self->input_pos < self->input->len) + { + g_array_remove_range (self->input, + self->input_pos, self->input->len - self->input_pos); + app_search_for_entry (self); + app_redraw_top (self); + } + return TRUE; + case USER_ACTION_INPUT_DELETE_PREVIOUS_WORD: + { + if (self->input_pos == 0) + return TRUE; + + gint i = self->input_pos; + while (i) + if (g_array_index (self->input, gunichar, --i) != L' ') + break; + while (i--) + if (g_array_index (self->input, gunichar, i) == L' ') + break; + + i++; + g_array_remove_range (self->input, i, self->input_pos - i); + self->input_pos = i; + + app_search_for_entry (self); + app_redraw_top (self); + return TRUE; + } + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + case USER_ACTION_NONE: + return TRUE; + default: + g_assert_not_reached (); + } + return TRUE; +} + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + +static gboolean +app_process_keysym (Application *self, termo_key_t *event) +{ + UserAction action = USER_ACTION_NONE; + typedef const UserAction ActionMap[TERMO_N_SYMS]; + + static ActionMap actions = + { + [TERMO_SYM_ESCAPE] = USER_ACTION_QUIT, + + [TERMO_SYM_UP] = USER_ACTION_GOTO_DEFINITION_PREVIOUS, + [TERMO_SYM_DOWN] = USER_ACTION_GOTO_DEFINITION_NEXT, + [TERMO_SYM_PAGEUP] = USER_ACTION_GOTO_PAGE_PREVIOUS, + [TERMO_SYM_PAGEDOWN] = USER_ACTION_GOTO_PAGE_NEXT, + + [TERMO_SYM_TAB] = USER_ACTION_FLIP, + [TERMO_SYM_ENTER] = USER_ACTION_INPUT_CONFIRM, + + [TERMO_SYM_HOME] = USER_ACTION_INPUT_HOME, + [TERMO_SYM_END] = USER_ACTION_INPUT_END, + [TERMO_SYM_LEFT] = USER_ACTION_INPUT_LEFT, + [TERMO_SYM_RIGHT] = USER_ACTION_INPUT_RIGHT, + + [TERMO_SYM_BACKSPACE] = USER_ACTION_INPUT_DELETE_PREVIOUS, + [TERMO_SYM_DEL] = USER_ACTION_INPUT_DELETE_PREVIOUS, + [TERMO_SYM_DELETE] = USER_ACTION_INPUT_DELETE_NEXT, + }; + static ActionMap actions_alt = + { + [TERMO_SYM_LEFT] = USER_ACTION_MOVE_SPLITTER_LEFT, + [TERMO_SYM_RIGHT] = USER_ACTION_MOVE_SPLITTER_RIGHT, + [TERMO_SYM_TAB] = USER_ACTION_GOTO_DICTIONARY_LAST, + }; + static ActionMap actions_ctrl = + { + [TERMO_SYM_UP] = USER_ACTION_GOTO_ENTRY_PREVIOUS, + [TERMO_SYM_DOWN] = USER_ACTION_GOTO_ENTRY_NEXT, + [TERMO_SYM_LEFT] = USER_ACTION_GOTO_DICTIONARY_PREVIOUS, + [TERMO_SYM_RIGHT] = USER_ACTION_GOTO_DICTIONARY_NEXT, + [TERMO_SYM_PAGEUP] = USER_ACTION_GOTO_DICTIONARY_PREVIOUS, + [TERMO_SYM_PAGEDOWN] = USER_ACTION_GOTO_DICTIONARY_NEXT, + }; + + if (!event->modifiers) + action = actions[event->code.sym]; + else if (event->modifiers == TERMO_KEYMOD_ALT) + action = actions_alt[event->code.sym]; + else if (event->modifiers == TERMO_KEYMOD_CTRL) + action = actions_ctrl[event->code.sym]; + + return app_process_user_action (self, action); +} + +static gboolean +app_process_ctrl_key (Application *self, termo_key_t *event) +{ + static const UserAction actions[32] = + { + [CTRL_KEY ('L')] = USER_ACTION_REDRAW, + + [CTRL_KEY ('P')] = USER_ACTION_GOTO_DEFINITION_PREVIOUS, + [CTRL_KEY ('N')] = USER_ACTION_GOTO_DEFINITION_NEXT, + [CTRL_KEY ('B')] = USER_ACTION_GOTO_PAGE_PREVIOUS, + [CTRL_KEY ('F')] = USER_ACTION_GOTO_PAGE_NEXT, + + [CTRL_KEY ('A')] = USER_ACTION_INPUT_HOME, + [CTRL_KEY ('E')] = USER_ACTION_INPUT_END, + + [CTRL_KEY ('H')] = USER_ACTION_INPUT_DELETE_PREVIOUS, + [CTRL_KEY ('K')] = USER_ACTION_INPUT_DELETE_TO_END, + [CTRL_KEY ('W')] = USER_ACTION_INPUT_DELETE_PREVIOUS_WORD, + [CTRL_KEY ('U')] = USER_ACTION_INPUT_DELETE_TO_HOME, + [CTRL_KEY ('T')] = USER_ACTION_INPUT_TRANSPOSE, + }; + + gint64 i = (gint64) event->code.codepoint - 'a' + 1; + if (i > 0 && i < (gint64) G_N_ELEMENTS (actions)) + return app_process_user_action (self, actions[i]); + + return TRUE; +} + +static gboolean +app_process_alt_key (Application *self, termo_key_t *event) +{ + if (event->code.codepoint == 'c') + self->center_search = !self->center_search; + + if (event->code.codepoint >= '0' + && event->code.codepoint <= '9') + { + gint n = event->code.codepoint - '0'; + if (!app_goto_dictionary (self, (n == 0 ? 10 : n) - 1)) + beep (); + } + return TRUE; +} + +static gboolean +app_process_key (Application *self, termo_key_t *event) +{ + if (event->modifiers == TERMO_KEYMOD_CTRL) + return app_process_ctrl_key (self, event); + if (event->modifiers == TERMO_KEYMOD_ALT) + return app_process_alt_key (self, event); + if (event->modifiers) + return TRUE; + + gunichar c = event->code.codepoint; + if (!g_unichar_isprint (c)) + { + beep (); + return TRUE; + } + + if (self->input_confirmed) + { + if (self->input->len != 0) + g_array_remove_range (self->input, 0, self->input->len); + self->input_pos = self->input_offset = 0; + self->input_confirmed = FALSE; + } + + g_array_insert_val (self->input, self->input_pos++, c); + app_search_for_entry (self); + app_redraw_top (self); + return TRUE; +} + +static void +app_process_left_mouse_click (Application *self, int line, int column) +{ + SAVE_CURSOR + if (line == 0) + { + int indent = strlen (APP_TITLE); + if (column < indent) + return; + + for (guint i = self->dict_offset; i < self->dictionaries->len; i++) + { + AppDictionary *dict = g_ptr_array_index (self->dictionaries, i); + if (column < (indent += dict->name_width)) + { + app_goto_dictionary (self, i); + return; + } + } + } + else if (line == 1) + { + gint pos = column - self->search_label_width; + if (pos >= 0) + { + // On clicking the left arrow, go to that invisible character + // behind the arrow (skiping over non-spacing suffixes) + guint i = self->input_offset; + if (i && !pos--) + { + while (i-- && !app_input_width (self, i, i + 1)) + ; + } + for (gint occupied = 0; i < self->input->len; i++) + { + size_t width = app_input_width (self, i, i + 1); + if ((occupied += width) > pos) + break; + } + + self->input_pos = i; + app_redraw_top (self); + } + } + else if (line <= (int) (app_count_view_items (self) - self->top_offset)) + { + self->selected = line - TOP_BAR_CUTOFF; + app_redraw_view (self); + RESTORE_CURSOR + } +} + +/// Process mouse input. +static gboolean +app_process_mouse (Application *self, termo_key_t *event) +{ + int line, column, button; + termo_mouse_event_t type; + termo_interpret_mouse (self->tk, event, &type, &button, &line, &column); + + if (type != TERMO_MOUSE_PRESS) + return TRUE; + + if (button == 1) + app_process_left_mouse_click (self, line, column); + else if (button == 4) + app_process_user_action (self, USER_ACTION_GOTO_DEFINITION_PREVIOUS); + else if (button == 5) + app_process_user_action (self, USER_ACTION_GOTO_DEFINITION_NEXT); + + return TRUE; +} + +/// Process input events from the terminal. +static gboolean +app_process_termo_event (Application *self, termo_key_t *event) +{ + switch (event->type) + { + case TERMO_TYPE_MOUSE: + return app_process_mouse (self, event); + case TERMO_TYPE_KEY: + return app_process_key (self, event); + case TERMO_TYPE_KEYSYM: + return app_process_keysym (self, event); + case TERMO_TYPE_FOCUS: + { + SAVE_CURSOR + self->focused = !!event->code.focused; + app_redraw_view (self); + RESTORE_CURSOR + return TRUE; + } + default: + return TRUE; + } +} + +// --- SIGWINCH ---------------------------------------------------------------- + +static int g_winch_pipe[2]; ///< SIGWINCH signalling pipe. + +static void +winch_handler (int signum) +{ + (void) signum; + write (g_winch_pipe[1], "x", 1); +} + +static void +install_winch_handler (void) +{ + struct sigaction act, oldact; + + if (pipe (g_winch_pipe) == -1) + abort (); + + act.sa_handler = winch_handler; + act.sa_flags = SA_RESTART; + sigemptyset (&act.sa_mask); + sigaction (SIGWINCH, &act, &oldact); +} + +// --- X11 selection watcher --------------------------------------------------- + +#ifdef WITH_X11 + +#include +#include + +/// Data relating to one entry within the dictionary. +typedef struct selection_watch SelectionWatch; + +struct selection_watch +{ + Application *app; + xcb_connection_t *X; + const xcb_query_extension_reply_t *xfixes; + + guint watch; ///< X11 connection watcher + xcb_window_t wid; ///< Withdrawn communications window + xcb_atom_t atom_incr; ///< INCR + xcb_atom_t atom_utf8_string; ///< UTF8_STRING + xcb_timestamp_t in_progress; ///< Timestamp of last processed event + GString * buffer; ///< UTF-8 text buffer + + gboolean incr; ///< INCR running + gboolean incr_failure; ///< INCR failure indicator +}; + +static gboolean +is_xcb_ok (xcb_connection_t *X) +{ + int xcb_error = xcb_connection_has_error (X); + if (xcb_error) + { + g_warning (_("X11 connection failed (error code %d)"), xcb_error); + return FALSE; + } + return TRUE; +} + +static xcb_atom_t +resolve_atom (xcb_connection_t *X, const char *atom) +{ + xcb_intern_atom_reply_t *iar = xcb_intern_atom_reply (X, + xcb_intern_atom (X, false, strlen (atom), atom), NULL); + xcb_atom_t result = iar ? iar->atom : XCB_NONE; + free (iar); + return result; +} + +// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + +static gboolean +read_utf8_property (SelectionWatch *self, xcb_window_t wid, xcb_atom_t property, + gboolean *empty) +{ + guint32 offset = 0; + gboolean more_data = TRUE, ok = TRUE; + xcb_get_property_reply_t *gpr; + while (ok && more_data) + { + if (!(gpr = xcb_get_property_reply (self->X, + xcb_get_property (self->X, FALSE /* delete */, wid, + property, XCB_GET_PROPERTY_TYPE_ANY, offset, 0x8000), NULL))) + return FALSE; + + int len = xcb_get_property_value_length (gpr); + if (offset == 0 && len == 0 && empty) + *empty = TRUE; + + ok = gpr->type == self->atom_utf8_string && gpr->format == 8; + more_data = gpr->bytes_after != 0; + if (ok) + { + offset += len >> 2; + g_string_append_len (self->buffer, + xcb_get_property_value (gpr), len); + } + free (gpr); + } + return ok; +} + +static void +on_x11_selection_change (SelectionWatch *self, + xcb_xfixes_selection_notify_event_t *e) +{ + // Not checking whether we should give up when this interrupts our + // current retrieval attempt--the timeout mostly solves this for all cases + if (e->owner == XCB_NONE) + return; + + // Don't try to process two things at once. Each request gets a few seconds + // to finish, then we move on, hoping that a property race doesn't commence. + // Ideally we'd set up a separate queue for these skipped requests and + // process them later. + if (self->in_progress != 0 && e->timestamp - self->in_progress < 5000) + return; + + // ICCCM says we should ensure the named property doesn't exist + (void) xcb_delete_property (self->X, self->wid, XCB_ATOM_PRIMARY); + + (void) xcb_convert_selection (self->X, self->wid, e->selection, + self->atom_utf8_string, XCB_ATOM_PRIMARY, e->timestamp); + + self->in_progress = e->timestamp; + self->incr = FALSE; +} + +static void +on_x11_selection_receive (SelectionWatch *self, + xcb_selection_notify_event_t *e) +{ + if (e->requestor != self->wid + || e->time != self->in_progress) + return; + + self->in_progress = 0; + if (e->property == XCB_ATOM_NONE) + return; + + xcb_get_property_reply_t *gpr = xcb_get_property_reply (self->X, + xcb_get_property (self->X, FALSE /* delete */, e->requestor, + e->property, XCB_GET_PROPERTY_TYPE_ANY, 0, 0), NULL); + if (!gpr) + return; + + // Garbage collection, GString only ever expands in size + g_string_free (self->buffer, TRUE); + self->buffer = g_string_new (NULL); + + // When you select a lot of text in VIM, it starts the ICCCM INCR mechanism, + // from which there is no opt-out + if (gpr->type == self->atom_incr) + { + self->in_progress = e->time; + self->incr = TRUE; + self->incr_failure = FALSE; + } + else if (read_utf8_property (self, e->requestor, e->property, NULL)) + app_set_trimmed_input_if_not_empty (self->app, self->buffer->str); + + free (gpr); + (void) xcb_delete_property (self->X, self->wid, e->property); +} + +static void +on_x11_property_notify (SelectionWatch *self, xcb_property_notify_event_t *e) +{ + if (!self->incr + || e->window != self->wid + || e->state != XCB_PROPERTY_NEW_VALUE + || e->atom != XCB_ATOM_PRIMARY) + return; + + gboolean empty = FALSE; + if (!read_utf8_property (self, e->window, e->atom, &empty)) + // We need to keep deleting the property + self->incr_failure = TRUE; + + // Once it's empty, we've consumed everything and can move on undisturbed + if (empty) + { + if (!self->incr_failure) + app_set_trimmed_input_if_not_empty (self->app, self->buffer->str); + + self->in_progress = 0; + self->incr = FALSE; + } + + (void) xcb_delete_property (self->X, e->window, e->atom); +} + +static void +process_x11_event (SelectionWatch *self, xcb_generic_event_t *event) +{ + int event_code = event->response_type & 0x7f; + if (event_code == 0) + { + xcb_generic_error_t *err = (xcb_generic_error_t *) event; + g_warning (_("X11 request error (%d, major %d, minor %d)"), + err->error_code, err->major_code, err->minor_code); + } + else if (event_code == + self->xfixes->first_event + XCB_XFIXES_SELECTION_NOTIFY) + on_x11_selection_change (self, + (xcb_xfixes_selection_notify_event_t *) event); + else if (event_code == XCB_SELECTION_NOTIFY) + on_x11_selection_receive (self, + (xcb_selection_notify_event_t *) event); + else if (event_code == XCB_PROPERTY_NOTIFY) + on_x11_property_notify (self, + (xcb_property_notify_event_t *) event); +} + +static gboolean +process_x11 (G_GNUC_UNUSED GIOChannel *source, + G_GNUC_UNUSED GIOCondition condition, gpointer data) +{ + SelectionWatch *self = data; + + xcb_generic_event_t *event; + while ((event = xcb_poll_for_event (self->X))) + { + process_x11_event (self, event); + free (event); + } + (void) xcb_flush (self->X); + return is_xcb_ok (self->X); +} + +static void +selection_watch_init (SelectionWatch *self, Application *app) +{ + memset (self, 0, sizeof *self); + if (!app->watch_x11_sel) + return; + self->app = app; + + int which_screen = -1; + self->X = xcb_connect (NULL, &which_screen); + if (!is_xcb_ok (self->X)) + return; + + // Most modern applications support this, though an XCB_ATOM_STRING + // fallback might be good to add (COMPOUND_TEXT is complex) + g_return_if_fail + ((self->atom_utf8_string = resolve_atom (self->X, "UTF8_STRING"))); + g_return_if_fail + ((self->atom_incr = resolve_atom (self->X, "INCR"))); + + self->xfixes = xcb_get_extension_data (self->X, &xcb_xfixes_id); + g_return_if_fail (self->xfixes->present); + + (void) xcb_xfixes_query_version_unchecked (self->X, + XCB_XFIXES_MAJOR_VERSION, XCB_XFIXES_MINOR_VERSION); + + const xcb_setup_t *setup = xcb_get_setup (self->X); + xcb_screen_iterator_t setup_iter = xcb_setup_roots_iterator (setup); + while (which_screen--) + xcb_screen_next (&setup_iter); + + xcb_screen_t *screen = setup_iter.data; + self->wid = xcb_generate_id (self->X); + const uint32_t values[] = {XCB_EVENT_MASK_PROPERTY_CHANGE}; + (void) xcb_create_window (self->X, screen->root_depth, self->wid, + screen->root, 0, 0, 1, 1, 0, XCB_WINDOW_CLASS_INPUT_OUTPUT, + screen->root_visual, XCB_CW_EVENT_MASK, values); + + (void) xcb_xfixes_select_selection_input (self->X, self->wid, + XCB_ATOM_PRIMARY, XCB_XFIXES_SELECTION_EVENT_MASK_SET_SELECTION_OWNER | + XCB_XFIXES_SELECTION_EVENT_MASK_SELECTION_WINDOW_DESTROY | + XCB_XFIXES_SELECTION_EVENT_MASK_SELECTION_CLIENT_CLOSE); + + (void) xcb_flush (self->X); + self->watch = add_read_watch + (xcb_get_file_descriptor (self->X), process_x11, self); + + // Never NULL so that we don't need to care about pointer validity + self->buffer = g_string_new (NULL); +} + +static void +selection_watch_destroy (SelectionWatch *self) +{ + if (self->X) + xcb_disconnect (self->X); + if (self->watch) + g_source_remove (self->watch); + if (self->buffer) + g_string_free (self->buffer, TRUE); +} + +#endif // WITH_X11 + +// --- Initialisation, event handling ------------------------------------------ + +static gboolean on_stdin_input_timeout (gpointer data); + +static gboolean +process_stdin_input (G_GNUC_UNUSED GIOChannel *source, + G_GNUC_UNUSED GIOCondition condition, gpointer data) +{ + Application *app = data; + if (app->tk_timer) + { + g_source_remove (app->tk_timer); + app->tk_timer = 0; + } + + termo_advisereadable (app->tk); + + termo_key_t event; + termo_result_t res; + while ((res = termo_getkey (app->tk, &event)) == TERMO_RES_KEY) + if (!app_process_termo_event (app, &event)) + goto quit; + + if (res == TERMO_RES_AGAIN) + app->tk_timer = g_timeout_add (termo_get_waittime (app->tk), + on_stdin_input_timeout, app); + else if (res == TERMO_RES_ERROR || res == TERMO_RES_EOF) + goto quit; + + return TRUE; + +quit: + app_quit (app); + return FALSE; +} + +static gboolean +on_stdin_input_timeout (gpointer data) +{ + Application *app = data; + termo_key_t event; + if (termo_getkey_force (app->tk, &event) == TERMO_RES_KEY) + if (!app_process_termo_event (app, &event)) + app_quit (app); + + app->tk_timer = 0; + return FALSE; +} + +static gboolean +process_winch_input (GIOChannel *source, + G_GNUC_UNUSED GIOCondition condition, gpointer data) + { + char c; + (void) read (g_io_channel_unix_get_fd (source), &c, 1); + + update_curses_terminal_size (); + app_process_resize (data); + return TRUE; +} + +static gboolean +on_terminated (gpointer user_data) +{ + app_quit (user_data); + return TRUE; +} + +static void +log_handler_curses (Application *self, const gchar *message) +{ + // Beep, beep, I'm a jeep; let the user know + beep (); + + // We certainly don't want to end up in a possibly infinite recursion + static gboolean in_processing; + if (in_processing) + return; + + in_processing = TRUE; + SAVE_CURSOR + + RowBuffer buf = row_buffer_make (self); + row_buffer_append (&buf, message, A_REVERSE); + move (0, 0); + row_buffer_finish (&buf, COLS, A_REVERSE); + + RESTORE_CURSOR + in_processing = FALSE; +} + +static void +log_handler (const gchar *domain, GLogLevelFlags level, + const gchar *message, gpointer data) +{ + // There's probably no point in trying to display a fatal message nicely + if (level & G_LOG_FLAG_FATAL) + g_log_default_handler (domain, level, message, NULL); + + const gchar *prefix; + switch (level & G_LOG_LEVEL_MASK) + { + case G_LOG_LEVEL_ERROR: prefix = "E"; break; + case G_LOG_LEVEL_CRITICAL: prefix = "C"; break; + case G_LOG_LEVEL_WARNING: prefix = "W"; break; + case G_LOG_LEVEL_MESSAGE: prefix = "M"; break; + case G_LOG_LEVEL_INFO: prefix = "I"; break; + case G_LOG_LEVEL_DEBUG: prefix = "D"; break; + default: prefix = "?"; + } + + gchar *out; + if (domain) + out = g_strdup_printf ("%s: %s: %s", prefix, domain, message); + else + out = g_strdup_printf ("%s: %s", prefix, message); + + // If the standard error output isn't redirected, try our best at showing + // the message to the user; it will probably get overdrawn soon + if (isatty (STDERR_FILENO)) + log_handler_curses (data, out); + else + fprintf (stderr, "%s\n", out); + + g_free (out); +} + +int +tui_main (char *argv[]) +{ + Application app; + app_init (&app, argv); + app_init_terminal (&app); + app_redraw (&app); + + // g_unix_signal_add() cannot handle SIGWINCH + install_winch_handler (); + + // Avoid disruptive warnings + g_log_set_default_handler (log_handler, &app); + + // Message loop + guint watch_term = g_unix_signal_add (SIGTERM, on_terminated, &app); + guint watch_int = g_unix_signal_add (SIGINT, on_terminated, &app); + guint watch_stdin = add_read_watch + (STDIN_FILENO, process_stdin_input, &app); + guint watch_winch = add_read_watch + (g_winch_pipe[0], process_winch_input, &app); + +#ifdef WITH_X11 + SelectionWatch sw; + selection_watch_init (&sw, &app); +#endif // WITH_X11 + + app_run (&app); + +#ifdef WITH_X11 + selection_watch_destroy (&sw); +#endif // WITH_X11 + + g_source_remove (watch_term); + g_source_remove (watch_int); + g_source_remove (watch_stdin); + g_source_remove (watch_winch); + + endwin (); + g_log_set_default_handler (g_log_default_handler, NULL); + app_destroy (&app); + + if (close (g_winch_pipe[0]) == -1 + || close (g_winch_pipe[1]) == -1) + abort (); + + return 0; +} diff --git a/src/tdv.c b/src/tdv.c new file mode 100644 index 0000000..44484fa --- /dev/null +++ b/src/tdv.c @@ -0,0 +1,98 @@ +/* + * Translation dictionary viewer + * + * Copyright (c) 2023, Přemysl Eric Janouch + * + * Permission to use, copy, modify, and/or distribute this software for any + * purpose with or without fee is hereby granted. + * + * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES + * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF + * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY + * SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES + * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION + * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN + * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. + * + */ + +#include "config.h" + +#include +#include +#ifdef WITH_GUI +#include +#endif + +#include +#ifndef G_OS_WIN32 +#include +#endif + +int tui_main (char *[]); +int gui_main (char *[]); + +int +main (int argc, char *argv[]) +{ + if (!setlocale (LC_ALL, "")) + g_printerr ("%s: %s\n", _("Warning"), _("failed to set the locale")); + + bindtextdomain (GETTEXT_PACKAGE, GETTEXT_DIRNAME); + bind_textdomain_codeset (GETTEXT_PACKAGE, "UTF-8"); + textdomain (GETTEXT_PACKAGE); + + gboolean show_version = FALSE; +#ifdef WITH_GUI +# ifndef G_OS_WIN32 + gboolean gui = FALSE; +# endif +#endif + GOptionEntry entries[] = + { + { "version", 0, G_OPTION_FLAG_IN_MAIN, + G_OPTION_ARG_NONE, &show_version, + N_("Output version information and exit"), NULL }, +#ifdef WITH_GUI +# ifndef G_OS_WIN32 + { "gui", 0, G_OPTION_FLAG_IN_MAIN, + G_OPTION_ARG_NONE, &gui, + N_("Launch the GUI even when run from a terminal"), NULL }, +# endif +#endif + { }, + }; + + GOptionContext *ctx = g_option_context_new + (N_("[dictionary.ifo...] - Translation dictionary viewer")); + g_option_context_add_main_entries (ctx, entries, GETTEXT_PACKAGE); +#ifdef WITH_GUI + g_option_context_add_group (ctx, gtk_get_option_group (FALSE)); +#endif + g_option_context_set_translation_domain (ctx, GETTEXT_PACKAGE); + + GError *error = NULL; + if (!g_option_context_parse (ctx, &argc, &argv, &error)) + { + g_printerr ("%s: %s: %s\n", _("Error"), _("option parsing failed"), + error->message); + exit (EXIT_FAILURE); + } + g_option_context_free (ctx); + + if (show_version) + { + g_print (PROJECT_NAME " " PROJECT_VERSION "\n"); + exit (EXIT_SUCCESS); + } + +#ifdef WITH_GUI +# ifndef G_OS_WIN32 + if (gui || !isatty (STDIN_FILENO)) +# endif + return gui_main (argv + 1); +#endif +#ifndef G_OS_WIN32 + return tui_main (argv + 1); +#endif +} -- cgit v1.2.3-70-g09d2