1 files changed, 249 insertions, 0 deletions
diff --git a/lib/widget/radio.c b/lib/widget/radio.c
new file mode 100644
index 0000000..5832f44
--- /dev/null
+++ b/lib/widget/radio.c
@@ -0,0 +1,249 @@
+/*
+   Widgets for the Midnight Commander
+
+   Copyright (C) 1994-2022
+   Free Software Foundation, Inc.
+
+   Authors:
+   Radek Doulik, 1994, 1995
+   Miguel de Icaza, 1994, 1995
+   Jakub Jelinek, 1995
+   Andrej Borsenkow, 1996
+   Norbert Warmuth, 1997
+   Andrew Borodin <aborodin@vmail.ru>, 2009-2022
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file radio.c
+ *  \brief Source: WRadui widget (radiobuttons)
+ */
+
+#include <config.h>
+
+#include <stdlib.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"
+#include "lib/widget.h"
+
+/*** global variables ****************************************************************************/
+
+const global_keymap_t *radio_map = NULL;
+
+/*** file scope macro definitions ****************************************************************/
+
+/*** file scope type declarations ****************************************************************/
+
+/*** file scope variables ************************************************************************/
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+radio_execute_cmd (WRadio * r, long command)
+{
+    cb_ret_t ret = MSG_HANDLED;
+    Widget *w = WIDGET (r);
+
+    switch (command)
+    {
+    case CK_Up:
+    case CK_Top:
+        if (r->pos == 0)
+            return MSG_NOT_HANDLED;
+
+        if (command == CK_Top)
+            r->pos = 0;
+        else
+            r->pos--;
+        widget_draw (w);
+        return MSG_HANDLED;
+
+    case CK_Down:
+    case CK_Bottom:
+        if (r->pos == r->count - 1)
+            return MSG_NOT_HANDLED;
+
+        if (command == CK_Bottom)
+            r->pos = r->count - 1;
+        else
+            r->pos++;
+        widget_draw (w);
+        return MSG_HANDLED;
+
+    case CK_Select:
+        r->sel = r->pos;
+        widget_set_state (w, WST_FOCUSED, TRUE);        /* Also draws the widget */
+        send_message (w->owner, w, MSG_NOTIFY, 0, NULL);
+        return MSG_HANDLED;
+
+    default:
+        ret = MSG_NOT_HANDLED;
+        break;
+    }
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* Return MSG_HANDLED if we want a redraw */
+static cb_ret_t
+radio_key (WRadio * r, int key)
+{
+    long command;
+
+    command = widget_lookup_key (WIDGET (r), key);
+    if (command == CK_IgnoreKey)
+        return MSG_NOT_HANDLED;
+    return radio_execute_cmd (r, command);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+radio_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WRadio *r = RADIO (w);
+    int i;
+
+    switch (msg)
+    {
+    case MSG_HOTKEY:
+        for (i = 0; i < r->count; i++)
+        {
+            if (r->texts[i].hotkey != NULL)
+            {
+                int c;
+
+                c = g_ascii_tolower ((gchar) r->texts[i].hotkey[0]);
+                if (c != parm)
+                    continue;
+                r->pos = i;
+
+                /* Take action */
+                send_message (w, sender, MSG_ACTION, CK_Select, data);
+                return MSG_HANDLED;
+            }
+        }
+        return MSG_NOT_HANDLED;
+
+    case MSG_KEY:
+        return radio_key (r, parm);
+
+    case MSG_ACTION:
+        return radio_execute_cmd (r, parm);
+
+    case MSG_CURSOR:
+        widget_gotoyx (r, r->pos, 1);
+        return MSG_HANDLED;
+
+    case MSG_DRAW:
+        {
+            gboolean focused;
+
+            focused = widget_get_state (w, WST_FOCUSED);
+
+            for (i = 0; i < r->count; i++)
+            {
+                widget_selectcolor (w, i == r->pos && focused, FALSE);
+                widget_gotoyx (w, i, 0);
+                tty_draw_hline (w->rect.y + i, w->rect.x, ' ', w->rect.cols);
+                tty_print_string ((r->sel == i) ? "(*) " : "( ) ");
+                hotkey_draw (w, r->texts[i], i == r->pos && focused);
+            }
+
+            return MSG_HANDLED;
+        }
+
+    case MSG_DESTROY:
+        for (i = 0; i < r->count; i++)
+            hotkey_free (r->texts[i]);
+        g_free (r->texts);
+        return MSG_HANDLED;
+
+    default:
+        return widget_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+radio_mouse_callback (Widget * w, mouse_msg_t msg, mouse_event_t * event)
+{
+    switch (msg)
+    {
+    case MSG_MOUSE_DOWN:
+        RADIO (w)->pos = event->y;
+        widget_select (w);
+        break;
+
+    case MSG_MOUSE_CLICK:
+        RADIO (w)->pos = event->y;
+        send_message (w, NULL, MSG_ACTION, CK_Select, NULL);
+        send_message (w->owner, w, MSG_POST_KEY, ' ', NULL);
+        break;
+
+    default:
+        break;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+WRadio *
+radio_new (int y, int x, int count, const char **texts)
+{
+    WRect r0 = { y, x, count, 1 };
+    WRadio *r;
+    Widget *w;
+    int i, wmax = 0;
+
+    r = g_new (WRadio, 1);
+    w = WIDGET (r);
+
+    /* Compute the longest string */
+    r->texts = g_new (hotkey_t, count);
+
+    for (i = 0; i < count; i++)
+    {
+        int width;
+
+        r->texts[i] = hotkey_new (texts[i]);
+        width = hotkey_width (r->texts[i]);
+        wmax = MAX (width, wmax);
+    }
+
+    /* 4 is width of "(*) " */
+    r0.cols = 4 + wmax;
+    widget_init (w, &r0, radio_callback, radio_mouse_callback);
+    w->options |= WOP_SELECTABLE | WOP_WANT_CURSOR | WOP_WANT_HOTKEY;
+    w->keymap = radio_map;
+
+    r->pos = 0;
+    r->sel = 0;
+    r->count = count;
+
+    return r;
+}
+
+/* --------------------------------------------------------------------------------------------- */