#include <curses.priv.h>
#include <term.h>
MODULE_ID("$Id: lib_vid_attr.c,v 1.5 2007/06/30 22:03:02 tom Exp $")
#define doPut(mode) TPUTS_TRACE(#mode); tputs(mode, 1, outc)
#define TurnOn(mask,mode) \
if ((turn_on & mask) && mode) { doPut(mode); }
#define TurnOff(mask,mode) \
if ((turn_off & mask) && mode) { doPut(mode); turn_off &= ~mask; }
#define SetColorsIf(why, old_attr, old_pair) \
if (can_color && (why)) { \
TR(TRACE_ATTRS, ("old pair = %d -- new pair = %d", old_pair, pair)); \
if ((pair != old_pair) \
|| (fix_pair0 && (pair == 0)) \
|| (reverse ^ ((old_attr & A_REVERSE) != 0))) { \
_nc_do_color(old_pair, pair, reverse, outc); \
} \
}
#define set_color(mode, pair) mode &= ALL_BUT_COLOR; mode |= COLOR_PAIR(pair)
NCURSES_EXPORT(int)
vid_puts(attr_t newmode, short pair, void *opts GCC_UNUSED, int (*outc) (int))
{
#if NCURSES_EXT_COLORS
static attr_t previous_attr = A_NORMAL;
static int previous_pair = 0;
attr_t turn_on, turn_off;
bool reverse = FALSE;
bool can_color = (SP == 0 || SP->_coloron);
#if NCURSES_EXT_FUNCS
bool fix_pair0 = (SP != 0 && SP->_coloron && !SP->_default_color);
#else
#define fix_pair0 FALSE
#endif
newmode &= A_ATTRIBUTES;
T((T_CALLED("vid_puts(%s,%d)"), _traceattr(newmode), pair));
if (SP) {
previous_attr = AttrOf(SCREEN_ATTRS(SP));
previous_pair = GetPair(SCREEN_ATTRS(SP));
}
TR(TRACE_ATTRS, ("previous attribute was %s, %d",
_traceattr(previous_attr), previous_pair));
#if !USE_XMC_SUPPORT
if ((SP != 0)
&& (magic_cookie_glitch > 0))
newmode &= ~(SP->_xmc_suppress);
#endif
if ((pair != 0
|| fix_pair0)
&& (no_color_video > 0)) {
unsigned value = no_color_video;
attr_t mask = NCURSES_BITS((value & 63)
| ((value & 192) << 1)
| ((value & 256) >> 2), 8);
if ((mask & A_REVERSE) != 0
&& (newmode & A_REVERSE) != 0) {
reverse = TRUE;
mask &= ~A_REVERSE;
}
newmode &= ~mask;
}
if (newmode == previous_attr
&& pair == previous_pair)
returnCode(OK);
if (reverse) {
newmode &= ~A_REVERSE;
}
turn_off = (~newmode & previous_attr) & ALL_BUT_COLOR;
turn_on = (newmode & ~previous_attr) & ALL_BUT_COLOR;
SetColorsIf(((pair == 0) && !fix_pair0), previous_attr, previous_pair);
if (newmode == A_NORMAL) {
if ((previous_attr & A_ALTCHARSET) && exit_alt_charset_mode) {
doPut(exit_alt_charset_mode);
previous_attr &= ~A_ALTCHARSET;
}
if (previous_attr) {
if (exit_attribute_mode) {
doPut(exit_attribute_mode);
} else {
if (!SP || SP->_use_rmul) {
TurnOff(A_UNDERLINE, exit_underline_mode);
}
if (!SP || SP->_use_rmso) {
TurnOff(A_STANDOUT, exit_standout_mode);
}
}
previous_attr &= ALL_BUT_COLOR;
previous_pair = 0;
}
SetColorsIf((pair != 0) || fix_pair0, previous_attr, previous_pair);
} else if (set_attributes) {
if (turn_on || turn_off) {
TPUTS_TRACE("set_attributes");
tputs(TPARM_9(set_attributes,
(newmode & A_STANDOUT) != 0,
(newmode & A_UNDERLINE) != 0,
(newmode & A_REVERSE) != 0,
(newmode & A_BLINK) != 0,
(newmode & A_DIM) != 0,
(newmode & A_BOLD) != 0,
(newmode & A_INVIS) != 0,
(newmode & A_PROTECT) != 0,
(newmode & A_ALTCHARSET) != 0), 1, outc);
previous_attr &= ALL_BUT_COLOR;
previous_pair = 0;
}
SetColorsIf((pair != 0) || fix_pair0, previous_attr, previous_pair);
} else {
TR(TRACE_ATTRS, ("turning %s off", _traceattr(turn_off)));
TurnOff(A_ALTCHARSET, exit_alt_charset_mode);
if (!SP || SP->_use_rmul) {
TurnOff(A_UNDERLINE, exit_underline_mode);
}
if (!SP || SP->_use_rmso) {
TurnOff(A_STANDOUT, exit_standout_mode);
}
if (turn_off && exit_attribute_mode) {
doPut(exit_attribute_mode);
turn_on |= (newmode & ALL_BUT_COLOR);
previous_attr &= ALL_BUT_COLOR;
previous_pair = 0;
}
SetColorsIf((pair != 0) || fix_pair0, previous_attr, previous_pair);
TR(TRACE_ATTRS, ("turning %s on", _traceattr(turn_on)));
TurnOn(A_ALTCHARSET, enter_alt_charset_mode);
TurnOn(A_BLINK, enter_blink_mode);
TurnOn(A_BOLD, enter_bold_mode);
TurnOn(A_DIM, enter_dim_mode);
TurnOn(A_REVERSE, enter_reverse_mode);
TurnOn(A_STANDOUT, enter_standout_mode);
TurnOn(A_PROTECT, enter_protected_mode);
TurnOn(A_INVIS, enter_secure_mode);
TurnOn(A_UNDERLINE, enter_underline_mode);
#if USE_WIDEC_SUPPORT
TurnOn(A_HORIZONTAL, enter_horizontal_hl_mode);
TurnOn(A_LEFT, enter_left_hl_mode);
TurnOn(A_LOW, enter_low_hl_mode);
TurnOn(A_RIGHT, enter_right_hl_mode);
TurnOn(A_TOP, enter_top_hl_mode);
TurnOn(A_VERTICAL, enter_vertical_hl_mode);
#endif
}
if (reverse)
newmode |= A_REVERSE;
if (SP) {
SetAttr(SCREEN_ATTRS(SP), newmode);
SetPair(SCREEN_ATTRS(SP), pair);
} else {
previous_attr = newmode;
previous_pair = pair;
}
returnCode(OK);
#else
T((T_CALLED("vid_puts(%s,%d)"), _traceattr(newmode), pair));
set_color(newmode, pair);
returnCode(vidputs(newmode, outc));
#endif
}
#undef vid_attr
NCURSES_EXPORT(int)
vid_attr(attr_t newmode, short pair, void *opts)
{
T((T_CALLED("vid_attr(%s,%d)"), _traceattr(newmode), pair));
returnCode(vid_puts(newmode, pair, opts, _nc_outch));
}
NCURSES_EXPORT(attr_t)
term_attrs(void)
{
attr_t attrs;
T((T_CALLED("term_attrs()")));
attrs = termattrs();
if (enter_horizontal_hl_mode)
attrs |= WA_HORIZONTAL;
if (enter_left_hl_mode)
attrs |= WA_LEFT;
if (enter_low_hl_mode)
attrs |= WA_LOW;
if (enter_right_hl_mode)
attrs |= WA_RIGHT;
if (enter_top_hl_mode)
attrs |= WA_TOP;
if (enter_vertical_hl_mode)
attrs |= WA_VERTICAL;
returnAttr(attrs);
}