xref: /titanic_41/usr/src/lib/libcurses/screen/wbkgd.c (revision 7c478bd95313f5f23a4c958a745db2134aa03244)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  */
22 /*
23  * Copyright 1997 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 /*	Copyright (c) 1988 AT&T	*/
28 /*	  All Rights Reserved	*/
29 
30 /*
31  * University Copyright- Copyright (c) 1982, 1986, 1988
32  * The Regents of the University of California
33  * All Rights Reserved
34  *
35  * University Acknowledgment- Portions of this document are derived from
36  * software developed by the University of California, Berkeley, and its
37  * contributors.
38  */
39 
40 #pragma ident	"%Z%%M%	%I%	%E% SMI"
41 
42 /*LINTLIBRARY*/
43 
44 #include	<sys/types.h>
45 #include	"curses_inc.h"
46 
47 /* Change the background of a window.  nbkgd :	new background. */
48 
49 int
wbkgd(WINDOW * win,chtype nbkgd)50 wbkgd(WINDOW *win, chtype nbkgd)
51 {
52 	short	maxx;
53 	int	x, y;
54 	chtype	*wcp, obkgda, obkgdc, nbkgda,
55 		nbkgdc, acolor, c;
56 	short	*begch, *endch;
57 
58 	/* if 'nbkgd' contains color information, but this is not a color   */
59 	/* terminal, erase that information.				*/
60 
61 	if ((nbkgd & A_COLOR) && (cur_term->_pairs_tbl == NULL))
62 		nbkgd &= ~A_COLOR;
63 
64 	if (nbkgd == win->_bkgd)
65 		return (OK);
66 
67 	obkgdc = _CHAR(win->_bkgd);
68 	obkgda = _ATTR(win->_bkgd);
69 
70 	nbkgdc = _CHAR(nbkgd);
71 	nbkgda = _ATTR(nbkgd);
72 
73 	/* switch byte order if necessary */
74 	if (ISCBIT(nbkgdc))
75 		nbkgdc = _CHAR((RBYTE(nbkgdc) << 8) | (LBYTE(nbkgdc)|MBIT)) |
76 		    CBIT;
77 	c = RBYTE(nbkgdc);
78 	if ((nbkgdc < ' ' || nbkgdc == _CTRL('?')) ||
79 	    _curs_scrwidth[TYPE(c)] > 1)
80 		nbkgdc = obkgdc;
81 	nbkgd = (nbkgdc & ~CBIT) | nbkgda;
82 
83 	win->_bkgd = nbkgd;
84 
85 	/* delete the old background from the attribute field and replace    */
86 	/* it with the new background.  Note: if the same attribute was	*/
87 	/* first set by wbkgd() and then by wattron(), or vice versa, it */
88 	/* will be deleted, so the effect of wattron() will be lost.	 */
89 	/* This applies to both video and color attributes.		 */
90 
91 	if ((acolor = (win->_attrs & A_COLOR)) != 0) {
92 		if (acolor == (obkgda & A_COLOR)) {
93 			win->_attrs = _ATTR((win->_attrs & ~obkgda) | nbkgda);
94 		} else {
95 			win->_attrs = _ATTR((win->_attrs &
96 			    (~obkgda | A_COLOR)) | (nbkgda & ~A_COLOR));
97 		}
98 	} else
99 		win->_attrs = _ATTR((win->_attrs & ~obkgda) | nbkgda);
100 
101 	maxx = win->_maxx - 1;
102 	begch = win->_firstch;
103 	endch = win->_lastch;
104 	for (y = win->_maxy-1; y >= 0; --y, ++begch, ++endch) {
105 		for (x = maxx, wcp = win->_y[y]; x-- >= 0; ++wcp) {
106 			if ((c = _CHAR(*wcp)) == obkgdc)
107 				c = nbkgdc;
108 			if ((acolor = (*wcp & A_COLOR)) != 0) {
109 				if (acolor == (obkgda & A_COLOR))
110 					*wcp = c | _ATTR((*wcp & ~obkgda) |
111 					    nbkgda);
112 				else
113 					*wcp = c | _ATTR((*wcp & (~obkgda |
114 					    A_COLOR)) | (nbkgda & ~A_COLOR));
115 			} else
116 				*wcp = c | _ATTR((*wcp & ~obkgda) | nbkgda);
117 		}
118 		*begch = 0;
119 		*endch = maxx;
120 	}
121 
122 	win->_flags |= _WINCHANGED;
123 	if (win->_sync)
124 		wsyncup(win);
125 
126 	return (win->_immed ? wrefresh(win) : OK);
127 }
128