1 /* Widgets for the Midnight Commander
3 Copyright (C) 1994, 1995, 1996, 1998, 1999, 2000, 2001, 2002, 2003,
4 2004, 2005, 2006, 2007, 2009 Free Software Foundation, Inc.
6 Authors: 1994, 1995 Radek Doulik
7 1994, 1995 Miguel de Icaza
12 This program is free software; you can redistribute it and/or modify
13 it under the terms of the GNU General Public License as published by
14 the Free Software Foundation; either version 2 of the License, or
15 (at your option) any later version.
17 This program is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 GNU General Public License for more details.
22 You should have received a copy of the GNU General Public License
23 along with this program; if not, write to the Free Software
24 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
29 * \brief Source: widgets
41 #include <sys/types.h>
43 #include "lib/global.h"
45 #include "lib/tty/tty.h"
46 #include "lib/tty/mouse.h"
47 #include "lib/tty/key.h" /* XCTRL and ALT macros */
49 #include "lib/mcconfig.h" /* for history loading and saving */
50 #include "lib/vfs/mc-vfs/vfs.h"
51 #include "lib/fileloc.h"
52 #include "lib/strutil.h"
58 #include "cmddef.h" /* CK_ cmd name const */
59 #include "keybind.h" /* global_keymap_t */
60 #include "panel.h" /* current_panel */
61 #include "main.h" /* confirm_history_cleanup */
63 const global_keymap_t
*input_map
;
66 widget_selectcolor (Widget
*w
, gboolean focused
, gboolean hotkey
)
68 Dlg_head
*h
= w
->parent
;
73 : DLG_HOT_NORMALC (h
))
80 parse_hotkey (const char *text
)
82 struct hotkey_t result
;
85 /* search for '&', that is not on the of text */
86 cp
= strchr (text
, '&');
87 if (cp
!= NULL
&& cp
[1] != '\0') {
88 result
.start
= g_strndup (text
, cp
- text
);
92 p
= str_cget_next_char (cp
);
93 result
.hotkey
= g_strndup (cp
, p
- cp
);
96 result
.end
= g_strdup (cp
);
98 result
.start
= g_strdup (text
);
106 release_hotkey (const struct hotkey_t hotkey
)
108 g_free (hotkey
.start
);
109 g_free (hotkey
.hotkey
);
114 hotkey_width (const struct hotkey_t hotkey
)
118 result
= str_term_width1 (hotkey
.start
);
119 result
+= (hotkey
.hotkey
!= NULL
) ? str_term_width1 (hotkey
.hotkey
) : 0;
120 result
+= (hotkey
.end
!= NULL
) ? str_term_width1 (hotkey
.end
) : 0;
125 draw_hotkey (Widget
*w
, const struct hotkey_t hotkey
, gboolean focused
)
127 widget_selectcolor (w
, focused
, FALSE
);
128 tty_print_string (hotkey
.start
);
130 if (hotkey
.hotkey
!= NULL
) {
131 widget_selectcolor (w
, focused
, TRUE
);
132 tty_print_string (hotkey
.hotkey
);
133 widget_selectcolor (w
, focused
, FALSE
);
136 if (hotkey
.end
!= NULL
)
137 tty_print_string (hotkey
.end
);
141 /* Default callback for widgets */
143 default_proc (widget_msg_t msg
, int parm
)
158 return MSG_NOT_HANDLED
;
162 static int button_event (Gpm_Event
*event
, void *);
167 button_callback (Widget
*w
, widget_msg_t msg
, int parm
)
169 WButton
*b
= (WButton
*) w
;
172 Dlg_head
*h
= b
->widget
.parent
;
177 * Don't let the default button steal Enter from the current
178 * button. This is a workaround for the flawed event model
179 * when hotkeys are sent to all widgets before the key is
180 * handled by the current widget.
182 if (parm
== '\n' && h
->current
== &b
->widget
) {
183 button_callback (w
, WIDGET_KEY
, ' ');
187 if (parm
== '\n' && b
->flags
== DEFPUSH_BUTTON
) {
188 button_callback (w
, WIDGET_KEY
, ' ');
192 if (b
->text
.hotkey
!= NULL
) {
193 if (g_ascii_tolower ((gchar
)b
->text
.hotkey
[0]) ==
194 g_ascii_tolower ((gchar
)parm
)) {
195 button_callback (w
, WIDGET_KEY
, ' ');
199 return MSG_NOT_HANDLED
;
202 if (parm
!= ' ' && parm
!= '\n')
203 return MSG_NOT_HANDLED
;
206 stop
= (*b
->callback
) (b
->action
);
207 if (!b
->callback
|| stop
) {
208 h
->ret_value
= b
->action
;
229 widget_move (&b
->widget
, 0, b
->hotpos
+ off
);
235 if (msg
== WIDGET_UNFOCUS
)
237 else if (msg
== WIDGET_FOCUS
)
240 widget_selectcolor (w
, b
->selected
, FALSE
);
241 widget_move (w
, 0, 0);
245 tty_print_string ("[< ");
248 tty_print_string ("[ ");
251 tty_print_string ("[");
258 draw_hotkey (w
, b
->text
, b
->selected
);
262 tty_print_string (" >]");
265 tty_print_string (" ]");
268 tty_print_string ("]");
274 release_hotkey (b
->text
);
278 return default_proc (msg
, parm
);
283 button_event (Gpm_Event
*event
, void *data
)
287 if (event
->type
& (GPM_DOWN
|GPM_UP
)){
288 Dlg_head
*h
= b
->widget
.parent
;
289 dlg_select_widget (b
);
290 if (event
->type
& GPM_UP
){
291 button_callback ((Widget
*) data
, WIDGET_KEY
, ' ');
292 h
->callback (h
, &b
->widget
, DLG_POST_KEY
, ' ', NULL
);
300 button_get_len (const WButton
*b
)
302 int ret
= hotkey_width (b
->text
);
321 button_new (int y
, int x
, int action
, int flags
, const char *text
,
324 WButton
*b
= g_new (WButton
, 1);
328 b
->text
= parse_hotkey (text
);
330 init_widget (&b
->widget
, y
, x
, 1, button_get_len (b
),
331 button_callback
, button_event
);
334 b
->callback
= callback
;
335 widget_want_hotkey (b
->widget
, 1);
336 b
->hotpos
= (b
->text
.hotkey
!= NULL
) ? str_term_width1 (b
->text
.start
) : -1;
342 button_get_text (const WButton
*b
)
344 if (b
->text
.hotkey
!= NULL
)
345 return g_strconcat (b
->text
.start
, "&", b
->text
.hotkey
,
346 b
->text
.end
, (char *) NULL
);
348 return g_strdup (b
->text
.start
);
352 button_set_text (WButton
*b
, const char *text
)
354 release_hotkey (b
->text
);
355 b
->text
= parse_hotkey (text
);
356 b
->widget
.cols
= button_get_len (b
);
357 dlg_redraw (b
->widget
.parent
);
361 /* Radio button widget */
362 static int radio_event (Gpm_Event
*event
, void *);
365 radio_callback (Widget
*w
, widget_msg_t msg
, int parm
)
367 WRadio
*r
= (WRadio
*) w
;
369 Dlg_head
*h
= r
->widget
.parent
;
374 int lp
= g_ascii_tolower ((gchar
)parm
);
376 for (i
= 0; i
< r
->count
; i
++) {
377 if (r
->texts
[i
].hotkey
!= NULL
) {
378 int c
= g_ascii_tolower ((gchar
)r
->texts
[i
].hotkey
[0]);
385 radio_callback (w
, WIDGET_KEY
, ' ');
390 return MSG_NOT_HANDLED
;
396 h
->callback (h
, w
, DLG_ACTION
, 0, NULL
);
397 radio_callback (w
, WIDGET_FOCUS
, ' ');
406 return MSG_NOT_HANDLED
;
410 if (r
->count
- 1 > r
->pos
) {
415 return MSG_NOT_HANDLED
;
418 h
->callback (h
, w
, DLG_ACTION
, 0, NULL
);
419 radio_callback (w
, WIDGET_FOCUS
, ' ');
420 widget_move (&r
->widget
, r
->pos
, 1);
426 for (i
= 0; i
< r
->count
; i
++) {
427 const gboolean focused
= (i
== r
->pos
&& msg
== WIDGET_FOCUS
);
428 widget_selectcolor (w
, focused
, FALSE
);
429 widget_move (&r
->widget
, i
, 0);
430 tty_print_string ((r
->sel
== i
) ? "(*) " : "( ) ");
431 draw_hotkey (w
, r
->texts
[i
], focused
);
436 for (i
= 0; i
< r
->count
; i
++) {
437 release_hotkey (r
->texts
[i
]);
443 return default_proc (msg
, parm
);
448 radio_event (Gpm_Event
*event
, void *data
)
453 if (event
->type
& (GPM_DOWN
|GPM_UP
)){
454 Dlg_head
*h
= r
->widget
.parent
;
456 r
->pos
= event
->y
- 1;
457 dlg_select_widget (r
);
458 if (event
->type
& GPM_UP
){
459 radio_callback (w
, WIDGET_KEY
, ' ');
460 radio_callback (w
, WIDGET_FOCUS
, 0);
461 h
->callback (h
, w
, DLG_POST_KEY
, ' ', NULL
);
469 radio_new (int y
, int x
, int count
, const char **texts
)
471 WRadio
*result
= g_new (WRadio
, 1);
474 /* Compute the longest string */
475 result
->texts
= g_new (struct hotkey_t
, count
);
478 for (i
= 0; i
< count
; i
++){
479 result
->texts
[i
] = parse_hotkey (texts
[i
]);
480 m
= hotkey_width (result
->texts
[i
]);
485 init_widget (&result
->widget
, y
, x
, count
, max
, radio_callback
, radio_event
);
489 result
->count
= count
;
490 widget_want_hotkey (result
->widget
, 1);
496 /* Checkbutton widget */
498 static int check_event (Gpm_Event
*event
, void *);
501 check_callback (Widget
*w
, widget_msg_t msg
, int parm
)
503 WCheck
*c
= (WCheck
*) w
;
504 Dlg_head
*h
= c
->widget
.parent
;
508 if (c
->text
.hotkey
!= NULL
) {
509 if (g_ascii_tolower ((gchar
)c
->text
.hotkey
[0]) ==
510 g_ascii_tolower ((gchar
)parm
)) {
512 check_callback (w
, WIDGET_KEY
, ' '); /* make action */
516 return MSG_NOT_HANDLED
;
520 return MSG_NOT_HANDLED
;
522 c
->state
^= C_CHANGE
;
523 h
->callback (h
, w
, DLG_ACTION
, 0, NULL
);
524 check_callback (w
, WIDGET_FOCUS
, ' ');
528 widget_move (&c
->widget
, 0, 1);
534 widget_selectcolor (w
, msg
== WIDGET_FOCUS
, FALSE
);
535 widget_move (&c
->widget
, 0, 0);
536 tty_print_string ((c
->state
& C_BOOL
) ? "[x] " : "[ ] ");
537 draw_hotkey (w
, c
->text
, msg
== WIDGET_FOCUS
);
541 release_hotkey (c
->text
);
545 return default_proc (msg
, parm
);
550 check_event (Gpm_Event
*event
, void *data
)
555 if (event
->type
& (GPM_DOWN
|GPM_UP
)){
556 Dlg_head
*h
= c
->widget
.parent
;
558 dlg_select_widget (c
);
559 if (event
->type
& GPM_UP
){
560 check_callback (w
, WIDGET_KEY
, ' ');
561 check_callback (w
, WIDGET_FOCUS
, 0);
562 h
->callback (h
, w
, DLG_POST_KEY
, ' ', NULL
);
570 check_new (int y
, int x
, int state
, const char *text
)
572 WCheck
*c
= g_new (WCheck
, 1);
574 c
->text
= parse_hotkey (text
);
576 init_widget (&c
->widget
, y
, x
, 1, hotkey_width (c
->text
),
577 check_callback
, check_event
);
578 c
->state
= state
? C_BOOL
: 0;
579 widget_want_hotkey (c
->widget
, 1);
585 save_text_to_clip_file (const char *text
)
590 fname
= g_build_filename (home_dir
, EDIT_CLIP_FILE
, NULL
);
591 file
= mc_open (fname
, O_CREAT
| O_WRONLY
| O_TRUNC
,
592 S_IRUSR
| S_IWUSR
| S_IRGRP
| S_IROTH
| O_BINARY
);
598 mc_write (file
, (char *) text
, strlen (text
));
604 load_text_from_clip_file (char **text
)
609 gboolean first
= TRUE
;
611 fname
= g_build_filename (home_dir
, EDIT_CLIP_FILE
, NULL
);
612 f
= fopen (fname
, "r");
620 while (fgets (buf
, sizeof (buf
), f
)) {
625 if (buf
[len
- 1] == '\n')
630 *text
= g_strdup (buf
);
632 /* remove \n on EOL */
635 tmp
= g_strconcat (*text
, " ", buf
, (char *) NULL
);
644 return (*text
!= NULL
);
648 panel_save_curent_file_to_clip_file (void)
652 if (current_panel
->marked
== 0)
653 res
= save_text_to_clip_file (selection (current_panel
)->fname
);
656 gboolean first
= TRUE
;
659 for (i
= 0; i
< current_panel
->count
; i
++)
660 if (current_panel
->dir
.list
[i
].f
.marked
!= 0) { /* Skip the unmarked ones */
662 flist
= g_strdup (current_panel
->dir
.list
[i
].fname
);
665 /* Add empty lines after the file */
668 tmp
= g_strconcat (flist
, "\n", current_panel
->dir
.list
[i
].fname
, (char *) NULL
);
675 res
= save_text_to_clip_file (flist
);
686 label_callback (Widget
*w
, widget_msg_t msg
, int parm
)
688 WLabel
*l
= (WLabel
*) w
;
689 Dlg_head
*h
= l
->widget
.parent
;
695 /* We don't want to get the focus */
697 return MSG_NOT_HANDLED
;
701 char *p
= l
->text
, *q
, c
= 0;
708 tty_setcolor (DEFAULT_COLOR
);
710 tty_setcolor (DLG_NORMALC (h
));
713 q
= strchr (p
, '\n');
719 widget_move (&l
->widget
, y
, 0);
720 tty_print_string (str_fit_to_term (p
, l
->widget
.cols
, J_LEFT
));
736 return default_proc (msg
, parm
);
741 label_set_text (WLabel
*label
, const char *text
)
743 int newcols
= label
->widget
.cols
;
746 if (label
->text
&& text
&& !strcmp (label
->text
, text
))
747 return; /* Flickering is not nice */
749 g_free (label
->text
);
752 label
->text
= g_strdup (text
);
753 if (label
->auto_adjust_cols
) {
754 str_msg_term_size (text
, &newlines
, &newcols
);
755 if (newcols
> label
->widget
.cols
)
756 label
->widget
.cols
= newcols
;
757 if (newlines
> label
->widget
.lines
)
758 label
->widget
.lines
= newlines
;
760 } else label
->text
= NULL
;
762 if (label
->widget
.parent
)
763 label_callback ((Widget
*) label
, WIDGET_DRAW
, 0);
765 if (newcols
< label
->widget
.cols
)
766 label
->widget
.cols
= newcols
;
770 label_new (int y
, int x
, const char *text
)
777 str_msg_term_size (text
, &lines
, &cols
);
779 l
= g_new (WLabel
, 1);
780 init_widget (&l
->widget
, y
, x
, lines
, cols
, label_callback
, NULL
);
781 l
->text
= (text
!= NULL
) ? g_strdup (text
) : NULL
;
782 l
->auto_adjust_cols
= 1;
784 widget_want_cursor (l
->widget
, 0);
789 /* Gauge widget (progress indicator) */
790 /* Currently width is hardcoded here for text mode */
794 gauge_callback (Widget
*w
, widget_msg_t msg
, int parm
)
796 WGauge
*g
= (WGauge
*) w
;
797 Dlg_head
*h
= g
->widget
.parent
;
799 if (msg
== WIDGET_INIT
)
802 /* We don't want to get the focus */
803 if (msg
== WIDGET_FOCUS
)
804 return MSG_NOT_HANDLED
;
806 if (msg
== WIDGET_DRAW
){
807 widget_move (&g
->widget
, 0, 0);
808 tty_setcolor (DLG_NORMALC (h
));
810 tty_printf ("%*s", gauge_len
, "");
812 int percentage
, columns
;
813 long total
= g
->max
, done
= g
->current
;
815 if (total
<= 0 || done
< 0) {
821 while (total
> 65535) {
825 percentage
= (200 * done
/ total
+ 1) / 2;
826 columns
= (2 * (gauge_len
- 7) * done
/ total
+ 1) / 2;
827 tty_print_char ('[');
828 tty_setcolor (GAUGE_COLOR
);
829 tty_printf ("%*s", (int) columns
, "");
830 tty_setcolor (DLG_NORMALC (h
));
831 tty_printf ("%*s] %3d%%", (int)(gauge_len
- 7 - columns
), "", (int) percentage
);
836 return default_proc (msg
, parm
);
840 gauge_set_value (WGauge
*g
, int max
, int current
)
842 if (g
->current
== current
&& g
->max
== max
)
843 return; /* Do not flicker */
845 max
= 1; /* I do not like division by zero :) */
847 g
->current
= current
;
849 gauge_callback ((Widget
*) g
, WIDGET_DRAW
, 0);
853 gauge_show (WGauge
*g
, int shown
)
855 if (g
->shown
== shown
)
858 gauge_callback ((Widget
*) g
, WIDGET_DRAW
, 0);
862 gauge_new (int y
, int x
, int shown
, int max
, int current
)
864 WGauge
*g
= g_new (WGauge
, 1);
866 init_widget (&g
->widget
, y
, x
, 1, gauge_len
, gauge_callback
, NULL
);
869 max
= 1; /* I do not like division by zero :) */
871 g
->current
= current
;
872 widget_want_cursor (g
->widget
, 0);
879 /* {{{ history button */
881 #define LARGE_HISTORY_BUTTON 1
883 #ifdef LARGE_HISTORY_BUTTON
884 # define HISTORY_BUTTON_WIDTH 3
886 # define HISTORY_BUTTON_WIDTH 1
889 #define should_show_history_button(in) \
890 (in->history && in->field_width > HISTORY_BUTTON_WIDTH * 2 + 1 && in->widget.parent)
892 static void draw_history_button (WInput
* in
)
895 c
= in
->history
->next
? (in
->history
->prev
? '|' : 'v') : '^';
896 widget_move (&in
->widget
, 0, in
->field_width
- HISTORY_BUTTON_WIDTH
);
897 #ifdef LARGE_HISTORY_BUTTON
900 h
= in
->widget
.parent
;
901 tty_setcolor (NORMAL_COLOR
);
902 tty_print_string ("[ ]");
903 /* Too distracting: tty_setcolor (MARKED_COLOR); */
904 widget_move (&in
->widget
, 0, in
->field_width
- HISTORY_BUTTON_WIDTH
+ 1);
908 tty_setcolor (MARKED_COLOR
);
913 /* }}} history button */
916 /* Input widgets now have a global kill ring */
917 /* Pointer to killed data */
918 static char *kill_buffer
= 0;
921 update_input (WInput
*in
, int clear_first
)
925 int buf_len
= str_length (in
->buffer
);
929 if (should_show_history_button (in
))
930 has_history
= HISTORY_BUTTON_WIDTH
;
932 if (in
->disable_update
)
935 pw
= str_term_width2 (in
->buffer
, in
->point
);
937 /* Make the point visible */
938 if ((pw
< in
->term_first_shown
) ||
939 (pw
>= in
->term_first_shown
+ in
->field_width
- has_history
)) {
941 in
->term_first_shown
= pw
- (in
->field_width
/ 3);
942 if (in
->term_first_shown
< 0)
943 in
->term_first_shown
= 0;
946 /* Adjust the mark */
947 if (in
->mark
> buf_len
)
951 draw_history_button (in
);
953 tty_setcolor (in
->color
);
955 widget_move (&in
->widget
, 0, 0);
957 if (!in
->is_password
) {
958 tty_print_string (str_term_substring (in
->buffer
, in
->term_first_shown
,
959 in
->field_width
- has_history
));
962 for (i
= -in
->term_first_shown
; i
< in
->field_width
- has_history
; i
++){
964 tty_print_char ((cp
[0] != '\0') ? '*' : ' ');
966 if (cp
[0] != '\0') str_cnext_char (&cp
);
975 winput_set_origin (WInput
*in
, int x
, int field_width
)
978 in
->field_width
= in
->widget
.cols
= field_width
;
979 update_input (in
, 0);
982 /* {{{ history saving and loading */
984 int num_history_items_recorded
= 60;
987 This loads and saves the history of an input line to and from the
988 widget. It is called with the widgets history name on creation of the
989 widget, and returns the GList list. It stores histories in the file
990 ~/.mc/history in using the profile code.
992 If def_text is passed as INPUT_LAST_TEXT (to the input_new()
993 function) then input_new assigns the default text to be the last text
994 entered, or "" if not found.
998 history_get (const char *input_name
)
1005 size_t keys_num
= 0;
1008 if (num_history_items_recorded
== 0) /* this is how to disable */
1010 if ((input_name
== NULL
) || (*input_name
== '\0'))
1013 profile
= g_build_filename (home_dir
, MC_USERCONF_DIR
, MC_HISTORY_FILE
, NULL
);
1014 cfg
= mc_config_init (profile
);
1016 /* get number of keys */
1017 keys
= mc_config_get_keys (cfg
, input_name
, &keys_num
);
1020 for (i
= 0; i
< keys_num
; i
++) {
1022 g_snprintf (key
, sizeof (key
), "%lu", (unsigned long)i
);
1023 this_entry
= mc_config_get_string (cfg
, input_name
, key
, "");
1025 if (this_entry
!= NULL
)
1026 hist
= list_append_unique (hist
, this_entry
);
1029 mc_config_deinit (cfg
);
1032 /* return pointer to the last entry in the list */
1033 return g_list_last (hist
);
1037 history_put (const char *input_name
, GList
*h
)
1043 if (num_history_items_recorded
== 0) /* this is how to disable */
1045 if ((input_name
== NULL
) || (*input_name
== '\0'))
1050 profile
= g_build_filename (home_dir
, MC_USERCONF_DIR
, MC_HISTORY_FILE
, NULL
);
1052 i
= open (profile
, O_CREAT
| O_EXCL
, S_IRUSR
| S_IWUSR
);
1056 /* Make sure the history is only readable by the user */
1057 if (chmod (profile
, S_IRUSR
| S_IWUSR
) == -1 && errno
!= ENOENT
) {
1062 /* go to end of list */
1063 h
= g_list_last (h
);
1065 /* go back 60 places */
1066 for (i
= 0; (i
< num_history_items_recorded
- 1) && (h
->prev
!= NULL
); i
++)
1067 h
= g_list_previous (h
);
1069 cfg
= mc_config_init (profile
);
1071 if (input_name
!= NULL
)
1072 mc_config_del_group (cfg
, input_name
);
1074 /* dump history into profile */
1075 for (i
= 0; h
!= NULL
; h
= g_list_next (h
)) {
1076 char *text
= (char *) h
->data
;
1078 /* We shouldn't have null entries, but let's be sure */
1081 g_snprintf (key
, sizeof (key
), "%d", i
++);
1082 mc_config_set_string (cfg
, input_name
, key
, text
);
1086 mc_config_save_file (cfg
, NULL
);
1087 mc_config_deinit(cfg
);
1091 /* }}} history saving and loading */
1094 /* {{{ history display */
1099 return _(" History ");
1109 dlg_hist_reposition (Dlg_head
*dlg_head
)
1111 dlg_hist_data
*data
;
1112 int x
= 0, y
, he
, wi
;
1115 if ((dlg_head
== NULL
) || (dlg_head
->data
== NULL
))
1116 return MSG_NOT_HANDLED
;
1118 data
= (dlg_hist_data
*) dlg_head
->data
;
1120 y
= data
->widget
->y
;
1121 he
= data
->count
+ 2;
1123 if (he
<= y
|| y
> (LINES
- 6)) {
1124 he
= min (he
, y
- 1);
1128 he
= min (he
, LINES
- y
);
1131 if (data
->widget
->x
> 2)
1132 x
= data
->widget
->x
- 2;
1134 wi
= data
->maxlen
+ 4;
1136 if ((wi
+ x
) > COLS
) {
1137 wi
= min (wi
, COLS
);
1141 dlg_set_position (dlg_head
, y
, x
, y
+ he
, x
+ wi
);
1147 dlg_hist_callback (Dlg_head
*h
, Widget
*sender
,
1148 dlg_msg_t msg
, int parm
, void *data
)
1152 return dlg_hist_reposition (h
);
1155 return default_dlg_callback (h
, sender
, msg
, parm
, data
);
1160 show_hist (GList
**history
, Widget
*widget
)
1162 GList
*z
, *hlist
= NULL
, *hi
;
1163 size_t maxlen
, i
, count
= 0;
1165 Dlg_head
*query_dlg
;
1166 WListbox
*query_list
;
1167 dlg_hist_data hist_data
;
1169 if (*history
== NULL
)
1172 maxlen
= str_term_width1 (i18n_htitle ()) + 2;
1174 for (z
= *history
; z
!= NULL
; z
= g_list_previous (z
)) {
1177 i
= str_term_width1 ((char *) z
->data
);
1178 maxlen
= max (maxlen
, i
);
1181 entry
= g_new0 (WLEntry
, 1);
1182 /* history is being reverted here */
1183 entry
->text
= g_strdup ((char *) z
->data
);
1184 hlist
= g_list_prepend (hlist
, entry
);
1187 hist_data
.widget
= widget
;
1188 hist_data
.count
= count
;
1189 hist_data
.maxlen
= maxlen
;
1192 create_dlg (0, 0, 4, 4, dialog_colors
, dlg_hist_callback
,
1193 "[History-query]", i18n_htitle (), DLG_COMPACT
);
1194 query_dlg
->data
= &hist_data
;
1196 query_list
= listbox_new (1, 1, 2, 2, TRUE
, NULL
);
1198 /* this call makes list stick to all sides of dialog, effectively make
1199 it be resized with dialog */
1200 add_widget_autopos (query_dlg
, query_list
, WPOS_KEEP_ALL
);
1202 /* to avoid diplicating of (calculating sizes in two places)
1203 code, call dlg_hist_callback function here, to set dialog and
1205 The main idea - create 4x4 dialog and add 2x2 list in
1206 center of it, and let dialog function resize it to needed
1208 dlg_hist_callback (query_dlg
, NULL
, DLG_RESIZE
, 0, NULL
);
1210 if (query_dlg
->y
< widget
->y
) {
1211 /* draw list entries from bottom upto top */
1212 listbox_set_list (query_list
, hlist
);
1213 listbox_select_last (query_list
);
1215 /* draw list entries from top downto bottom */
1216 /* revert history direction */
1217 hlist
= g_list_reverse (hlist
);
1218 listbox_set_list (query_list
, hlist
);
1221 if (run_dlg (query_dlg
) != B_CANCEL
) {
1224 listbox_get_current (query_list
, &q
, NULL
);
1229 /* get modified history from dialog */
1231 for (hi
= query_list
->list
; hi
!= NULL
; hi
= g_list_next (hi
)) {
1234 entry
= (WLEntry
*) hi
->data
;
1235 /* history is being reverted here again */
1236 z
= g_list_prepend (z
, entry
->text
);
1240 destroy_dlg (query_dlg
);
1242 /* restore history direction */
1243 if (query_dlg
->y
< widget
->y
)
1244 z
= g_list_reverse (z
);
1246 g_list_foreach (*history
, (GFunc
) g_free
, NULL
);
1247 g_list_free (*history
);
1248 *history
= g_list_last (z
);
1254 do_show_hist (WInput
*in
)
1258 r
= show_hist (&in
->history
, &in
->widget
);
1260 assign_text (in
, r
);
1265 /* }}} history display */
1268 input_destroy (WInput
*in
)
1271 fprintf (stderr
, "Internal error: null Input *\n");
1278 if (!in
->is_password
) /* don't save passwords ;-) */
1279 history_put (in
->history_name
, in
->history
);
1281 in
->history
= g_list_first (in
->history
);
1282 g_list_foreach (in
->history
, (GFunc
) g_free
, NULL
);
1283 g_list_free (in
->history
);
1286 g_free (in
->buffer
);
1287 free_completions (in
);
1288 g_free (in
->history_name
);
1292 input_disable_update (WInput
*in
)
1294 in
->disable_update
++;
1298 input_enable_update (WInput
*in
)
1300 in
->disable_update
--;
1301 update_input (in
, 0);
1306 push_history (WInput
*in
, const char *text
)
1308 /* input widget where urls with passwords are entered without any
1310 const char *password_input_fields
[] = {
1311 N_(" Link to a remote machine "),
1312 N_(" FTP to machine "),
1313 N_(" SMB link to machine ")
1315 const size_t ELEMENTS
= (sizeof (password_input_fields
) /
1316 sizeof (password_input_fields
[0]));
1326 for (i
= 0; i
< ELEMENTS
; i
++)
1327 password_input_fields
[i
] = _(password_input_fields
[i
]);
1330 t
= g_strstrip (g_strdup (text
));
1333 t
= g_strdup (empty
? "" : text
);
1335 if (in
->history_name
!= NULL
) {
1336 const char *p
= in
->history_name
+ 3;
1338 for (i
= 0; i
< ELEMENTS
; i
++)
1339 if (strcmp (p
, password_input_fields
[i
]) == 0)
1342 strip_password (t
, i
>= ELEMENTS
);
1345 in
->history
= list_append_unique (in
->history
, t
);
1349 /* Cleans the input line and adds the current text to the history */
1351 new_input (WInput
*in
)
1353 push_history (in
, in
->buffer
);
1355 in
->buffer
[0] = '\0';
1359 free_completions (in
);
1360 update_input (in
, 0);
1364 move_buffer_backward (WInput
*in
, int start
, int end
)
1367 int str_len
= str_length (in
->buffer
);
1368 if (start
>= str_len
|| end
> str_len
+ 1) return;
1370 pos
= str_offset_to_pos (in
->buffer
, start
);
1371 len
= str_offset_to_pos (in
->buffer
, end
) - pos
;
1373 for (i
= pos
; in
->buffer
[i
+ len
- 1]; i
++)
1374 in
->buffer
[i
] = in
->buffer
[i
+ len
];
1378 insert_char (WInput
*in
, int c_code
)
1384 return MSG_NOT_HANDLED
;
1386 if (in
->charpoint
>= MB_LEN_MAX
)
1389 in
->charbuf
[in
->charpoint
] = c_code
;
1392 res
= str_is_valid_char (in
->charbuf
, in
->charpoint
);
1395 in
->charpoint
= 0; /* broken multibyte char, skip */
1400 if (strlen (in
->buffer
) + 1 + in
->charpoint
>= in
->current_max_size
){
1401 /* Expand the buffer */
1402 size_t new_length
= in
->current_max_size
+
1403 in
->field_width
+ in
->charpoint
;
1404 char *narea
= g_try_renew (char, in
->buffer
, new_length
);
1407 in
->current_max_size
= new_length
;
1411 if (strlen (in
->buffer
) + in
->charpoint
< in
->current_max_size
) {
1412 /* bytes from begin */
1413 size_t ins_point
= str_offset_to_pos (in
->buffer
, in
->point
);
1415 size_t rest_bytes
= strlen (in
->buffer
+ ins_point
);
1417 for (i
= rest_bytes
+ 1; i
> 0; i
--)
1418 in
->buffer
[ins_point
+ i
+ in
->charpoint
- 1] =
1419 in
->buffer
[ins_point
+ i
- 1];
1421 memcpy(in
->buffer
+ ins_point
, in
->charbuf
, in
->charpoint
);
1430 beginning_of_line (WInput
*in
)
1437 end_of_line (WInput
*in
)
1439 in
->point
= str_length (in
->buffer
);
1444 backward_char (WInput
*in
)
1446 const char *act
= in
->buffer
+ str_offset_to_pos (in
->buffer
, in
->point
);
1448 if (in
->point
> 0) {
1449 in
->point
-= str_cprev_noncomb_char (&act
, in
->buffer
);
1455 forward_char (WInput
*in
)
1457 const char *act
= in
->buffer
+ str_offset_to_pos (in
->buffer
, in
->point
);
1458 if (act
[0] != '\0') {
1459 in
->point
+= str_cnext_noncomb_char (&act
);
1465 forward_word (WInput
* in
)
1467 const char *p
= in
->buffer
+ str_offset_to_pos (in
->buffer
, in
->point
);
1469 while (p
[0] != '\0' && (str_isspace (p
) || str_ispunct (p
))) {
1470 str_cnext_char (&p
);
1473 while (p
[0] != '\0' && !str_isspace (p
) && !str_ispunct (p
)) {
1474 str_cnext_char (&p
);
1480 backward_word (WInput
*in
)
1486 p
= in
->buffer
+ str_offset_to_pos (in
->buffer
, in
->point
);
1487 (p
!= in
->buffer
) && (p
[0] == '\0');
1488 str_cprev_char (&p
), in
->point
--
1491 while (p
!= in
->buffer
) {
1493 str_cprev_char (&p
);
1494 if (!str_isspace (p
) && !str_ispunct (p
)) {
1500 while (p
!= in
->buffer
) {
1501 str_cprev_char (&p
);
1502 if (str_isspace (p
) || str_ispunct (p
))
1510 key_left (WInput
*in
)
1516 key_ctrl_left (WInput
*in
)
1522 key_right (WInput
*in
)
1528 key_ctrl_right (WInput
*in
)
1533 backward_delete (WInput
*in
)
1535 const char *act
= in
->buffer
+ str_offset_to_pos (in
->buffer
, in
->point
);
1541 start
= in
->point
- str_cprev_noncomb_char (&act
, in
->buffer
);
1542 move_buffer_backward(in
, start
, in
->point
);
1549 delete_char (WInput
*in
)
1551 const char *act
= in
->buffer
+ str_offset_to_pos (in
->buffer
, in
->point
);
1552 int end
= in
->point
;
1554 end
+= str_cnext_noncomb_char (&act
);
1556 move_buffer_backward(in
, in
->point
, end
);
1562 copy_region (WInput
*in
, int x_first
, int x_last
)
1564 int first
= min (x_first
, x_last
);
1565 int last
= max (x_first
, x_last
);
1567 if (last
== first
) {
1568 /* Copy selected files to clipboard */
1569 panel_save_curent_file_to_clip_file ();
1573 g_free (kill_buffer
);
1575 first
= str_offset_to_pos (in
->buffer
, first
);
1576 last
= str_offset_to_pos (in
->buffer
, last
);
1578 kill_buffer
= g_strndup(in
->buffer
+ first
, last
- first
);
1579 save_text_to_clip_file (kill_buffer
);
1583 delete_region (WInput
*in
, int x_first
, int x_last
)
1585 int first
= min (x_first
, x_last
);
1586 int last
= max (x_first
, x_last
);
1590 if (in
->mark
> first
)
1592 last
= str_offset_to_pos (in
->buffer
, last
);
1593 first
= str_offset_to_pos (in
->buffer
, first
);
1594 len
= strlen (&in
->buffer
[last
]) + 1;
1595 memmove (&in
->buffer
[first
], &in
->buffer
[last
], len
);
1601 kill_word (WInput
*in
)
1603 int old_point
= in
->point
;
1607 new_point
= in
->point
;
1608 in
->point
= old_point
;
1610 copy_region (in
, old_point
, new_point
);
1611 delete_region (in
, old_point
, new_point
);
1618 back_kill_word (WInput
*in
)
1620 int old_point
= in
->point
;
1624 new_point
= in
->point
;
1625 in
->point
= old_point
;
1627 copy_region (in
, old_point
, new_point
);
1628 delete_region (in
, old_point
, new_point
);
1633 set_mark (WInput
*in
)
1635 in
->mark
= in
->point
;
1639 kill_save (WInput
*in
)
1641 copy_region (in
, in
->mark
, in
->point
);
1645 kill_region (WInput
*in
)
1648 delete_region (in
, in
->point
, in
->mark
);
1652 clear_region (WInput
*in
)
1654 delete_region (in
, in
->point
, in
->mark
);
1665 for (p
= kill_buffer
; *p
; p
++)
1666 insert_char (in
, *p
);
1671 kill_line (WInput
*in
)
1673 int chp
= str_offset_to_pos (in
->buffer
, in
->point
);
1674 g_free (kill_buffer
);
1675 kill_buffer
= g_strdup (&in
->buffer
[chp
]);
1676 in
->buffer
[chp
] = '\0';
1681 ins_from_clip (WInput
*in
)
1685 if (load_text_from_clip_file (&p
)) {
1688 for (pp
= p
; *pp
!= '\0'; pp
++)
1689 insert_char (in
, *pp
);
1696 assign_text (WInput
*in
, const char *text
)
1698 free_completions (in
);
1699 g_free (in
->buffer
);
1700 in
->buffer
= g_strdup (text
); /* was in->buffer->text */
1701 in
->current_max_size
= strlen (in
->buffer
) + 1;
1702 in
->point
= str_length (in
->buffer
);
1709 hist_prev (WInput
*in
)
1717 push_history (in
, in
->buffer
);
1719 prev
= g_list_previous (in
->history
);
1722 assign_text (in
, (char *) prev
->data
);
1728 hist_next (WInput
*in
)
1730 if (in
->need_push
) {
1731 push_history (in
, in
->buffer
);
1732 assign_text (in
, "");
1739 if (!in
->history
->next
) {
1740 assign_text (in
, "");
1744 in
->history
= g_list_next (in
->history
);
1745 assign_text (in
, (char *) in
->history
->data
);
1750 port_region_marked_for_delete (WInput
*in
)
1752 in
->buffer
[0] = '\0';
1759 input_execute_cmd (WInput
*in
, unsigned long command
)
1761 cb_ret_t res
= MSG_HANDLED
;
1765 beginning_of_line (in
);
1770 case CK_InputMoveLeft
:
1773 case CK_InputWordLeft
:
1776 case CK_InputMoveRight
:
1779 case CK_InputWordRight
:
1780 key_ctrl_right (in
);
1782 case CK_InputBackwardChar
:
1785 case CK_InputBackwardWord
:
1788 case CK_InputForwardChar
:
1791 case CK_InputForwardWord
:
1794 case CK_InputBackwardDelete
:
1795 backward_delete (in
);
1797 case CK_InputDeleteChar
:
1800 case CK_InputKillWord
:
1803 case CK_InputBackwardKillWord
:
1804 back_kill_word (in
);
1806 case CK_InputSetMark
:
1809 case CK_InputKillRegion
:
1812 case CK_InputClearLine
:
1815 case CK_InputKillSave
:
1824 case CK_InputKillLine
:
1827 case CK_InputHistoryPrev
:
1830 case CK_InputHistoryNext
:
1833 case CK_InputHistoryShow
:
1836 case CK_InputComplete
:
1840 res
= MSG_NOT_HANDLED
;
1846 /* This function is a test for a special input key used in complete.c */
1847 /* Returns 0 if it is not a special key, 1 if it is a non-complete key
1848 and 2 if it is a complete key */
1850 is_in_input_map (WInput
*in
, int key
)
1853 for (i
= 0; input_map
[i
].key
!= 0; i
++)
1854 if (key
== input_map
[i
].key
) {
1855 input_execute_cmd (in
, input_map
[i
].command
);
1856 return (input_map
[i
].command
== CK_InputComplete
) ? 2 : 1;
1862 handle_char (WInput
*in
, int key
)
1867 v
= MSG_NOT_HANDLED
;
1870 free_completions (in
);
1871 v
= insert_char (in
, key
);
1872 update_input (in
, 1);
1876 for (i
= 0; input_map
[i
].key
; i
++) {
1877 if (key
== input_map
[i
].key
) {
1878 if (input_map
[i
].command
!= CK_InputComplete
)
1879 free_completions (in
);
1880 input_execute_cmd (in
, input_map
[i
].command
);
1881 update_input (in
, 1);
1886 if (input_map
[i
].command
== 0) {
1888 return MSG_NOT_HANDLED
;
1890 port_region_marked_for_delete (in
);
1891 free_completions (in
);
1892 v
= insert_char (in
, key
);
1894 update_input (in
, 1);
1898 /* Inserts text in input line */
1900 stuff (WInput
*in
, const char *text
, int insert_extra_space
)
1902 input_disable_update (in
);
1903 while (*text
!= '\0')
1904 handle_char (in
, (unsigned char) *text
++); /* unsigned extension char->int */
1905 if (insert_extra_space
)
1906 handle_char (in
, ' ');
1907 input_enable_update (in
);
1908 update_input (in
, 1);
1912 input_set_point (WInput
*in
, int pos
)
1914 int max_pos
= str_length (in
->buffer
);
1918 if (pos
!= in
->point
)
1919 free_completions (in
);
1922 update_input (in
, 1);
1926 input_callback (Widget
*w
, widget_msg_t msg
, int parm
)
1928 WInput
*in
= (WInput
*) w
;
1933 if (parm
== XCTRL ('q')) {
1935 v
= handle_char (in
, ascii_alpha_to_cntrl (tty_getch ()));
1940 /* Keys we want others to handle */
1941 if (parm
== KEY_UP
|| parm
== KEY_DOWN
|| parm
== ESC_CHAR
1942 || parm
== KEY_F (10) || parm
== '\n')
1943 return MSG_NOT_HANDLED
;
1945 /* When pasting multiline text, insert literal Enter */
1946 if ((parm
& ~KEY_M_MASK
) == '\n') {
1948 v
= handle_char (in
, '\n');
1953 return handle_char (in
, parm
);
1955 case WIDGET_COMMAND
:
1956 return input_execute_cmd (in
, parm
);
1959 case WIDGET_UNFOCUS
:
1961 update_input (in
, 0);
1965 widget_move (&in
->widget
, 0, str_term_width2 (in
->buffer
, in
->point
)
1966 - in
->term_first_shown
);
1969 case WIDGET_DESTROY
:
1974 return default_proc (msg
, parm
);
1979 input_event (Gpm_Event
* event
, void *data
)
1983 if (event
->type
& (GPM_DOWN
| GPM_DRAG
)) {
1984 dlg_select_widget (in
);
1986 if (event
->x
>= in
->field_width
- HISTORY_BUTTON_WIDTH
+ 1
1987 && should_show_history_button (in
)) {
1990 in
->point
= str_length (in
->buffer
);
1991 if (event
->x
+ in
->term_first_shown
- 1 < str_term_width1 (in
->buffer
))
1992 in
->point
= str_column_to_pos (in
->buffer
, event
->x
1993 + in
->term_first_shown
- 1);
1995 update_input (in
, 1);
2001 input_new (int y
, int x
, int color
, int width
, const char *def_text
,
2002 const char *histname
, INPUT_COMPLETE_FLAGS completion_flags
)
2004 WInput
*in
= g_new (WInput
, 1);
2005 size_t initial_buffer_len
;
2007 init_widget (&in
->widget
, y
, x
, 1, width
, input_callback
, input_event
);
2010 in
->history_name
= NULL
;
2012 if ((histname
!= NULL
) && (*histname
!= '\0')) {
2013 in
->history_name
= g_strdup (histname
);
2014 in
->history
= history_get (histname
);
2017 if (def_text
== NULL
)
2019 else if (def_text
== INPUT_LAST_TEXT
) {
2020 if ((in
->history
!= NULL
) && (in
->history
->data
!= NULL
))
2021 def_text
= (char *) in
->history
->data
;
2026 initial_buffer_len
= 1 + max ((size_t) width
, strlen (def_text
));
2027 in
->widget
.options
|= W_IS_INPUT
;
2028 in
->completions
= NULL
;
2029 in
->completion_flags
= completion_flags
;
2030 in
->current_max_size
= initial_buffer_len
;
2031 in
->buffer
= g_new (char, initial_buffer_len
);
2033 in
->field_width
= width
;
2035 in
->term_first_shown
= 0;
2036 in
->disable_update
= 0;
2039 in
->is_password
= 0;
2041 strcpy (in
->buffer
, def_text
);
2042 in
->point
= str_length (in
->buffer
);
2049 /* Listbox widget */
2051 /* Should draw the scrollbar, but currently draws only
2052 * indications that there is more information
2056 listbox_entry_free (void *data
)
2064 listbox_drawscroll (WListbox
*l
)
2066 const int max_line
= l
->widget
.lines
- 1;
2070 /* Are we at the top? */
2071 widget_move (&l
->widget
, 0, l
->widget
.cols
);
2073 tty_print_one_vline ();
2075 tty_print_char ('^');
2077 /* Are we at the bottom? */
2078 widget_move (&l
->widget
, max_line
, l
->widget
.cols
);
2079 if ((l
->top
+ l
->widget
.lines
== l
->count
) || (l
->widget
.lines
>= l
->count
))
2080 tty_print_one_vline ();
2082 tty_print_char ('v');
2084 /* Now draw the nice relative pointer */
2086 line
= 1 + ((l
->pos
* (l
->widget
.lines
- 2)) / l
->count
);
2088 for (i
= 1; i
< max_line
; i
++) {
2089 widget_move (&l
->widget
, i
, l
->widget
.cols
);
2091 tty_print_one_vline ();
2093 tty_print_char ('*');
2098 listbox_draw (WListbox
*l
, gboolean focused
)
2100 const Dlg_head
*h
= l
->widget
.parent
;
2101 const int normalc
= DLG_NORMALC (h
);
2102 int selc
= focused
? DLG_HOT_FOCUSC (h
) : DLG_FOCUSC (h
);
2109 le
= g_list_nth (l
->list
, l
->top
);
2110 /* pos = (le == NULL) ? 0 : g_list_position (l->list, le); */
2111 pos
= (le
== NULL
) ? 0 : l
->top
;
2113 for (i
= 0; i
< l
->widget
.lines
; i
++) {
2116 /* Display the entry */
2117 if (pos
== l
->pos
&& sel_line
== -1) {
2119 tty_setcolor (selc
);
2121 tty_setcolor (normalc
);
2123 widget_move (&l
->widget
, i
, 1);
2125 if ((i
> 0 && pos
>= l
->count
) || (l
->list
== NULL
) || (le
== NULL
))
2128 WLEntry
*e
= (WLEntry
*) le
->data
;
2130 le
= g_list_next (le
);
2134 tty_print_string (str_fit_to_term (text
, l
->widget
.cols
- 2, J_LEFT_FIT
));
2137 l
->cursor_y
= sel_line
;
2139 if (l
->scrollbar
&& (l
->count
> l
->widget
.lines
)) {
2140 tty_setcolor (normalc
);
2141 listbox_drawscroll (l
);
2146 listbox_check_hotkey (WListbox
*l
, int key
)
2151 for (i
= 0, le
= l
->list
; le
!= NULL
; i
++, le
= g_list_next (le
)) {
2152 WLEntry
*e
= (WLEntry
*) le
->data
;
2154 if (e
->hotkey
== key
)
2161 /* Selects the last entry and scrolls the list to the bottom */
2163 listbox_select_last (WListbox
*l
)
2165 l
->pos
= l
->count
- 1;
2166 l
->top
= (l
->count
> l
->widget
.lines
) ? (l
->count
- l
->widget
.lines
) : 0;
2169 /* Selects the first entry and scrolls the list to the top */
2171 listbox_select_first (WListbox
*l
)
2173 l
->pos
= l
->top
= 0;
2177 listbox_set_list (WListbox
*l
, GList
*list
)
2179 listbox_remove_list (l
);
2183 l
->top
= l
->pos
= 0;
2184 l
->count
= g_list_length (list
);
2189 listbox_remove_list (WListbox
*l
)
2191 if ((l
!= NULL
) && (l
->count
!= 0)) {
2192 g_list_foreach (l
->list
, (GFunc
) listbox_entry_free
, NULL
);
2193 g_list_free (l
->list
);
2195 l
->count
= l
->pos
= l
->top
= 0;
2200 listbox_remove_current (WListbox
*l
)
2202 if ((l
!= NULL
) && (l
->count
!= 0)) {
2205 current
= g_list_nth (l
->list
, l
->pos
);
2206 l
->list
= g_list_remove_link (l
->list
, current
);
2207 listbox_entry_free ((WLEntry
*) current
->data
);
2208 g_list_free_1 (current
);
2212 l
->top
= l
->pos
= 0;
2213 else if (l
->pos
>= l
->count
)
2214 l
->pos
= l
->count
- 1;
2219 listbox_select_entry (WListbox
*l
, int dest
)
2223 gboolean top_seen
= FALSE
;
2229 for (pos
= 0, le
= l
->list
; le
!= NULL
; pos
++, le
= g_list_next (le
)) {
2238 if (l
->pos
- l
->top
>= l
->widget
.lines
)
2239 l
->top
= l
->pos
- l
->widget
.lines
+ 1;
2244 /* If we are unable to find it, set decent values */
2245 l
->pos
= l
->top
= 0;
2248 /* Selects from base the pos element */
2250 listbox_select_pos (WListbox
*l
, int base
, int pos
)
2252 int last
= l
->count
- 1;
2262 listbox_fwd (WListbox
*l
)
2264 if (l
->pos
+ 1 >= l
->count
)
2265 listbox_select_first (l
);
2267 listbox_select_entry (l
, l
->pos
+ 1);
2271 listbox_back (WListbox
*l
)
2274 listbox_select_last (l
);
2276 listbox_select_entry (l
, l
->pos
- 1);
2279 /* Return MSG_HANDLED if we want a redraw */
2281 listbox_key (WListbox
*l
, int key
)
2285 cb_ret_t j
= MSG_NOT_HANDLED
;
2287 if (l
->list
== NULL
)
2288 return MSG_NOT_HANDLED
;
2290 /* focus on listbox item N by '0'..'9' keys */
2291 if (key
>= '0' && key
<= '9') {
2292 int oldpos
= l
->pos
;
2293 listbox_select_entry (l
, key
- '0');
2295 /* need scroll to item? */
2296 if (abs (oldpos
- l
->pos
) > l
->widget
.lines
)
2306 listbox_select_first (l
);
2312 listbox_select_last (l
);
2327 for (i
= 0; (i
< l
->widget
.lines
- 1) && (l
->pos
< l
->count
- 1); i
++) {
2335 for (i
= 0; (i
< l
->widget
.lines
- 1) && (l
->pos
> 0); i
++) {
2344 gboolean is_last
= (l
->pos
+ 1 >= l
->count
);
2345 gboolean is_more
= (l
->top
+ l
->widget
.lines
>= l
->count
);
2347 listbox_remove_current (l
);
2348 if ((l
->top
> 0) && (is_last
|| is_more
))
2353 case (KEY_M_SHIFT
| KEY_DC
):
2355 if (l
->deletable
&& confirm_history_cleanup
2356 /* TRANSLATORS: no need to translate 'DialogTitle', it's just a context prefix */
2357 && (query_dialog (Q_("DialogTitle|History cleanup"),
2358 _("Do you want clean this history?"),
2359 D_ERROR
, 2, _("&Yes"), _("&No")) == 0)) {
2360 listbox_remove_list (l
);
2373 listbox_destroy (WListbox
*l
)
2375 /* don't delete list in modifable listbox */
2377 listbox_remove_list (l
);
2381 listbox_callback (Widget
*w
, widget_msg_t msg
, int parm
)
2383 WListbox
*l
= (WListbox
*) w
;
2384 Dlg_head
*h
= l
->widget
.parent
;
2395 pos
= listbox_check_hotkey (l
, parm
);
2397 return MSG_NOT_HANDLED
;
2399 listbox_select_entry (l
, pos
);
2400 h
->callback (h
, w
, DLG_ACTION
, l
->pos
, NULL
);
2402 if (l
->cback
!= NULL
)
2403 action
= l
->cback (l
);
2405 action
= LISTBOX_DONE
;
2407 if (action
== LISTBOX_DONE
) {
2408 h
->ret_value
= B_ENTER
;
2416 ret_code
= listbox_key (l
, parm
);
2417 if (ret_code
!= MSG_NOT_HANDLED
) {
2418 listbox_draw (l
, TRUE
);
2419 h
->callback (h
, w
, DLG_ACTION
, l
->pos
, NULL
);
2424 widget_move (&l
->widget
, l
->cursor_y
, 0);
2425 h
->callback (h
, w
, DLG_ACTION
, l
->pos
, NULL
);
2429 case WIDGET_UNFOCUS
:
2431 listbox_draw (l
, msg
!= WIDGET_UNFOCUS
);
2434 case WIDGET_DESTROY
:
2435 listbox_destroy (l
);
2438 case WIDGET_RESIZED
:
2442 return default_proc (msg
, parm
);
2447 listbox_event (Gpm_Event
*event
, void *data
)
2452 Dlg_head
*h
= l
->widget
.parent
;
2455 if (event
->type
& GPM_DOWN
)
2456 dlg_select_widget (l
);
2458 if (l
->list
== NULL
)
2461 if (event
->type
& (GPM_DOWN
| GPM_DRAG
)) {
2462 int ret
= MOU_REPEAT
;
2464 if (event
->x
< 0 || event
->x
> l
->widget
.cols
)
2468 for (i
= -event
->y
; i
>= 0; i
--)
2470 else if (event
->y
> l
->widget
.lines
)
2471 for (i
= event
->y
- l
->widget
.lines
; i
> 0; i
--)
2473 else if (event
->buttons
& GPM_B_UP
) {
2476 } else if (event
->buttons
& GPM_B_DOWN
) {
2480 listbox_select_entry (l
, listbox_select_pos (l
, l
->top
, event
->y
- 1));
2482 /* We need to refresh ourselves since the dialog manager doesn't */
2483 /* know about this event */
2484 listbox_draw (l
, TRUE
);
2489 if ((event
->type
& (GPM_DOUBLE
| GPM_UP
)) == (GPM_UP
| GPM_DOUBLE
)) {
2492 if (event
->x
< 0 || event
->x
>= l
->widget
.cols
2493 || event
->y
< 1 || event
->y
> l
->widget
.lines
)
2496 dlg_select_widget (l
);
2497 listbox_select_entry (l
, listbox_select_pos (l
, l
->top
, event
->y
- 1));
2499 if (l
->cback
!= NULL
)
2500 action
= l
->cback (l
);
2502 action
= LISTBOX_DONE
;
2504 if (action
== LISTBOX_DONE
) {
2505 h
->ret_value
= B_ENTER
;
2514 listbox_new (int y
, int x
, int height
, int width
, gboolean deletable
, lcback callback
)
2516 WListbox
*l
= g_new (WListbox
, 1);
2521 init_widget (&l
->widget
, y
, x
, height
, width
,
2522 listbox_callback
, listbox_event
);
2525 l
->top
= l
->pos
= 0;
2527 l
->deletable
= deletable
;
2528 l
->cback
= callback
;
2529 l
->allow_duplicates
= TRUE
;
2530 l
->scrollbar
= !tty_is_slow ();
2531 widget_want_hotkey (l
->widget
, 1);
2537 listbox_entry_cmp (const void *a
, const void *b
)
2539 const WLEntry
*ea
= (const WLEntry
*) a
;
2540 const WLEntry
*eb
= (const WLEntry
*) b
;
2542 return strcmp (ea
->text
, eb
->text
);
2545 /* Listbox item adding function */
2547 listbox_append_item (WListbox
*l
, WLEntry
*e
, listbox_append_t pos
)
2550 case LISTBOX_APPEND_AT_END
:
2551 l
->list
= g_list_append (l
->list
, e
);
2554 case LISTBOX_APPEND_BEFORE
:
2555 l
->list
= g_list_insert_before (l
->list
, g_list_nth (l
->list
, l
->pos
), e
);
2560 case LISTBOX_APPEND_AFTER
:
2561 l
->list
= g_list_insert (l
->list
, e
, l
->pos
+ 1);
2564 case LISTBOX_APPEND_SORTED
:
2565 l
->list
= g_list_insert_sorted (l
->list
, e
, (GCompareFunc
) listbox_entry_cmp
);
2576 listbox_add_item (WListbox
*l
, listbox_append_t pos
, int hotkey
,
2577 const char *text
, void *data
)
2584 if (!l
->allow_duplicates
&& (listbox_search_text (l
, text
) >= 0))
2587 entry
= g_new (WLEntry
, 1);
2588 entry
->text
= g_strdup (text
);
2590 entry
->hotkey
= hotkey
;
2592 listbox_append_item (l
, entry
, pos
);
2598 listbox_search_text (WListbox
*l
, const char *text
)
2604 for (i
= 0, le
= l
->list
; le
!= NULL
; i
++, le
= g_list_next (le
)) {
2605 WLEntry
*e
= (WLEntry
*) le
->data
;
2607 if (strcmp (e
->text
, text
) == 0)
2615 /* Returns the current string text as well as the associated extra data */
2617 listbox_get_current (WListbox
*l
, char **string
, void **extra
)
2623 e
= (WLEntry
*) g_list_nth_data (l
->list
, l
->pos
);
2628 *string
= ok
? e
->text
: NULL
;
2631 *extra
= ok
? e
->data
: NULL
;
2635 /* ButtonBar widget */
2637 /* returns TRUE if a function has been called, FALSE otherwise. */
2639 buttonbar_call (WButtonBar
*bb
, int i
)
2641 cb_ret_t ret
= MSG_NOT_HANDLED
;
2644 ret
= bb
->widget
.parent
->callback (bb
->widget
.parent
,
2645 (Widget
*) bb
, DLG_ACTION
,
2646 bb
->labels
[i
].command
,
2647 bb
->labels
[i
].receiver
);
2651 /* calculate width of one button, width is never lesser than 7 */
2653 buttonbat_get_button_width (void)
2655 int result
= COLS
/ BUTTONBAR_LABELS_NUM
;
2656 return (result
>= 7) ? result
: 7;
2660 buttonbar_callback (Widget
*w
, widget_msg_t msg
, int parm
)
2662 WButtonBar
*bb
= (WButtonBar
*) w
;
2668 return MSG_NOT_HANDLED
;
2671 for (i
= 0; i
< BUTTONBAR_LABELS_NUM
; i
++)
2672 if (parm
== KEY_F (i
+ 1) && buttonbar_call (bb
, i
))
2674 return MSG_NOT_HANDLED
;
2679 int count_free_positions
;
2681 widget_move (&bb
->widget
, 0, 0);
2682 tty_setcolor (DEFAULT_COLOR
);
2683 bb
->btn_width
= buttonbat_get_button_width ();
2684 tty_printf ("%-*s", bb
->widget
.cols
, "");
2685 count_free_positions
= COLS
- bb
->btn_width
* BUTTONBAR_LABELS_NUM
;
2687 for (i
= 0; i
< COLS
/ bb
->btn_width
&& i
< BUTTONBAR_LABELS_NUM
; i
++) {
2688 widget_move (&bb
->widget
, 0, (i
* bb
->btn_width
) + offset
);
2689 tty_setcolor (BUTTONBAR_HOTKEY_COLOR
);
2690 tty_printf ("%2d", i
+ 1);
2691 tty_setcolor (BUTTONBAR_BUTTON_COLOR
);
2692 text
= (bb
->labels
[i
].text
!= NULL
) ? bb
->labels
[i
].text
: "";
2693 tty_print_string (str_fit_to_term (
2695 bb
->btn_width
- 2 + (int)(offset
< count_free_positions
),
2698 if (count_free_positions
!= 0 && offset
< count_free_positions
)
2704 case WIDGET_DESTROY
:
2705 for (i
= 0; i
< BUTTONBAR_LABELS_NUM
; i
++)
2706 g_free (bb
->labels
[i
].text
);
2710 return default_proc (msg
, parm
);
2715 buttonbar_event (Gpm_Event
*event
, void *data
)
2717 WButtonBar
*bb
= data
;
2720 if (!(event
->type
& GPM_UP
))
2724 button
= (event
->x
- 1) * BUTTONBAR_LABELS_NUM
/ COLS
;
2725 if (button
< BUTTONBAR_LABELS_NUM
)
2726 buttonbar_call (bb
, button
);
2731 buttonbar_new (gboolean visible
)
2735 bb
= g_new0 (WButtonBar
, 1);
2737 init_widget (&bb
->widget
, LINES
- 1, 0, 1, COLS
,
2738 buttonbar_callback
, buttonbar_event
);
2739 bb
->widget
.pos_flags
= WPOS_KEEP_HORZ
| WPOS_KEEP_BOTTOM
;
2740 bb
->visible
= visible
;
2741 widget_want_hotkey (bb
->widget
, 1);
2742 widget_want_cursor (bb
->widget
, 0);
2743 bb
->btn_width
= buttonbat_get_button_width ();
2749 set_label_text (WButtonBar
*bb
, int lc_index
, const char *text
)
2751 g_free (bb
->labels
[lc_index
- 1].text
);
2752 bb
->labels
[lc_index
- 1].text
= g_strdup (text
);
2755 /* Find ButtonBar widget in the dialog */
2757 find_buttonbar (const Dlg_head
*h
)
2759 return (WButtonBar
*) find_widget_type (h
, buttonbar_callback
);
2763 buttonbar_set_label (WButtonBar
*bb
, int idx
, const char *text
,
2764 const struct global_keymap_t
*keymap
, const Widget
*receiver
)
2766 if ((bb
!= NULL
) && (idx
>= 1) && (idx
<= BUTTONBAR_LABELS_NUM
)) {
2767 unsigned long command
= CK_Ignore_Key
;
2770 command
= lookup_keymap_command (keymap
, KEY_F (idx
));
2772 if ((text
== NULL
) || (text
[0] == '\0'))
2773 set_label_text (bb
, idx
, "");
2775 set_label_text (bb
, idx
, text
);
2777 bb
->labels
[idx
- 1].command
= command
;
2778 bb
->labels
[idx
- 1].receiver
= (Widget
*) receiver
;
2783 buttonbar_set_visible (WButtonBar
*bb
, gboolean visible
)
2785 bb
->visible
= visible
;
2789 buttonbar_redraw (WButtonBar
*bb
)
2792 send_message ((Widget
*) bb
, WIDGET_DRAW
, 0);
2796 groupbox_callback (Widget
*w
, widget_msg_t msg
, int parm
)
2798 WGroupbox
*g
= (WGroupbox
*) w
;
2805 return MSG_NOT_HANDLED
;
2808 tty_setcolor (COLOR_NORMAL
);
2809 draw_box (g
->widget
.parent
, g
->widget
.y
- g
->widget
.parent
->y
,
2810 g
->widget
.x
- g
->widget
.parent
->x
, g
->widget
.lines
,
2813 tty_setcolor (COLOR_HOT_NORMAL
);
2814 dlg_move (g
->widget
.parent
, g
->widget
.y
- g
->widget
.parent
->y
,
2815 g
->widget
.x
- g
->widget
.parent
->x
+ 1);
2816 tty_print_string (g
->title
);
2819 case WIDGET_DESTROY
:
2824 return default_proc (msg
, parm
);
2829 groupbox_new (int y
, int x
, int height
, int width
, const char *title
)
2831 WGroupbox
*g
= g_new (WGroupbox
, 1);
2833 init_widget (&g
->widget
, y
, x
, height
, width
, groupbox_callback
, NULL
);
2835 g
->widget
.options
&= ~W_WANT_CURSOR
;
2836 widget_want_hotkey (g
->widget
, 0);
2838 /* Strip existing spaces, add one space before and after the title */
2841 t
= g_strstrip (g_strdup (title
));
2842 g
->title
= g_strconcat (" ", t
, " ", (char *) NULL
);