mirror of
https://github.com/Aigor44/ncursesw-morphos.git
synced 2024-12-21 07:39:06 +08:00
47d2fb4537
+ update release notes + minor build-fixes, mostly to test-package scripts + modify check for sizeof(wchar_t) to ensure it gives useful result when cross-compiling. + drop assumption in configure script that Cygwin's linker is broken. + define NCURSES_BROKEN_LINKER if the broken-linker feature is used, to simplify configure-checks for ncurses-examples. + reassert copyright on ncurses, per discussion in ncurses FAQ: https://invisible-island.net/ncurses/ncurses.faq.html#relicensed + modify comparison in make_hash.c to correct a special case in collision handling for Caps-hpux11 + add testing utility report_hashing to check hash-tables used for terminfo and termcap names. + fix a missing prototype for _nc_free_and_exit(). + update a few comments about tack 1.07 + use an awk script to split too-long pathnames used in Ada95 sample programs for explain.txt
1054 lines
22 KiB
C
1054 lines
22 KiB
C
/****************************************************************************
|
|
* Copyright 2019,2020 Thomas E. Dickey *
|
|
* Copyright 2003-2016,2017 Free Software Foundation, Inc. *
|
|
* *
|
|
* Permission is hereby granted, free of charge, to any person obtaining a *
|
|
* copy of this software and associated documentation files (the *
|
|
* "Software"), to deal in the Software without restriction, including *
|
|
* without limitation the rights to use, copy, modify, merge, publish, *
|
|
* distribute, distribute with modifications, sublicense, and/or sell *
|
|
* copies of the Software, and to permit persons to whom the Software is *
|
|
* furnished to do so, subject to the following conditions: *
|
|
* *
|
|
* The above copyright notice and this permission notice shall be included *
|
|
* in all copies or substantial portions of the Software. *
|
|
* *
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
|
|
* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
|
|
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
|
|
* IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
|
|
* DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
|
|
* OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
|
|
* THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
|
|
* *
|
|
* Except as contained in this notice, the name(s) of the above copyright *
|
|
* holders shall not be used in advertising or otherwise to promote the *
|
|
* sale, use or other dealings in this Software without prior written *
|
|
* authorization. *
|
|
****************************************************************************/
|
|
/*
|
|
* $Id: demo_menus.c,v 1.71 2020/02/02 23:34:34 tom Exp $
|
|
*
|
|
* Demonstrate a variety of functions from the menu library.
|
|
* Thomas Dickey - 2005/4/9
|
|
*/
|
|
/*
|
|
item_description -
|
|
item_init -
|
|
item_opts -
|
|
item_opts_off -
|
|
item_opts_on -
|
|
item_term -
|
|
item_visible -
|
|
menu_back -
|
|
menu_fore -
|
|
menu_format -
|
|
menu_grey -
|
|
menu_init -
|
|
menu_opts -
|
|
menu_pad -
|
|
menu_request_by_name -
|
|
menu_request_name -
|
|
menu_term -
|
|
menu_userptr -
|
|
set_current_item -
|
|
set_item_opts -
|
|
set_menu_grey -
|
|
set_menu_items -
|
|
set_menu_opts -
|
|
set_menu_pad -
|
|
set_menu_pattern -
|
|
set_menu_spacing -
|
|
set_menu_userptr -
|
|
set_top_row -
|
|
top_row -
|
|
*/
|
|
|
|
#include <test.priv.h>
|
|
|
|
#if USE_LIBMENU
|
|
|
|
#include <menu.h>
|
|
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
|
|
#ifdef NCURSES_VERSION
|
|
#ifdef TRACE
|
|
static unsigned save_trace = TRACE_ORDINARY | TRACE_CALLS;
|
|
static MENU *mpTrace;
|
|
#endif
|
|
#endif
|
|
|
|
typedef enum {
|
|
eBanner = -1
|
|
,eFile
|
|
,eSelect
|
|
#ifdef TRACE
|
|
,eTrace
|
|
#endif
|
|
,eMAX
|
|
} MenuNo;
|
|
|
|
#define okMenuNo(n) (((n) > eBanner) && ((n) < eMAX))
|
|
|
|
#define MENU_Y 1
|
|
|
|
typedef struct {
|
|
NCURSES_CONST char *name;
|
|
void (*func) (int);
|
|
unsigned mask;
|
|
} MENU_DATA;
|
|
|
|
static void call_files(int);
|
|
|
|
static MENU *mpBanner;
|
|
static MENU *mpFile;
|
|
static MENU *mpSelect;
|
|
|
|
static WINDOW *status;
|
|
|
|
static bool loaded_file = FALSE;
|
|
|
|
static char empty[1];
|
|
|
|
#ifdef TRACE
|
|
static void failed(const char *s) GCC_NORETURN;
|
|
|
|
static void
|
|
failed(const char *s)
|
|
{
|
|
perror(s);
|
|
endwin();
|
|
ExitProgram(EXIT_FAILURE);
|
|
}
|
|
#endif
|
|
|
|
/* Common function to allow ^T to toggle trace-mode in the middle of a test
|
|
* so that trace-files can be made smaller.
|
|
*/
|
|
static int
|
|
wGetchar(WINDOW *win)
|
|
{
|
|
int c;
|
|
#ifdef TRACE
|
|
while ((c = wgetch(win)) == CTRL('T')) {
|
|
if (_nc_tracing) {
|
|
save_trace = _nc_tracing;
|
|
Trace(("TOGGLE-TRACING OFF"));
|
|
_nc_tracing = 0;
|
|
} else {
|
|
_nc_tracing = save_trace;
|
|
}
|
|
curses_trace(_nc_tracing);
|
|
if (_nc_tracing)
|
|
Trace(("TOGGLE-TRACING ON"));
|
|
}
|
|
#else
|
|
c = wgetch(win);
|
|
#endif
|
|
return c;
|
|
}
|
|
#define Getchar() wGetchar(stdscr)
|
|
|
|
static int
|
|
menu_virtualize(int c)
|
|
{
|
|
int result;
|
|
|
|
if (c == '\n' || c == KEY_EXIT)
|
|
result = (MAX_COMMAND + 1);
|
|
else if (c == 'u')
|
|
result = (REQ_SCR_ULINE);
|
|
else if (c == 'd')
|
|
result = (REQ_SCR_DLINE);
|
|
else if (c == 'b' || c == KEY_NPAGE)
|
|
result = (REQ_SCR_UPAGE);
|
|
else if (c == 'f' || c == KEY_PPAGE)
|
|
result = (REQ_SCR_DPAGE);
|
|
else if (c == 'l' || c == KEY_LEFT || c == KEY_BTAB)
|
|
result = (REQ_LEFT_ITEM);
|
|
else if (c == 'n' || c == KEY_DOWN)
|
|
result = (REQ_NEXT_ITEM);
|
|
else if (c == 'p' || c == KEY_UP)
|
|
result = (REQ_PREV_ITEM);
|
|
else if (c == 'r' || c == KEY_RIGHT || c == '\t')
|
|
result = (REQ_RIGHT_ITEM);
|
|
else if (c == ' ')
|
|
result = (REQ_TOGGLE_ITEM);
|
|
else {
|
|
if (c != KEY_MOUSE)
|
|
beep();
|
|
result = (c);
|
|
}
|
|
return result;
|
|
}
|
|
|
|
static int
|
|
menu_getc(MENU * m)
|
|
{
|
|
return wGetchar(menu_win(m));
|
|
}
|
|
|
|
static int
|
|
menu_offset(MenuNo number)
|
|
{
|
|
int result = 0;
|
|
|
|
if (okMenuNo(number)) {
|
|
int spc_rows;
|
|
#ifdef NCURSES_VERSION
|
|
int spc_desc, spc_cols;
|
|
menu_spacing(mpBanner, &spc_desc, &spc_rows, &spc_cols);
|
|
#else
|
|
spc_rows = 0;
|
|
#endif
|
|
|
|
/* FIXME: MENU.itemlen seems the only way to get actual width of items */
|
|
result = (number - (eBanner + 1)) * (menu_itemwidth(mpBanner) + spc_rows);
|
|
}
|
|
return result;
|
|
}
|
|
|
|
static void
|
|
my_menu_init(MENU * menu)
|
|
{
|
|
Trace(("called MenuHook my_menu_init"));
|
|
mvwprintw(status, 2, 0, "menu_init %p", (void *) menu);
|
|
wclrtoeol(status);
|
|
wrefresh(status);
|
|
}
|
|
|
|
static void
|
|
my_menu_term(MENU * menu)
|
|
{
|
|
Trace(("called MenuHook my_menu_term"));
|
|
mvwprintw(status, 2, 0, "menu_term %p", (void *) menu);
|
|
wclrtoeol(status);
|
|
wrefresh(status);
|
|
}
|
|
|
|
static void
|
|
my_item_init(MENU * menu)
|
|
{
|
|
ITEM *item = current_item(menu);
|
|
const char *name = item_name(item);
|
|
|
|
Trace(("called MenuHook my_item_init (%s)", name));
|
|
mvwprintw(status, 2, 0, "item_init %s", name);
|
|
wclrtoeol(status);
|
|
wrefresh(status);
|
|
}
|
|
|
|
static void
|
|
my_item_term(MENU * menu)
|
|
{
|
|
ITEM *item = current_item(menu);
|
|
const char *name = item_name(item);
|
|
|
|
Trace(("called MenuHook my_item_term (%s)", name));
|
|
mvwprintw(status, 2, 0, "item_term %s", name);
|
|
wclrtoeol(status);
|
|
wrefresh(status);
|
|
}
|
|
|
|
static MENU *
|
|
menu_create(ITEM ** items, int count, int ncols, MenuNo number)
|
|
{
|
|
MENU *result;
|
|
WINDOW *menuwin;
|
|
int mrows, mcols;
|
|
int y = okMenuNo(number) ? MENU_Y : 0;
|
|
int x = menu_offset(number);
|
|
int margin = (y == MENU_Y) ? 1 : 0;
|
|
int maxcol = (ncols + x) < COLS ? ncols : (COLS - x - 1);
|
|
int maxrow = (count + 1) / ncols;
|
|
|
|
if ((maxrow + y) >= (LINES - 4))
|
|
maxrow = LINES - 4 - y;
|
|
|
|
result = new_menu(items);
|
|
|
|
if (has_colors()) {
|
|
set_menu_fore(result, (chtype) COLOR_PAIR(1));
|
|
set_menu_back(result, (chtype) COLOR_PAIR(2));
|
|
}
|
|
|
|
set_menu_format(result, maxrow, maxcol);
|
|
scale_menu(result, &mrows, &mcols);
|
|
|
|
if (mcols + (2 * margin + x) >= COLS)
|
|
mcols = COLS - (2 * margin + x);
|
|
|
|
menuwin = newwin(mrows + (2 * margin), mcols + (2 * margin), y, x);
|
|
set_menu_win(result, menuwin);
|
|
keypad(menuwin, TRUE);
|
|
if (margin)
|
|
box(menuwin, 0, 0);
|
|
|
|
set_menu_sub(result, derwin(menuwin, mrows, mcols, margin, margin));
|
|
|
|
#ifdef TRACE
|
|
if (number == eTrace)
|
|
menu_opts_off(result, O_ONEVALUE);
|
|
else
|
|
menu_opts_on(result, O_ONEVALUE);
|
|
#endif
|
|
#if defined(NCURSES_MOUSE_VERSION) && defined(O_MOUSE_MENU)
|
|
menu_opts_on(result, O_MOUSE_MENU);
|
|
#endif
|
|
|
|
post_menu(result);
|
|
|
|
set_menu_init(result, my_menu_init);
|
|
set_menu_term(result, my_menu_term);
|
|
set_item_init(result, my_item_init);
|
|
set_item_term(result, my_item_term);
|
|
return result;
|
|
}
|
|
|
|
static void
|
|
menu_destroy(MENU * m)
|
|
{
|
|
Trace(("menu_destroy %p", (void *) m));
|
|
if (m != 0) {
|
|
ITEM **items = menu_items(m);
|
|
const char *blob = 0;
|
|
int count;
|
|
|
|
count = item_count(m);
|
|
Trace(("menu_destroy %p count %d", (void *) m, count));
|
|
if ((count > 0) && (m == mpSelect)) {
|
|
blob = item_name(*items);
|
|
}
|
|
|
|
unpost_menu(m);
|
|
free_menu(m);
|
|
|
|
/* free the extra data allocated in build_select_menu() */
|
|
if ((count > 0) && (m == mpSelect)) {
|
|
if (blob && loaded_file) {
|
|
Trace(("freeing blob %p", blob));
|
|
free((void *) blob);
|
|
}
|
|
free(items);
|
|
items = 0;
|
|
}
|
|
#ifdef TRACE
|
|
if ((count > 0) && (m == mpTrace)) {
|
|
ITEM **ip = items;
|
|
if (ip != 0) {
|
|
while (*ip)
|
|
free(*ip++);
|
|
}
|
|
}
|
|
#endif
|
|
}
|
|
}
|
|
|
|
/* force the given menu to appear */
|
|
static void
|
|
menu_display(MENU * m)
|
|
{
|
|
touchwin(menu_win(m));
|
|
wrefresh(menu_win(m));
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
|
|
static void
|
|
build_file_menu(MenuNo number)
|
|
{
|
|
static MENU_DATA table[] =
|
|
{
|
|
{"Exit", call_files, 0},
|
|
{(char *) 0, 0, 0}
|
|
};
|
|
static ITEM *items[SIZEOF(table)];
|
|
|
|
ITEM **ip = items;
|
|
int n;
|
|
|
|
for (n = 0; table[n].name != 0; ++n) {
|
|
*ip = new_item(table[n].name, empty);
|
|
set_item_userptr(*ip, (void *) &table[n]);
|
|
++ip;
|
|
}
|
|
*ip = (ITEM *) 0;
|
|
|
|
mpFile = menu_create(items, SIZEOF(table) - 1, 1, number);
|
|
}
|
|
|
|
static int
|
|
perform_file_menu(int cmd)
|
|
{
|
|
return menu_driver(mpFile, cmd);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
|
|
static void
|
|
call_select(int code)
|
|
{
|
|
(void) code;
|
|
Trace(("Selected item %d", code));
|
|
}
|
|
|
|
static void
|
|
build_select_menu(MenuNo number, char *filename)
|
|
{
|
|
#define MY_DATA(name) { name, call_select, 0 }
|
|
static MENU_DATA table[] =
|
|
{
|
|
MY_DATA("Lions"),
|
|
MY_DATA("Tigers"),
|
|
MY_DATA("Bears"),
|
|
MY_DATA("(Oh my!)"),
|
|
MY_DATA("Newts"),
|
|
MY_DATA("Platypi"),
|
|
MY_DATA("Lemurs"),
|
|
MY_DATA("(Oh really?!)"),
|
|
MY_DATA("Leopards"),
|
|
MY_DATA("Panthers"),
|
|
MY_DATA("Pumas"),
|
|
MY_DATA("Lions, Tigers, Bears, (Oh my!), Newts, Platypi, Lemurs"),
|
|
MY_DATA("Lions, Tigers, Bears, (Oh my!), Newts, Platypi, Lemurs, Lions, Tigers, Bears, (Oh my!), Newts, Platypi, Lemurs"),
|
|
{(char *) 0, 0, 0}
|
|
};
|
|
static ITEM **items;
|
|
|
|
ITEM **ip;
|
|
MENU_DATA *ap = 0;
|
|
MENU_DATA *myList = 0;
|
|
int i;
|
|
size_t count = 0;
|
|
|
|
if (filename != 0) {
|
|
struct stat sb;
|
|
if (stat(filename, &sb) == 0
|
|
&& (sb.st_mode & S_IFMT) == S_IFREG
|
|
&& sb.st_size != 0) {
|
|
size_t size = (size_t) sb.st_size;
|
|
char *blob = typeMalloc(char, size + 1);
|
|
MENU_DATA *list = typeCalloc(MENU_DATA, size + 1);
|
|
|
|
items = typeCalloc(ITEM *, size + 1);
|
|
Trace(("build_select_menu blob=%p, items=%p",
|
|
(void *) blob,
|
|
(void *) items));
|
|
if (blob != 0 && list != 0) {
|
|
FILE *fp = fopen(filename, "r");
|
|
if (fp != 0) {
|
|
if (fread(blob, sizeof(char), size, fp) == size) {
|
|
bool mark = TRUE;
|
|
unsigned j, k;
|
|
for (j = k = 0; j < size; ++j) {
|
|
if (mark) {
|
|
list[k++].name = blob + j;
|
|
mark = FALSE;
|
|
}
|
|
if (blob[j] == '\n') {
|
|
blob[j] = '\0';
|
|
if (k > 0 && *list[k - 1].name == '\0')
|
|
--k;
|
|
mark = TRUE;
|
|
} else if (blob[j] == '\t') {
|
|
blob[j] = ' '; /* menu items are printable */
|
|
}
|
|
}
|
|
list[k].name = 0;
|
|
count = k;
|
|
ap = myList = list;
|
|
}
|
|
fclose(fp);
|
|
}
|
|
loaded_file = TRUE;
|
|
}
|
|
if (ap == 0)
|
|
free(items);
|
|
}
|
|
}
|
|
if (ap == 0) {
|
|
count = SIZEOF(table) - 1;
|
|
items = typeCalloc(ITEM *, count + 1);
|
|
ap = table;
|
|
}
|
|
|
|
ip = items;
|
|
for (i = 0; ap[i].name != 0; ++i) {
|
|
ap[i].func = call_select;
|
|
ap[i].mask = (unsigned) i;
|
|
*ip = new_item(ap[i].name, empty);
|
|
set_item_userptr(*ip, (void *) &table[i]);
|
|
++ip;
|
|
}
|
|
*ip = 0;
|
|
|
|
mpSelect = menu_create(items, (int) count, 1, number);
|
|
if (myList != 0)
|
|
free(myList);
|
|
}
|
|
|
|
static int
|
|
perform_select_menu(int cmd)
|
|
{
|
|
return menu_driver(mpSelect, cmd);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
|
|
#ifdef TRACE
|
|
|
|
static void
|
|
call_trace(int code)
|
|
{
|
|
(void) code;
|
|
Trace(("Updating trace mask %d", code));
|
|
}
|
|
|
|
#define T_TBL(name) { #name, call_trace, name }
|
|
static MENU_DATA t_tbl[] =
|
|
{
|
|
|
|
T_TBL(TRACE_DISABLE),
|
|
T_TBL(TRACE_TIMES),
|
|
T_TBL(TRACE_TPUTS),
|
|
T_TBL(TRACE_UPDATE),
|
|
T_TBL(TRACE_MOVE),
|
|
T_TBL(TRACE_CHARPUT),
|
|
T_TBL(TRACE_ORDINARY),
|
|
T_TBL(TRACE_CALLS),
|
|
T_TBL(TRACE_VIRTPUT),
|
|
T_TBL(TRACE_IEVENT),
|
|
T_TBL(TRACE_BITS),
|
|
T_TBL(TRACE_ICALLS),
|
|
T_TBL(TRACE_CCALLS),
|
|
T_TBL(TRACE_DATABASE),
|
|
T_TBL(TRACE_ATTRS),
|
|
T_TBL(TRACE_MAXIMUM),
|
|
{
|
|
(char *) 0, 0, 0
|
|
}
|
|
};
|
|
|
|
static void
|
|
build_trace_menu(MenuNo number)
|
|
{
|
|
static ITEM *items[SIZEOF(t_tbl)];
|
|
|
|
ITEM **ip = items;
|
|
int n;
|
|
|
|
for (n = 0; t_tbl[n].name != 0; n++) {
|
|
*ip = new_item(t_tbl[n].name, empty);
|
|
set_item_userptr(*ip, (void *) &t_tbl[n]);
|
|
++ip;
|
|
}
|
|
*ip = (ITEM *) 0;
|
|
|
|
mpTrace = menu_create(items, SIZEOF(t_tbl) - 1, 2, number);
|
|
}
|
|
|
|
static char *
|
|
tracetrace(unsigned tlevel)
|
|
{
|
|
static char *buf;
|
|
static size_t need = 12;
|
|
int n;
|
|
|
|
if (buf == 0) {
|
|
for (n = 0; t_tbl[n].name != 0; n++)
|
|
need += strlen(t_tbl[n].name) + 2;
|
|
buf = typeMalloc(char, need);
|
|
if (!buf)
|
|
failed("tracetrace");
|
|
}
|
|
_nc_SPRINTF(buf, _nc_SLIMIT(need) "0x%02x = {", tlevel);
|
|
if (tlevel == 0) {
|
|
_nc_STRCAT(buf, t_tbl[0].name, need);
|
|
_nc_STRCAT(buf, ", ", need);
|
|
} else {
|
|
for (n = 1; t_tbl[n].name != 0; n++)
|
|
if ((tlevel & t_tbl[n].mask) == t_tbl[n].mask) {
|
|
_nc_STRCAT(buf, t_tbl[n].name, need);
|
|
_nc_STRCAT(buf, ", ", need);
|
|
}
|
|
}
|
|
if (buf[strlen(buf) - 2] == ',')
|
|
buf[strlen(buf) - 2] = '\0';
|
|
_nc_STRCAT(buf, "}", need);
|
|
return buf;
|
|
}
|
|
|
|
/* fake a dynamically reconfigurable menu using the 0th entry to deselect
|
|
* the others
|
|
*/
|
|
static bool
|
|
update_trace_menu(MENU * m)
|
|
{
|
|
ITEM **items;
|
|
ITEM *i;
|
|
bool changed = FALSE;
|
|
|
|
items = menu_items(m);
|
|
i = current_item(m);
|
|
if (i == items[0]) {
|
|
if (item_value(i)) {
|
|
ITEM **p;
|
|
for (p = items + 1; *p != 0; p++)
|
|
if (item_value(*p)) {
|
|
set_item_value(*p, FALSE);
|
|
changed = TRUE;
|
|
}
|
|
}
|
|
}
|
|
return changed;
|
|
}
|
|
|
|
static int
|
|
perform_trace_menu(int cmd)
|
|
/* interactively set the trace level */
|
|
{
|
|
ITEM **ip;
|
|
int result;
|
|
|
|
for (ip = menu_items(mpTrace); *ip; ip++) {
|
|
MENU_DATA *td = (MENU_DATA *) item_userptr(*ip);
|
|
unsigned mask = td->mask;
|
|
if (mask == 0)
|
|
set_item_value(*ip, _nc_tracing == 0);
|
|
else if ((mask & _nc_tracing) == mask)
|
|
set_item_value(*ip, TRUE);
|
|
}
|
|
|
|
result = menu_driver(mpTrace, cmd);
|
|
|
|
if (result == E_OK) {
|
|
if (update_trace_menu(mpTrace) || cmd == REQ_TOGGLE_ITEM) {
|
|
unsigned newtrace = 0;
|
|
for (ip = menu_items(mpTrace); *ip; ip++) {
|
|
if (item_value(*ip)) {
|
|
MENU_DATA *td = (MENU_DATA *) item_userptr(*ip);
|
|
newtrace |= td->mask;
|
|
}
|
|
}
|
|
curses_trace(newtrace);
|
|
Trace(("trace level interactively set to %s", tracetrace(_nc_tracing)));
|
|
|
|
MvWPrintw(status, 1, 0,
|
|
"Trace level is %s\n", tracetrace(_nc_tracing));
|
|
wrefresh(status);
|
|
}
|
|
}
|
|
return result;
|
|
}
|
|
#endif /* TRACE */
|
|
|
|
/*****************************************************************************/
|
|
|
|
static int
|
|
menu_number(void)
|
|
{
|
|
return item_index(current_item(mpBanner)) - (eBanner + 1);
|
|
}
|
|
|
|
static MENU *
|
|
current_menu(void)
|
|
{
|
|
MENU *result;
|
|
|
|
switch (menu_number()) {
|
|
case eFile:
|
|
result = mpFile;
|
|
break;
|
|
case eSelect:
|
|
result = mpSelect;
|
|
break;
|
|
#ifdef TRACE
|
|
case eTrace:
|
|
result = mpTrace;
|
|
break;
|
|
#endif
|
|
default:
|
|
result = 0;
|
|
break;
|
|
}
|
|
return result;
|
|
}
|
|
|
|
static void
|
|
call_menus(int code)
|
|
{
|
|
(void) code;
|
|
Trace(("Activated menu %d\n", code));
|
|
}
|
|
|
|
static void
|
|
build_menus(char *filename)
|
|
{
|
|
static MENU_DATA table[] =
|
|
{
|
|
{"File", call_menus, 0},
|
|
{"Select", call_menus, 1},
|
|
#ifdef TRACE
|
|
{"Trace", call_menus, 2},
|
|
#endif
|
|
{(char *) 0, 0, 0}
|
|
};
|
|
static ITEM *items[SIZEOF(table)];
|
|
|
|
ITEM **ip = items;
|
|
int n;
|
|
|
|
for (n = 0; table[n].name != 0; ++n) {
|
|
*ip = new_item(table[n].name, empty);
|
|
set_item_userptr(*ip, (void *) &table[n]);
|
|
++ip;
|
|
}
|
|
*ip = (ITEM *) 0;
|
|
|
|
mpBanner = menu_create(items, SIZEOF(table) - 1, SIZEOF(table) - 1, eBanner);
|
|
set_menu_mark(mpBanner, ">");
|
|
|
|
build_file_menu(eFile);
|
|
build_select_menu(eSelect, filename);
|
|
#ifdef TRACE
|
|
build_trace_menu(eTrace);
|
|
#endif
|
|
}
|
|
|
|
static int
|
|
move_menu(MENU * menu, MENU * current, int by_y, int by_x)
|
|
{
|
|
WINDOW *top_win = menu_win(menu);
|
|
WINDOW *sub_win = menu_sub(menu);
|
|
int y0, x0;
|
|
int y1, x1;
|
|
int result;
|
|
|
|
getbegyx(top_win, y0, x0);
|
|
y0 += by_y;
|
|
x0 += by_x;
|
|
|
|
getbegyx(sub_win, y1, x1);
|
|
y1 += by_y;
|
|
x1 += by_x;
|
|
|
|
if ((result = mvwin(top_win, y0, x0)) != ERR) {
|
|
#if defined(NCURSES_VERSION_PATCH) && (NCURSES_VERSION_PATCH < 20060218)
|
|
sub_win->_begy = y1;
|
|
sub_win->_begx = x1;
|
|
#else
|
|
mvwin(sub_win, y1, x1);
|
|
#endif
|
|
if (menu == current) {
|
|
touchwin(top_win);
|
|
wnoutrefresh(top_win);
|
|
}
|
|
}
|
|
return result;
|
|
}
|
|
|
|
/*
|
|
* Move the menus around on the screen, to test mvwin().
|
|
*/
|
|
static void
|
|
move_menus(MENU * current, int by_y, int by_x)
|
|
{
|
|
if (move_menu(mpBanner, current, by_y, by_x) != ERR) {
|
|
erase();
|
|
wnoutrefresh(stdscr);
|
|
move_menu(mpFile, current, by_y, by_x);
|
|
move_menu(mpSelect, current, by_y, by_x);
|
|
#ifdef TRACE
|
|
move_menu(mpTrace, current, by_y, by_x);
|
|
#endif
|
|
doupdate();
|
|
}
|
|
}
|
|
|
|
#if defined(KEY_RESIZE) && NCURSES_EXT_FUNCS
|
|
static void
|
|
resize_menu(MENU ** menu)
|
|
{
|
|
#if 0
|
|
WINDOW *win = menu_win(*menu);
|
|
WINDOW *sub = menu_sub(*menu);
|
|
#endif
|
|
(void) menu;
|
|
}
|
|
|
|
static void
|
|
resize_menus(MENU * current)
|
|
{
|
|
(void) current;
|
|
|
|
werase(status);
|
|
wnoutrefresh(status);
|
|
wresize(status, 1, COLS);
|
|
mvwin(status, LINES - 1, 0);
|
|
|
|
resize_menu(&mpBanner);
|
|
resize_menu(&mpFile);
|
|
resize_menu(&mpSelect);
|
|
#ifdef TRACE
|
|
resize_menu(&mpTrace);
|
|
#endif
|
|
}
|
|
#endif /* defined(KEY_RESIZE) && NCURSES_EXT_FUNCS */
|
|
|
|
static void
|
|
show_status(int ch, MENU * menu)
|
|
{
|
|
wmove(status, 0, 0);
|
|
wprintw(status, "key %s, menu %d, mark %s, match %s",
|
|
keyname(ch),
|
|
menu_number(),
|
|
menu_mark(menu),
|
|
menu_pattern(menu));
|
|
wclrtoeol(status);
|
|
wrefresh(status);
|
|
}
|
|
|
|
static void
|
|
perform_menus(void)
|
|
{
|
|
MENU *this_menu;
|
|
MENU *last_menu = mpFile;
|
|
int code = E_UNKNOWN_COMMAND;
|
|
int cmd;
|
|
int ch = ERR;
|
|
|
|
#ifdef NCURSES_MOUSE_VERSION
|
|
mousemask(BUTTON1_CLICKED, (mmask_t *) 0);
|
|
#endif
|
|
|
|
menu_display(last_menu);
|
|
|
|
for (;;) {
|
|
|
|
if (ch != ERR)
|
|
show_status(ch, last_menu);
|
|
|
|
ch = menu_getc(mpBanner);
|
|
|
|
/*
|
|
* Provide for moving the menu around in the screen using shifted
|
|
* cursor keys.
|
|
*/
|
|
switch (ch) {
|
|
case KEY_SF:
|
|
move_menus(last_menu, 1, 0);
|
|
continue;
|
|
case KEY_SR:
|
|
move_menus(last_menu, -1, 0);
|
|
continue;
|
|
case KEY_SLEFT:
|
|
move_menus(last_menu, 0, -1);
|
|
continue;
|
|
case KEY_SRIGHT:
|
|
move_menus(last_menu, 0, 1);
|
|
continue;
|
|
#if defined(KEY_RESIZE) && NCURSES_EXT_FUNCS
|
|
case KEY_RESIZE:
|
|
resize_menus(last_menu);
|
|
continue;
|
|
#endif
|
|
}
|
|
cmd = menu_virtualize(ch);
|
|
|
|
switch (cmd) {
|
|
/*
|
|
* The banner menu acts solely to select one of the other menus.
|
|
* Move between its items, wrapping at the left/right limits.
|
|
*/
|
|
case REQ_LEFT_ITEM:
|
|
case REQ_RIGHT_ITEM:
|
|
code = menu_driver(mpBanner, cmd);
|
|
if (code == E_REQUEST_DENIED) {
|
|
if (menu_number() > 0)
|
|
code = menu_driver(mpBanner, REQ_FIRST_ITEM);
|
|
else
|
|
code = menu_driver(mpBanner, REQ_LAST_ITEM);
|
|
}
|
|
break;
|
|
default:
|
|
switch (menu_number()) {
|
|
case eFile:
|
|
code = perform_file_menu(cmd);
|
|
break;
|
|
case eSelect:
|
|
code = perform_select_menu(cmd);
|
|
break;
|
|
#ifdef TRACE
|
|
case eTrace:
|
|
code = perform_trace_menu(cmd);
|
|
break;
|
|
#endif
|
|
}
|
|
|
|
#if defined(NCURSES_MOUSE_VERSION) && defined(O_MOUSE_MENU)
|
|
if ((code == E_REQUEST_DENIED) && (cmd == KEY_MOUSE)) {
|
|
(void) menu_getc(mpBanner);
|
|
code = menu_driver(mpBanner, cmd);
|
|
if (code == E_REQUEST_DENIED) {
|
|
MEVENT event;
|
|
if (menu_getc(mpBanner) == KEY_MOUSE)
|
|
getmouse(&event); /* give up */
|
|
}
|
|
}
|
|
#endif
|
|
|
|
break;
|
|
}
|
|
|
|
if (code == E_OK) {
|
|
this_menu = current_menu();
|
|
if (this_menu != last_menu) {
|
|
move(1, 0);
|
|
clrtobot();
|
|
box(menu_win(this_menu), 0, 0);
|
|
refresh();
|
|
|
|
/* force the current menu to appear */
|
|
menu_display(this_menu);
|
|
|
|
last_menu = this_menu;
|
|
}
|
|
}
|
|
wrefresh(menu_win(last_menu));
|
|
if (code == E_UNKNOWN_COMMAND
|
|
|| code == E_NOT_POSTED) {
|
|
ITEM *item = current_item(last_menu);
|
|
MENU_DATA *td = (MENU_DATA *) item_userptr(item);
|
|
td->func((int) td->mask);
|
|
}
|
|
if (code == E_REQUEST_DENIED)
|
|
beep();
|
|
continue;
|
|
}
|
|
}
|
|
|
|
static void
|
|
destroy_menus(void)
|
|
{
|
|
menu_destroy(mpFile);
|
|
menu_destroy(mpSelect);
|
|
#ifdef TRACE
|
|
menu_destroy(mpTrace);
|
|
#endif
|
|
menu_destroy(mpBanner);
|
|
}
|
|
|
|
#if HAVE_RIPOFFLINE
|
|
static int
|
|
rip_footer(WINDOW *win, int cols)
|
|
{
|
|
wbkgd(win, A_REVERSE);
|
|
werase(win);
|
|
wmove(win, 0, 0);
|
|
wprintw(win, "footer: %d columns", cols);
|
|
wnoutrefresh(win);
|
|
return OK;
|
|
}
|
|
|
|
static int
|
|
rip_header(WINDOW *win, int cols)
|
|
{
|
|
wbkgd(win, A_REVERSE);
|
|
werase(win);
|
|
wmove(win, 0, 0);
|
|
wprintw(win, "header: %d columns", cols);
|
|
wnoutrefresh(win);
|
|
return OK;
|
|
}
|
|
#endif /* HAVE_RIPOFFLINE */
|
|
|
|
static void
|
|
call_files(int code)
|
|
{
|
|
switch (code) {
|
|
case 0:
|
|
destroy_menus();
|
|
endwin();
|
|
printf("DONE!\n");
|
|
ExitProgram(EXIT_SUCCESS);
|
|
}
|
|
}
|
|
|
|
static void
|
|
usage(void)
|
|
{
|
|
static const char *const tbl[] =
|
|
{
|
|
"Usage: demo_menus [options] [menu-file]"
|
|
,""
|
|
,"Options:"
|
|
#if HAVE_RIPOFFLINE
|
|
," -f rip-off footer line (can repeat)"
|
|
," -h rip-off header line (can repeat)"
|
|
#endif
|
|
#ifdef TRACE
|
|
," -t mask specify default trace-level (may toggle with ^T)"
|
|
#endif
|
|
};
|
|
size_t n;
|
|
for (n = 0; n < SIZEOF(tbl); n++)
|
|
fprintf(stderr, "%s\n", tbl[n]);
|
|
ExitProgram(EXIT_FAILURE);
|
|
}
|
|
|
|
int
|
|
main(int argc, char *argv[])
|
|
{
|
|
int c;
|
|
|
|
setlocale(LC_ALL, "");
|
|
|
|
while ((c = getopt(argc, argv, "fht:")) != -1) {
|
|
switch (c) {
|
|
#if HAVE_RIPOFFLINE
|
|
case 'f':
|
|
ripoffline(-1, rip_footer);
|
|
break;
|
|
case 'h':
|
|
ripoffline(1, rip_header);
|
|
break;
|
|
#endif /* HAVE_RIPOFFLINE */
|
|
#ifdef TRACE
|
|
case 't':
|
|
curses_trace((unsigned) strtoul(optarg, 0, 0));
|
|
break;
|
|
#endif
|
|
default:
|
|
usage();
|
|
}
|
|
}
|
|
|
|
initscr();
|
|
noraw();
|
|
cbreak();
|
|
noecho();
|
|
|
|
if (has_colors()) {
|
|
start_color();
|
|
init_pair(1, COLOR_RED, COLOR_BLACK);
|
|
init_pair(2, COLOR_BLUE, COLOR_WHITE);
|
|
}
|
|
status = newwin(3, COLS, LINES - 3, 0);
|
|
build_menus(argc > 1 ? argv[1] : 0);
|
|
perform_menus();
|
|
destroy_menus();
|
|
|
|
endwin();
|
|
ExitProgram(EXIT_SUCCESS);
|
|
}
|
|
#else
|
|
int
|
|
main(void)
|
|
{
|
|
printf("This program requires the curses menu library\n");
|
|
ExitProgram(EXIT_FAILURE);
|
|
}
|
|
#endif
|