#include <curses.priv.h>
#include <term.h>
MODULE_ID("$Id: lib_options.c,v 1.1.1.3 2002/02/15 21:55:46 jevans Exp $")
NCURSES_EXPORT(int)
idlok(WINDOW *win, bool flag)
{
T((T_CALLED("idlok(%p,%d)"), win, flag));
if (win) {
_nc_idlok = win->_idlok = (flag && (has_il() || change_scroll_region));
returnCode(OK);
} else
returnCode(ERR);
}
NCURSES_EXPORT(void)
idcok(WINDOW *win, bool flag)
{
T((T_CALLED("idcok(%p,%d)"), win, flag));
if (win)
_nc_idcok = win->_idcok = (flag && has_ic());
returnVoid;
}
NCURSES_EXPORT(int)
halfdelay(int t)
{
T((T_CALLED("halfdelay(%d)"), t));
if (t < 1 || t > 255)
returnCode(ERR);
cbreak();
SP->_cbreak = t + 1;
returnCode(OK);
}
NCURSES_EXPORT(int)
nodelay(WINDOW *win, bool flag)
{
T((T_CALLED("nodelay(%p,%d)"), win, flag));
if (win) {
if (flag == TRUE)
win->_delay = 0;
else
win->_delay = -1;
returnCode(OK);
} else
returnCode(ERR);
}
NCURSES_EXPORT(int)
notimeout(WINDOW *win, bool f)
{
T((T_CALLED("notimout(%p,%d)"), win, f));
if (win) {
win->_notimeout = f;
returnCode(OK);
} else
returnCode(ERR);
}
NCURSES_EXPORT(void)
wtimeout(WINDOW *win, int delay)
{
T((T_CALLED("wtimeout(%p,%d)"), win, delay));
if (win) {
win->_delay = delay;
}
returnVoid;
}
NCURSES_EXPORT(int)
keypad(WINDOW *win, bool flag)
{
T((T_CALLED("keypad(%p,%d)"), win, flag));
if (win) {
win->_use_keypad = flag;
returnCode(_nc_keypad(flag));
} else
returnCode(ERR);
}
NCURSES_EXPORT(int)
meta(WINDOW *win GCC_UNUSED, bool flag)
{
T((T_CALLED("meta(%p,%d)"), win, flag));
SP->_use_meta = flag;
if (flag && meta_on) {
TPUTS_TRACE("meta_on");
putp(meta_on);
} else if (!flag && meta_off) {
TPUTS_TRACE("meta_off");
putp(meta_off);
}
returnCode(OK);
}
NCURSES_EXPORT(int)
curs_set(int vis)
{
int cursor = SP->_cursor;
T((T_CALLED("curs_set(%d)"), vis));
if (vis < 0 || vis > 2)
returnCode(ERR);
if (vis == cursor)
returnCode(cursor);
switch (vis) {
case 2:
if (cursor_visible) {
TPUTS_TRACE("cursor_visible");
putp(cursor_visible);
} else
returnCode(ERR);
break;
case 1:
if (cursor_normal) {
TPUTS_TRACE("cursor_normal");
putp(cursor_normal);
} else
returnCode(ERR);
break;
case 0:
if (cursor_invisible) {
TPUTS_TRACE("cursor_invisible");
putp(cursor_invisible);
} else
returnCode(ERR);
break;
}
SP->_cursor = vis;
_nc_flush();
returnCode(cursor == -1 ? 1 : cursor);
}
NCURSES_EXPORT(int)
typeahead(int fd)
{
T((T_CALLED("typeahead(%d)"), fd));
SP->_checkfd = fd;
returnCode(OK);
}
#if NCURSES_EXT_FUNCS
static int
has_key_internal(int keycode, struct tries *tp)
{
if (tp == 0)
return (FALSE);
else if (tp->value == keycode)
return (TRUE);
else
return (has_key_internal(keycode, tp->child)
|| has_key_internal(keycode, tp->sibling));
}
NCURSES_EXPORT(int)
has_key(int keycode)
{
T((T_CALLED("has_key(%d)"), keycode));
returnCode(has_key_internal(keycode, SP->_keytry));
}
#endif
NCURSES_EXPORT(int)
_nc_keypad(bool flag)
{
if (flag && keypad_xmit) {
TPUTS_TRACE("keypad_xmit");
putp(keypad_xmit);
_nc_flush();
} else if (!flag && keypad_local) {
TPUTS_TRACE("keypad_local");
putp(keypad_local);
_nc_flush();
}
if (flag && !SP->_tried) {
_nc_init_keytry();
SP->_tried = TRUE;
}
SP->_keypad_on = flag;
return (OK);
}