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 int
init_pair(short pair,short f,short b)48 init_pair(short pair, short f, short b)
49 {
50 _Color_pair *ptp; /* pairs table pointer */
51
52 /* check the validity of arguments */
53
54 if (pair < 1 || pair >= COLOR_PAIRS ||
55 f < 0 || b < 0 || f >= COLORS || b >= COLORS)
56 return (ERR);
57
58 ptp = cur_term->_pairs_tbl + pair;
59
60 /* update the pairs table (if no changes just return) */
61
62 if (ptp->foreground == f && ptp->background == b)
63 return (OK);
64
65 ptp->foreground = f;
66 ptp->background = b;
67
68 /* if we are on terminal that cannot define color pairs (Tek) */
69 /* and "pair" was previously defined, go through the curscr */
70 /* and erase information from the color field at all positions */
71 /* that use that color pair (this way when refresh will be */
72 /* called next time, it will be forced to change the color at */
73 /* these positions */
74
75 if (!initialize_pair) {
76 if (ptp->init) {
77 short i, j;
78 short lin = curscr->_maxy;
79 chtype **y = curscr->_y;
80 bool change;
81 short top = -1;
82 short bottom = -1;
83 chtype new_pair = COLOR_PAIR(pair);
84
85 /* must use lin=curscr->_maxy rather then LINES, because */
86 /* LINES could have been decremented by ripoffline() */
87
88 for (i = 0; i < lin; i++) {
89 change = FALSE;
90 for (j = 0; j < COLS; j++) {
91 if ((y[i][j] & A_COLOR) == new_pair) {
92 y[i][j] &= ~A_COLOR;
93 change = TRUE;
94 }
95 if (change) {
96 (void) wtouchln(_virtscr,
97 i, 1, -1);
98 if (top == -1)
99 top = i;
100 bottom = i;
101 curscr->_attrs &= ~A_COLOR;
102 }
103 }
104 if (top != -1) {
105 _VIRTTOP = top;
106 _VIRTBOT = bottom;
107 }
108 }
109
110 }
111 }
112
113 /* on terminals that can initialize color pairs (HP) */
114 /* send an escape to initialize the new pair */
115
116 else
117 _init_HP_pair(pair, f, b);
118
119 /* if that pair has not been previously initialized, it could not */
120 /* have been used on the screen, so we don't have to do refresh */
121
122 if (ptp->init)
123 (void) wrefresh(_virtscr);
124 else
125 ptp->init = TRUE;
126
127 return (OK);
128 }
129
130
131
132 void
_init_HP_pair(short pair,short f,short b)133 _init_HP_pair(short pair, short f, short b)
134 {
135 _Color *ctp = cur_term->_color_tbl; /* color table pointer */
136
137 if (initialize_pair)
138 (void) tputs(tparm_p7(initialize_pair, (long) pair,
139 (long) ctp[f].r, (long) ctp[f].g, (long) ctp[f].b,
140 (long) ctp[b].r, (long) ctp[b].g, (long) ctp[b].b),
141 1, _outch);
142 }
143