334 lines
6.9 KiB
C
334 lines
6.9 KiB
C
/* $NetBSD: background.c,v 1.33 2022/10/19 06:09:27 blymn Exp $ */
|
|
|
|
/*-
|
|
* Copyright (c) 2000 The NetBSD Foundation, Inc.
|
|
* All rights reserved.
|
|
*
|
|
* This code is derived from software contributed to The NetBSD Foundation
|
|
* by Julian Coleman.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
|
|
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
|
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
|
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
|
|
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <sys/cdefs.h>
|
|
#ifndef lint
|
|
__RCSID("$NetBSD: background.c,v 1.33 2022/10/19 06:09:27 blymn Exp $");
|
|
#endif /* not lint */
|
|
|
|
#include <stdlib.h>
|
|
#include "curses.h"
|
|
#include "curses_private.h"
|
|
|
|
/*
|
|
* bkgdset
|
|
* Set new background attributes on stdscr.
|
|
*/
|
|
void
|
|
bkgdset(chtype ch)
|
|
{
|
|
wbkgdset(stdscr, ch);
|
|
}
|
|
|
|
/*
|
|
* bkgd --
|
|
* Set new background attributes on stdscr and apply them to its
|
|
* contents.
|
|
*/
|
|
int
|
|
bkgd(chtype ch)
|
|
{
|
|
return(wbkgd(stdscr, ch));
|
|
}
|
|
|
|
/*
|
|
* wbkgdset
|
|
* Set new background attributes on the specified window.
|
|
*/
|
|
void
|
|
wbkgdset(WINDOW *win, chtype ch)
|
|
{
|
|
__CTRACE(__CTRACE_ATTR, "wbkgdset: (%p), '%s', %08x\n",
|
|
win, unctrl(ch & __CHARTEXT), ch & __ATTRIBUTES);
|
|
|
|
/* Background character. */
|
|
if (ch & __CHARTEXT)
|
|
win->bch = (wchar_t) ch & __CHARTEXT;
|
|
|
|
/* Background attributes (check colour). */
|
|
if (__using_color && !(ch & __COLOR))
|
|
ch |= __default_color;
|
|
win->battr = (attr_t) ch & __ATTRIBUTES;
|
|
}
|
|
|
|
/*
|
|
* wbkgd --
|
|
* Set new background attributes on the specified window and
|
|
* apply them to its contents.
|
|
*/
|
|
int
|
|
wbkgd(WINDOW *win, chtype ch)
|
|
{
|
|
int y, x;
|
|
|
|
__CTRACE(__CTRACE_ATTR, "wbkgd: (%p), '%s', %08x\n",
|
|
win, unctrl(ch & __CHARTEXT), ch & __ATTRIBUTES);
|
|
wbkgdset(win, ch);
|
|
|
|
for (y = 0; y < win->maxy; y++) {
|
|
for (x = 0; x < win->maxx; x++) {
|
|
__LDATA *cp = &win->alines[y]->line[x];
|
|
|
|
/* Update/switch background characters */
|
|
if (cp->cflags & CA_BACKGROUND)
|
|
cp->ch = win->bch;
|
|
|
|
/* Update/merge attributes */
|
|
cp->attr = win->battr | (cp->attr & __ALTCHARSET);
|
|
#ifdef HAVE_WCHAR
|
|
cp->wcols = 1;
|
|
#endif
|
|
}
|
|
}
|
|
__touchwin(win, 1);
|
|
return OK;
|
|
}
|
|
|
|
/*
|
|
* getbkgd --
|
|
* Get current background attributes.
|
|
*/
|
|
chtype
|
|
getbkgd(WINDOW *win)
|
|
{
|
|
attr_t battr;
|
|
|
|
/* Background attributes (check colour). */
|
|
battr = win->battr & A_ATTRIBUTES;
|
|
if (__using_color && ((battr & __COLOR) == __default_color))
|
|
battr &= ~__COLOR;
|
|
|
|
return ((chtype) ((win->bch & A_CHARTEXT) | battr));
|
|
}
|
|
|
|
|
|
#ifdef HAVE_WCHAR
|
|
|
|
void
|
|
bkgrndset(const cchar_t *wch)
|
|
{
|
|
wbkgrndset(stdscr, wch);
|
|
}
|
|
|
|
|
|
int
|
|
bkgrnd(const cchar_t *wch)
|
|
{
|
|
return wbkgrnd(stdscr, wch);
|
|
}
|
|
|
|
|
|
int
|
|
getbkgrnd(cchar_t *wch)
|
|
{
|
|
return wgetbkgrnd(stdscr, wch);
|
|
}
|
|
|
|
|
|
void
|
|
wbkgrndset(WINDOW *win, const cchar_t *wch)
|
|
{
|
|
attr_t battr;
|
|
nschar_t *np, *tnp;
|
|
int i, wy, wx;
|
|
__LDATA obkgrnd, nbkgrnd;
|
|
__LINE *wlp;
|
|
|
|
__CTRACE(__CTRACE_ATTR, "wbkgrndset: (%p), '%s', %x\n",
|
|
win, (const char *)wunctrl(wch), wch->attributes);
|
|
|
|
/* ignore multi-column characters */
|
|
if (!wch->elements || wcwidth(wch->vals[0]) > 1)
|
|
return;
|
|
|
|
/* get a copy of the old background, we will need it. */
|
|
obkgrnd.ch = win->bch;
|
|
obkgrnd.attr = win->battr;
|
|
obkgrnd.cflags = CA_BACKGROUND;
|
|
obkgrnd.wcols = win->wcols;
|
|
obkgrnd.nsp = NULL;
|
|
_cursesi_copy_nsp(win->bnsp, &obkgrnd);
|
|
|
|
/* Background character. */
|
|
tnp = np = win->bnsp;
|
|
if (wcwidth( wch->vals[0]))
|
|
win->bch = wch->vals[0];
|
|
else {
|
|
if (!np) {
|
|
np = malloc(sizeof(nschar_t));
|
|
if (!np)
|
|
return;
|
|
np->next = NULL;
|
|
win->bnsp = np;
|
|
}
|
|
np->ch = wch->vals[0];
|
|
tnp = np;
|
|
np = np->next;
|
|
}
|
|
/* add non-spacing characters */
|
|
if (wch->elements > 1) {
|
|
for (i = 1; i < wch->elements; i++) {
|
|
if ( !np ) {
|
|
np = malloc(sizeof(nschar_t));
|
|
if (!np)
|
|
return;
|
|
np->next = NULL;
|
|
if (tnp)
|
|
tnp->next = np;
|
|
else
|
|
win->bnsp = np;
|
|
}
|
|
np->ch = wch->vals[i];
|
|
tnp = np;
|
|
np = np->next;
|
|
}
|
|
}
|
|
/* clear the old non-spacing characters */
|
|
__cursesi_free_nsp(np);
|
|
|
|
/* Background attributes (check colour). */
|
|
battr = wch->attributes & WA_ATTRIBUTES;
|
|
if (__using_color && !( battr & __COLOR))
|
|
battr |= __default_color;
|
|
win->battr = battr;
|
|
win->wcols = 1;
|
|
|
|
nbkgrnd.ch = win->bch;
|
|
nbkgrnd.attr = win->battr;
|
|
nbkgrnd.cflags = CA_BACKGROUND;
|
|
nbkgrnd.wcols = win->wcols;
|
|
nbkgrnd.nsp = NULL;
|
|
_cursesi_copy_nsp(win->bnsp, &nbkgrnd);
|
|
|
|
/* if the background is already this char then skip updating */
|
|
if (_cursesi_celleq(&obkgrnd, &nbkgrnd))
|
|
return;
|
|
|
|
/*
|
|
* Now do the dirty work of updating all the locations
|
|
* that have the old background character with the new.
|
|
*/
|
|
|
|
for (wy = 0; wy < win->maxy; wy++) {
|
|
wlp = win->alines[wy];
|
|
for (wx = 0; wx < win->maxx; wx++) {
|
|
if (wlp->line[wx].cflags & CA_BACKGROUND) {
|
|
_cursesi_copy_wchar(&nbkgrnd, &wlp->line[wx]);
|
|
}
|
|
}
|
|
}
|
|
__touchwin(win, 0);
|
|
|
|
}
|
|
|
|
|
|
int
|
|
wbkgrnd(WINDOW *win, const cchar_t *wch)
|
|
{
|
|
__CTRACE(__CTRACE_ATTR, "wbkgrnd: (%p), '%s', %x\n",
|
|
win, (const char *)wunctrl(wch), wch->attributes);
|
|
|
|
/* ignore multi-column characters */
|
|
if (!wch->elements || wcwidth( wch->vals[ 0 ]) > 1)
|
|
return ERR;
|
|
|
|
wbkgrndset(win, wch);
|
|
__touchwin(win, 1);
|
|
return OK;
|
|
}
|
|
|
|
|
|
int
|
|
wgetbkgrnd(WINDOW *win, cchar_t *wch)
|
|
{
|
|
nschar_t *np;
|
|
|
|
/* Background attributes (check colour). */
|
|
wch->attributes = win->battr & WA_ATTRIBUTES;
|
|
if (__using_color && ((wch->attributes & __COLOR) == __default_color))
|
|
wch->attributes &= ~__COLOR;
|
|
wch->vals[0] = win->bch;
|
|
wch->elements = 1;
|
|
np = win->bnsp;
|
|
if (np) {
|
|
while (np && wch->elements < CURSES_CCHAR_MAX) {
|
|
wch->vals[wch->elements++] = np->ch;
|
|
np = np->next;
|
|
}
|
|
}
|
|
|
|
return OK;
|
|
}
|
|
|
|
#else /* !HAVE_WCHAR */
|
|
|
|
void
|
|
bkgrndset(const cchar_t *wch)
|
|
{
|
|
return;
|
|
}
|
|
|
|
int
|
|
bkgrnd(const cchar_t *wch)
|
|
{
|
|
return ERR;
|
|
}
|
|
|
|
|
|
int
|
|
getbkgrnd(cchar_t *wch)
|
|
{
|
|
return ERR;
|
|
}
|
|
|
|
|
|
void
|
|
wbkgrndset(WINDOW *win, const cchar_t *wch)
|
|
{
|
|
return;
|
|
}
|
|
|
|
|
|
int
|
|
wbkgrnd(WINDOW *win, const cchar_t *wch)
|
|
{
|
|
return ERR;
|
|
}
|
|
|
|
|
|
int
|
|
wgetbkgrnd(WINDOW *win, cchar_t *wch)
|
|
{
|
|
return ERR;
|
|
}
|
|
|
|
#endif /* !HAVE_WCHAR */
|