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 2005 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 <stdlib.h>
46 #include "curses_inc.h"
47
48 #ifdef PC6300PLUS
49 #include <fcntl.h>
50 #include <sys/console.h>
51 #endif
52
53 int
start_color(void)54 start_color(void)
55 {
56 short i, j;
57 _Color *color_tbl;
58
59 #ifdef PC6300PLUS
60 struct console con;
61 #endif
62
63 /* if not a color terminal, return error */
64
65 if ((COLOR_PAIRS = max_pairs) == -1)
66 return (ERR);
67
68 /* we have only 6 bits to store color-pair info */
69
70 if (COLOR_PAIRS > 64)
71 COLOR_PAIRS = 64;
72
73 #ifdef PC6300PLUS
74 ioctl(cur_term->Filedes, CONIOGETDATA, &con);
75 if (!con.color)
76 return (ERR);
77 #endif
78
79 /* allocate pairs_tbl */
80
81 if ((cur_term->_pairs_tbl =
82 (_Color_pair *) malloc((COLOR_PAIRS+1) *
83 sizeof (_Color_pair))) == NULL)
84 goto err2;
85
86 COLORS = max_colors;
87
88 /* the following is not required because we assume that color 0 is */
89 /* always a default background. if this will change, we may want */
90 /* to store the default colors in entry 0 of pairs_tbl. */
91 /*
92 * cur_term->_pairs_tbl[0].foreground = 0;
93 * cur_term->_pairs_tbl[0].background = COLORS;
94 */
95
96 /* if terminal can change the definition of the color */
97 /* allocate color_tbl */
98
99 if (can_change)
100 if ((color_tbl = (cur_term->_color_tbl =
101 (_Color *) malloc(COLORS * sizeof (_Color)))) == NULL)
102 goto err1;
103
104 /* allocate color mark map for cookie terminals */
105
106 if (ceol_standout_glitch || (magic_cookie_glitch >= 0)) {
107 int i, nc;
108 char **marks;
109
110 if ((marks = (char **)calloc((unsigned)LINES,
111 sizeof (char *))) == NULL)
112 goto err;
113 SP->_color_mks = marks;
114 nc = (COLS / BITSPERBYTE) + (COLS % BITSPERBYTE ? 1 : 0);
115 if ((*marks = (char *)calloc((unsigned)nc * LINES,
116 sizeof (char))) == NULL) {
117 free(marks);
118 err: free(color_tbl);
119 cur_term->_color_tbl = NULL;
120 err1: free(cur_term->_pairs_tbl);
121 cur_term->_pairs_tbl = NULL;
122 err2: return (ERR);
123 }
124
125 for (i = LINES - 1; i-- > 0; ++marks)
126 *(marks + 1) = *marks + nc;
127 }
128
129 if (can_change) {
130 /* initialize color_tbl with the following colors: black, blue, */
131 /* green, cyan, red, magenta, yellow, black. if table has more */
132 /* than 8 entries, use the same 8 colors for the following 8 */
133 /* positions, and then again, and again .... If table has less */
134 /* then 8 entries, use as many colors as will fit in. */
135
136 for (i = 0; i < COLORS; i++) {
137 j = i%8;
138
139 if (j%2)
140 color_tbl[i].b = 1000;
141 else
142 color_tbl[i].b = 0;
143
144 if ((j%4) > 1)
145 color_tbl[i].g = 1000;
146 else
147 color_tbl[i].g = 0;
148
149 if (j > 3)
150 color_tbl[i].r = 1000;
151 else
152 color_tbl[i].r = 0;
153 }
154
155 if (orig_colors)
156 (void) tputs(orig_colors, 1, _outch);
157 }
158
159 if (orig_pair)
160 (void) tputs(tparm_p0(orig_pair), 1, _outch);
161
162 /* for Tek terminals set the background color to zero */
163
164 if (set_background) {
165 (void) tputs(tparm_p1(set_background, 0), 1, _outch);
166 cur_term->_cur_pair.background = 0;
167 cur_term->_cur_pair.foreground = -1;
168 }
169 return (OK);
170 }
171