/*
* Display a menu for choosing among a number of options
*/
int
dialog_menu(const char *title, const char *cprompt, int height, int width,
int menu_height, int item_no, const char **items)
{
int i, j, x, y, cur_x, cur_y, box_x, box_y;
int key = 0;
int button = 0;
int choice = dlg_default_item(items, MENUBOX_TAGS);
int scrollamt = 0;
int max_choice, min_width;
int found;
int use_width, name_width, text_width;
WINDOW *dialog, *menu;
char *prompt = strclone(cprompt);
const char **buttons = dlg_ok_labels();
tab_correct_str(prompt);
if (menu_height == 0) {
min_width = calc_listw(item_no, items, MENUBOX_TAGS) + 10;
/* calculate height without items (4) */
auto_size(title, prompt, &height, &width, 4, MAX(26, min_width));
calc_listh(&height, &menu_height, item_no);
} else {
auto_size(title, prompt, &height, &width, 4 + menu_height, 26);
}
print_size(height, width);
ctl_size(height, width);
max_choice = MIN(menu_height, item_no);
x = box_x_ordinate(width);
y = box_y_ordinate(height);
dialog = new_window(height, width, y, x);
mouse_setbase(x, y);
draw_box(dialog, 0, 0, height, width, dialog_attr, border_attr);
draw_bottom_box(dialog);
draw_title(dialog, title);
wattrset(dialog, dialog_attr);
print_autowrap(dialog, prompt, height, width);
menu_width = width - 6;
getyx(dialog, cur_y, cur_x);
box_y = cur_y + 1;
box_x = (width - menu_width) / 2 - 1;
/* create new window for the menu */
menu = sub_window(dialog, menu_height, menu_width, y + box_y + 1,
x + box_x + 1);
/* draw a box around the menu items */
draw_box(dialog, box_y, box_x, menu_height + 2, menu_width + 2,
menubox_border_attr, menubox_attr);
name_width = 0;
text_width = 0;
/* Find length of longest item to center menu */
for (i = 0; i < item_no; i++) {
name_width = MAX(name_width, (int) strlen(ItemName(i)));
text_width = MAX(text_width, (int) strlen(ItemText(i)));
}
/* If the name+text is wider than the list is allowed, then truncate
* one or both of them. If the name is no wider than 1/4 of the list,
* leave it intact.
*/
use_width = (menu_width - 2);
if (text_width + name_width > use_width) {
int need = 0.25 * use_width;
if (name_width > need) {
int want = use_width * ((double) name_width) / (text_width + name_width);
name_width = (want > need) ? want : need;
}
text_width = use_width - name_width;
}
tag_x = (use_width - text_width - name_width) / 2;
item_x = name_width + tag_x + 2;
if (choice - scrollamt >= max_choice) {
scrollamt = choice - (max_choice - 1);
choice = max_choice - 1;
}
/* Print the menu */
for (i = 0; i < max_choice; i++)
print_item(menu, ItemData(i + scrollamt), i, i == choice);
(void) wnoutrefresh(menu);
/* register the new window, along with its borders */
mouse_mkbigregion(box_y, box_x, menu_height + 2, menu_width + 2,
item_no, item_x, /* the threshold */
1 /* dirty mode */ );
dlg_draw_arrows(dialog, scrollamt,
scrollamt + max_choice < item_no,
box_x + tag_x + 1,
box_y,
box_y + menu_height + 1);
dlg_draw_buttons(dialog, height - 2, 0, buttons, button, FALSE, width);
wtimeout(dialog, WTIMEOUT_VAL);
while (key != ESC) {
key = mouse_wgetch(dialog);
/* Check if key pressed matches first character of any
item tag in menu */
for (i = 0; i < max_choice; i++)
if (toupper(key) == toupper(UCH(ItemName(scrollamt + i)[0])))
break;
/*
* Check if key pressed matches first character of any item tag in
* list. If there is more than one match, we will cycle through
* each one as the same key is pressed repeatedly.
*/
found = FALSE;
for (j = scrollamt + choice + 1; j < item_no; j++) {
if (toupper(key) ==
toupper(UCH(ItemName(j)[0]))) {
found = TRUE;
i = j - scrollamt;
break;
}
}
if (!found) {
for (j = 0; j <= scrollamt + choice; j++) {
if (toupper(key) ==
toupper(UCH(ItemName(j)[0]))) {
found = TRUE;
i = j - scrollamt;
break;
}
}
}
/*
* A single digit (1-9) positions the selection to that line in the
* current screen.
*/
if (!found
&& (key <= '9')
&& (key > '0')
&& (key - '1' <= max_choice)) {
found = TRUE;
i = key - '1';
}
if (!found) {
found = TRUE;
switch (key) {
case KEY_HOME:
i = -scrollamt;
break;
case KEY_LL:
case KEY_END:
i = item_no - 1 - scrollamt;
break;
case KEY_PPAGE:
if (choice)
i = 0;
else if (scrollamt != 0)
i = -MIN(scrollamt, max_choice);
else
continue;
break;
case KEY_NPAGE:
i = MIN(choice + max_choice, item_no - scrollamt - 1);
break;
case KEY_UP:
case '-':
i = choice - 1;
if (choice == 0 && scrollamt == 0)
continue;
break;
case KEY_DOWN:
case '+':
i = choice + 1;
if (scrollamt + choice >= item_no - 1)
continue;
break;
default:
found = FALSE;
break;
}
}
if (found) {
if (i != choice) {
getyx(dialog, cur_y, cur_x);
if (i < 0 || i >= max_choice) {
#if defined(NCURSES_VERSION_MAJOR) && NCURSES_VERSION_MAJOR < 5
/*
* Using wscrl to assist ncurses scrolling is not needed
* in version 5.x
*/
if (i == -1) {
if (menu_height > 1) {
/* De-highlight current first item */
print_item(menu, ItemData(scrollamt), 0, FALSE);
scrollok(menu, TRUE);
wscrl(menu, -1);
scrollok(menu, FALSE);
}
scrollamt--;
print_item(menu, ItemData(scrollamt), 0, TRUE);
} else if (i == max_choice) {
if (menu_height > 1) {
/* De-highlight current last item before scrolling up */
print_item(menu,
ItemData(scrollamt + max_choice - 1),
max_choice - 1, FALSE);
scrollok(menu, TRUE);
wscrl(menu, 1);
scrollok(menu, FALSE);
}
scrollamt++;
print_item(menu,
ItemData(scrollamt + max_choice - 1),
max_choice - 1, TRUE);
} else
#endif
{
if (i < 0) {
scrollamt += i;
choice = 0;
} else {
choice = max_choice - 1;
scrollamt += (i - max_choice + 1);
}
for (i = 0; i < max_choice; i++) {
print_item(menu,
ItemData(scrollamt + i),
i, i == choice);
}
}
(void) wnoutrefresh(menu);
dlg_draw_arrows(dialog, scrollamt,
scrollamt + choice < item_no - 1,
box_x + tag_x + 1,
box_y,
box_y + menu_height + 1);
} else {
/* De-highlight current item */
print_item(menu,
ItemData(scrollamt + choice),
choice, FALSE);
/* Highlight new item */
choice = i;
print_item(menu,
ItemData(scrollamt + choice),
choice, TRUE);
(void) wnoutrefresh(menu);
(void) wmove(dialog, cur_y, cur_x);
wrefresh(dialog);
}
}
continue; /* wait for another key press */
}
switch (key) {
case M_EVENT + 'O':
del_window(dialog);
return scrollamt + choice;
case M_EVENT + 'C':
del_window(dialog);
return -2;
case M_EVENT + 'o': /* mouse enter... */
case M_EVENT + 'c': /* use the code for toggling */
button = (key == M_EVENT + 'o');
/* FALLTHRU */
case ' ':
case KEY_BTAB:
case TAB:
case KEY_LEFT:
case KEY_RIGHT:
if (!dialog_vars.nocancel)
button = !button;
dlg_draw_buttons(dialog, height - 2, 0, buttons, button, FALSE, width);
break;
case '\n':
del_window(dialog);
return (button ? -2 : (scrollamt + choice));
}
}
del_window(dialog);
return -1; /* ESC pressed */
}
/*
* Display a menu for choosing among a number of options
*/
int
dialog_menu(const char *title, const char *cprompt, int height, int width,
int menu_height, int item_no, char **items)
{
int i, j, x, y, cur_x, cur_y, box_x, box_y;
int key = 0, fkey;
int button = 0;
int choice = dlg_default_item(items, MENUBOX_TAGS);
int result = DLG_EXIT_UNKNOWN;
int scrollamt = 0;
int max_choice, min_width;
int found;
int use_width, name_width, text_width;
WINDOW *dialog, *menu;
char *prompt = strclone(cprompt);
const char **buttons = dlg_ok_labels();
tab_correct_str(prompt);
if (menu_height == 0) {
min_width = calc_listw(item_no, items, MENUBOX_TAGS) + 10;
/* calculate height without items (4) */
auto_size(title, prompt, &height, &width, 4, MAX(26, min_width));
calc_listh(&height, &menu_height, item_no);
} else {
auto_size(title, prompt, &height, &width, 4 + menu_height, 26);
}
print_size(height, width);
ctl_size(height, width);
/* Find out maximal number of displayable items at once. */
max_choice = MIN(menu_height,
RowHeight(item_no));
if (dialog_vars.input_menu)
max_choice /= INPUT_ROWS;
x = box_x_ordinate(width);
y = box_y_ordinate(height);
dialog = new_window(height, width, y, x);
mouse_setbase(x, y);
draw_box(dialog, 0, 0, height, width, dialog_attr, border_attr);
draw_bottom_box(dialog);
draw_title(dialog, title);
wattrset(dialog, dialog_attr);
print_autowrap(dialog, prompt, height, width);
menu_width = width - 6;
getyx(dialog, cur_y, cur_x);
box_y = cur_y + 1;
box_x = (width - menu_width) / 2 - 1;
/* create new window for the menu */
menu = sub_window(dialog, menu_height, menu_width,
y + box_y + 1,
x + box_x + 1);
/* draw a box around the menu items */
draw_box(dialog, box_y, box_x, menu_height + 2, menu_width + 2,
menubox_border_attr, menubox_attr);
name_width = 0;
text_width = 0;
/* Find length of longest item to center menu *
* only if --menu was given, using --inputmenu *
* won't be centered. */
for (i = 0; i < item_no; i++) {
name_width = MAX(name_width, dlg_count_columns(ItemName(i)));
text_width = MAX(text_width, dlg_count_columns(ItemText(i)));
}
/* If the name+text is wider than the list is allowed, then truncate
* one or both of them. If the name is no wider than 1/4 of the list,
* leave it intact.
*/
use_width = (menu_width - GUTTER);
if (text_width + name_width > use_width) {
int need = 0.25 * use_width;
if (name_width > need) {
int want = use_width * ((double) name_width) / (text_width + name_width);
name_width = (want > need) ? want : need;
}
text_width = use_width - name_width;
}
tag_x = (dialog_vars.input_menu
? 0
: (use_width - text_width - name_width) / 2);
item_x = name_width + tag_x + GUTTER;
if (choice - scrollamt >= max_choice) {
scrollamt = choice - (max_choice - 1);
choice = max_choice - 1;
}
/* Print the menu */
for (i = 0; i < max_choice; i++)
print_item(menu, ItemData(i + scrollamt), i, i == choice);
(void) wnoutrefresh(menu);
/* register the new window, along with its borders */
mouse_mkbigregion(box_y + 1, box_x, menu_height + 2, menu_width + 2,
KEY_MAX, 1, 1, 1 /* by lines */ );
dlg_draw_arrows(dialog, scrollamt,
scrollamt + max_choice < item_no,
box_x + tag_x + 1,
box_y,
box_y + menu_height + 1);
dlg_draw_buttons(dialog, height - 2, 0, buttons, button, FALSE, width);
wtimeout(dialog, WTIMEOUT_VAL);
while (result == DLG_EXIT_UNKNOWN) {
key = mouse_wgetch(dialog, &fkey);
if (!fkey) {
fkey = TRUE;
switch (key) {
case '\n':
case '\r':
key = KEY_ENTER;
break;
case '-':
key = KEY_UP;
break;
case '+':
key = KEY_DOWN;
break;
case ' ':
case TAB:
key = KEY_RIGHT;
break;
case ESC:
result = DLG_EXIT_ESC;
continue;
default:
fkey = FALSE;
break;
}
}
found = FALSE;
if (fkey) {
/*
* Allow a mouse-click on a box to switch selection to that box.
* Handling a button click is a little more complicated, since we
* push a KEY_ENTER back onto the input stream so we'll put the
* cursor at the right place before handling the "keypress".
*/
if (key >= (M_EVENT + KEY_MAX)) {
key -= (M_EVENT + KEY_MAX);
i = RowToItem(key);
found = TRUE;
} else if (key >= M_EVENT
&& dlg_ok_buttoncode(key - M_EVENT) >= 0) {
button = (key - M_EVENT);
ungetch('\n');
continue;
}
} else {
/*
* Check if key pressed matches first character of any item tag in
* list. If there is more than one match, we will cycle through
* each one as the same key is pressed repeatedly.
*/
for (j = scrollamt + choice + 1; j < item_no; j++) {
if (dlg_match_char(dlg_last_getc(), ItemName(j))) {
found = TRUE;
i = j - scrollamt;
break;
}
}
if (!found) {
for (j = 0; j <= scrollamt + choice; j++) {
if (dlg_match_char(dlg_last_getc(), ItemName(j))) {
found = TRUE;
i = j - scrollamt;
break;
}
}
}
if (found)
dlg_flush_getc();
/*
* A single digit (1-9) positions the selection to that line in the
* current screen.
*/
if (!found
&& (key <= '9')
&& (key > '0')
&& (key - '1' < max_choice)) {
found = TRUE;
i = key - '1';
}
}
if (!found && fkey) {
found = TRUE;
switch (key) {
case KEY_HOME:
i = -scrollamt;
break;
case KEY_LL:
case KEY_END:
i = item_no - 1 - scrollamt;
break;
case M_EVENT + KEY_PPAGE:
case KEY_PPAGE:
if (choice)
i = 0;
else if (scrollamt != 0)
i = -MIN(scrollamt, max_choice);
else
continue;
break;
case M_EVENT + KEY_NPAGE:
case KEY_NPAGE:
i = MIN(choice + max_choice, item_no - scrollamt - 1);
break;
case KEY_UP:
i = choice - 1;
if (choice == 0 && scrollamt == 0)
continue;
break;
case KEY_DOWN:
i = choice + 1;
if (scrollamt + choice >= item_no - 1)
continue;
break;
default:
found = FALSE;
break;
}
}
if (found) {
if (i != choice) {
getyx(dialog, cur_y, cur_x);
if (i < 0 || i >= max_choice) {
#if defined(NCURSES_VERSION_MAJOR) && NCURSES_VERSION_MAJOR < 5
/*
* Using wscrl to assist ncurses scrolling is not needed
* in version 5.x
*/
if (i == -1) {
if (menu_height > 1) {
/* De-highlight current first item */
print_item(menu, ItemData(scrollamt), 0, FALSE);
scrollok(menu, TRUE);
wscrl(menu, -RowHeight(1));
scrollok(menu, FALSE);
}
scrollamt--;
print_item(menu, ItemData(scrollamt), 0, TRUE);
} else if (i == max_choice) {
if (menu_height > 1) {
/* De-highlight current last item before scrolling up */
print_item(menu,
ItemData(scrollamt + max_choice - 1),
max_choice - 1, FALSE);
scrollok(menu, TRUE);
wscrl(menu, RowHeight(1));
scrollok(menu, FALSE);
}
scrollamt++;
print_item(menu,
ItemData(scrollamt + max_choice - 1),
max_choice - 1, TRUE);
} else
#endif
{
if (i < 0) {
scrollamt += i;
choice = 0;
} else {
choice = max_choice - 1;
scrollamt += (i - max_choice + 1);
}
for (i = 0; i < max_choice; i++) {
print_item(menu,
ItemData(scrollamt + i),
i, i == choice);
}
}
/* Clean bottom lines */
if (dialog_vars.input_menu) {
int spare_lines, x_count;
spare_lines = menu_height % INPUT_ROWS;
wattrset(menu, menubox_attr);
for (; spare_lines; spare_lines--) {
wmove(menu, menu_height - spare_lines, 0);
for (x_count = 0; x_count < menu_width;
x_count++) {
waddch(menu, ' ');
}
}
}
(void) wnoutrefresh(menu);
dlg_draw_arrows(dialog, scrollamt,
scrollamt + choice < item_no - 1,
box_x + tag_x + 1,
box_y,
box_y + menu_height + 1);
} else {
/* De-highlight current item */
print_item(menu,
ItemData(scrollamt + choice),
choice, FALSE);
/* Highlight new item */
choice = i;
print_item(menu,
ItemData(scrollamt + choice),
choice, TRUE);
(void) wnoutrefresh(menu);
(void) wmove(dialog, cur_y, cur_x);
wrefresh(dialog);
}
}
continue; /* wait for another key press */
}
if (fkey) {
switch (key) {
case KEY_BTAB:
case KEY_LEFT:
button = dlg_prev_button(buttons, button);
dlg_draw_buttons(dialog, height - 2, 0, buttons, button,
FALSE, width);
break;
case KEY_RIGHT:
button = dlg_next_button(buttons, button);
dlg_draw_buttons(dialog, height - 2, 0, buttons, button,
FALSE, width);
break;
case KEY_ENTER:
del_window(dialog);
result = handle_button(dlg_ok_buttoncode(button),
items,
scrollamt + choice);
if (dialog_vars.input_menu && result == DLG_EXIT_EXTRA) {
char *tmp;
tmp = input_menu_edit(menu, ItemData(scrollamt + choice),
choice);
dialog_vars.input_result[0] = '\0';
dlg_add_result("RENAMED ");
dlg_add_result(ItemName(scrollamt + choice));
dlg_add_result(" ");
dlg_add_result(tmp);
free(tmp);
dlg_draw_buttons(dialog, height - 2, 0,
buttons, button, FALSE, width);
}
break;
default:
flash();
break;
}
}
}
mouse_free_regions();
del_window(dialog);
free(prompt);
return result;
}
