attributes.c revision 1.13.18.2 1 /* $NetBSD: attributes.c,v 1.13.18.2 2007/01/21 17:43:35 jdc Exp $ */
2
3 /*-
4 * Copyright (c) 1999 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Julian Coleman.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 #include <sys/cdefs.h>
40 #ifndef lint
41 __RCSID("$NetBSD: attributes.c,v 1.13.18.2 2007/01/21 17:43:35 jdc Exp $");
42 #endif /* not lint */
43
44 #include "curses.h"
45 #include "curses_private.h"
46
47 void __wcolor_set(WINDOW *, attr_t);
48
49 #ifndef _CURSES_USE_MACROS
50 /*
51 * attr_get --
52 * Get attributes and color pair from stdscr
53 */
54 /* ARGSUSED */
55 int
56 attr_get(attr_t *attr, short *pair, void *opt)
57 {
58 return wattr_get(stdscr, attr, pair, opt);
59 }
60
61 /*
62 * attr_on --
63 * Test and set attributes on stdscr
64 */
65 /* ARGSUSED */
66 int
67 attr_on(attr_t attr, void *opt)
68 {
69 return wattr_on(stdscr, attr, opt);
70 }
71
72 /*
73 * attr_off --
74 * Test and unset attributes on stdscr
75 */
76 /* ARGSUSED */
77 int
78 attr_off(attr_t attr, void *opt)
79 {
80 return wattr_off(stdscr, attr, opt);
81 }
82
83 /*
84 * attr_set --
85 * Set attributes and color pair on stdscr
86 */
87 /* ARGSUSED */
88 int
89 attr_set(attr_t attr, short pair, void *opt)
90 {
91 return wattr_set(stdscr, attr, pair, opt);
92 }
93
94 /*
95 * color_set --
96 * Set color pair on stdscr
97 */
98 /* ARGSUSED */
99 int
100 color_set(short pair, void *opt)
101 {
102 return wcolor_set(stdscr, pair, opt);
103 }
104
105 /*
106 * attron --
107 * Test and set attributes on stdscr
108 */
109 int
110 attron(int attr)
111 {
112 return wattr_on(stdscr, (attr_t) attr, NULL);
113 }
114
115 /*
116 * attroff --
117 * Test and unset attributes on stdscr.
118 */
119 int
120 attroff(int attr)
121 {
122 return wattr_off(stdscr, (attr_t) attr, NULL);
123 }
124
125 /*
126 * attrset --
127 * Set specific attribute modes.
128 * Unset others. On stdscr.
129 */
130 int
131 attrset(int attr)
132 {
133 return wattrset(stdscr, attr);
134 }
135 #endif /* _CURSES_USE_MACROS */
136
137 /*
138 * wattr_get --
139 * Get attributes and colour pair from window
140 * Note that attributes also includes colour.
141 */
142 /* ARGSUSED */
143 int
144 wattr_get(WINDOW *win, attr_t *attr, short *pair, void *opt)
145 {
146 #ifdef DEBUG
147 __CTRACE(__CTRACE_ATTR, "wattr_get: win %p\n", win);
148 #endif
149 if (attr != NULL)
150 *attr = win->wattr;
151 if (pair != NULL)
152 *pair = PAIR_NUMBER(win->wattr);
153 return OK;
154 }
155
156 /*
157 * wattr_on --
158 * Test and set attributes on stdscr
159 *
160 * Modes are blinking, bold (extra bright), dim (half-bright),
161 * blanking (invisible), protected and reverse video
162 */
163 /* ARGSUSED */
164 int
165 wattr_on(WINDOW *win, attr_t attr, void *opt)
166 {
167 #ifdef DEBUG
168 __CTRACE(__CTRACE_ATTR, "wattr_on: win %p, attr %08x\n", win, attr);
169 #endif
170 /* If can enter modes, set the relevent attribute bits. */
171 if (__tc_me != NULL) {
172 if (attr & __BLINK && __tc_mb != NULL)
173 win->wattr |= __BLINK;
174 if (attr & __BOLD && __tc_md != NULL)
175 win->wattr |= __BOLD;
176 if (attr & __DIM && __tc_mh != NULL)
177 win->wattr |= __DIM;
178 if (attr & __BLANK && __tc_mk != NULL)
179 win->wattr |= __BLANK;
180 if (attr & __PROTECT && __tc_mp != NULL)
181 win->wattr |= __PROTECT;
182 if (attr & __REVERSE && __tc_mr != NULL)
183 win->wattr |= __REVERSE;
184 #ifdef HAVE_WCHAR
185 if (attr & WA_LOW && __tc_Xo != NULL)
186 win->wattr |= WA_LOW;
187 if (attr & WA_TOP && __tc_Xt != NULL)
188 win->wattr |= WA_TOP;
189 if (attr & WA_LEFT && __tc_Xl != NULL)
190 win->wattr |= WA_LEFT;
191 if (attr & WA_RIGHT && __tc_Xr != NULL)
192 win->wattr |= WA_RIGHT;
193 if (attr & WA_HORIZONTAL && __tc_Xh != NULL)
194 win->wattr |= WA_HORIZONTAL;
195 if (attr & WA_VERTICAL && __tc_Xv != NULL)
196 win->wattr |= WA_VERTICAL;
197 #endif /* HAVE_WCHAR */
198 }
199 if (attr & __STANDOUT)
200 wstandout(win);
201 if (attr & __UNDERSCORE)
202 wunderscore(win);
203 if ((attr_t) attr & __COLOR)
204 __wcolor_set(win, (attr_t) attr);
205 return OK;
206 }
207
208 /*
209 * wattr_off --
210 * Test and unset attributes on stdscr
211 *
212 * Note that the 'me' sequence unsets all attributes. We handle
213 * which attributes should really be set in refresh.c:makech().
214 */
215 /* ARGSUSED */
216 int
217 wattr_off(WINDOW *win, attr_t attr, void *opt)
218 {
219 #ifdef DEBUG
220 __CTRACE(__CTRACE_ATTR, "wattr_off: win %p, attr %08x\n", win, attr);
221 #endif
222 /* If can do exit modes, unset the relevent attribute bits. */
223 if (__tc_me != NULL) {
224 if (attr & __BLINK)
225 win->wattr &= ~__BLINK;
226 if (attr & __BOLD)
227 win->wattr &= ~__BOLD;
228 if (attr & __DIM)
229 win->wattr &= ~__DIM;
230 if (attr & __BLANK)
231 win->wattr &= ~__BLANK;
232 if (attr & __PROTECT)
233 win->wattr &= ~__PROTECT;
234 if (attr & __REVERSE)
235 win->wattr &= ~__REVERSE;
236 #ifdef HAVE_WCHAR
237 if (attr & WA_LOW)
238 win->wattr &= ~WA_LOW;
239 if (attr & WA_TOP)
240 win->wattr &= ~WA_TOP;
241 if (attr & WA_LEFT)
242 win->wattr &= ~WA_LEFT;
243 if (attr & WA_RIGHT)
244 win->wattr &= ~WA_RIGHT;
245 if (attr & WA_HORIZONTAL)
246 win->wattr &= ~WA_HORIZONTAL;
247 if (attr & WA_VERTICAL)
248 win->wattr &= ~WA_VERTICAL;
249 #endif /* HAVE_WCHAR */
250 }
251 if (attr & __STANDOUT)
252 wstandend(win);
253 if (attr & __UNDERSCORE)
254 wunderend(win);
255 if ((attr_t) attr & __COLOR) {
256 if (__tc_Co != 0)
257 win->wattr &= ~__COLOR;
258 }
259 return OK;
260 }
261
262 /*
263 * wattr_set --
264 * Set attributes and color pair on stdscr
265 */
266 /* ARGSUSED */
267 int
268 wattr_set(WINDOW *win, attr_t attr, short pair, void *opt)
269 {
270 #ifdef DEBUG
271 __CTRACE(__CTRACE_ATTR, "wattr_set: win %p, attr %08x, pair %d\n",
272 win, attr, pair);
273 #endif
274 wattr_on(win, attr, NULL);
275 wattr_off(win, (~attr & ~__COLOR) | ((attr & __COLOR) ? 0 : __COLOR),
276 NULL);
277 /*
278 * This overwrites any colour setting from the attributes
279 * and is compatible with ncurses.
280 */
281 __wcolor_set(win, (attr_t) COLOR_PAIR(pair));
282 return OK;
283 }
284
285 /*
286 * wattron --
287 * Test and set attributes.
288 */
289
290 int
291 wattron(WINDOW *win, int attr)
292 {
293 #ifdef DEBUG
294 __CTRACE(__CTRACE_ATTR, "wattron: win %p, attr %08x\n", win, attr);
295 #endif
296 return wattr_on(win, (attr_t) attr, NULL);
297 }
298
299 /*
300 * wattroff --
301 * Test and unset attributes.
302 */
303 int
304 wattroff(WINDOW *win, int attr)
305 {
306 #ifdef DEBUG
307 __CTRACE(__CTRACE_ATTR, "wattroff: win %p, attr %08x\n", win, attr);
308 #endif
309 return wattr_off(win, (attr_t) attr, NULL);
310 }
311
312 /*
313 * wattrset --
314 * Set specific attribute modes.
315 * Unset others.
316 */
317 int
318 wattrset(WINDOW *win, int attr)
319 {
320 #ifdef DEBUG
321 __CTRACE(__CTRACE_ATTR, "wattrset: win %p, attr %08x\n", win, attr);
322 #endif
323 wattr_on(win, (attr_t) attr, NULL);
324 wattr_off(win,
325 (attr_t) (~attr & ~__COLOR) | ((attr & __COLOR) ? 0 : __COLOR),
326 NULL);
327 return OK;
328 }
329
330 /*
331 * wcolor_set --
332 * Set color pair on window
333 */
334 /* ARGSUSED */
335 int
336 wcolor_set(WINDOW *win, short pair, void *opt)
337 {
338 #ifdef DEBUG
339 __CTRACE(__CTRACE_COLOR, "wolor_set: win %p, pair %d\n", win, pair);
340 #endif
341 __wcolor_set(win, (attr_t) COLOR_PAIR(pair));
342 return OK;
343 }
344
345 /*
346 * getattrs --
347 * Get window attributes.
348 */
349 chtype
350 getattrs(WINDOW *win)
351 {
352 #ifdef DEBUG
353 __CTRACE(__CTRACE_ATTR, "getattrs: win %p\n", win);
354 #endif
355 return((chtype) win->wattr);
356 }
357
358 /*
359 * __wcolor_set --
360 * Set color attribute on window
361 */
362 void
363 __wcolor_set(WINDOW *win, attr_t attr)
364 {
365 /* If another color pair is set, turn that off first. */
366 win->wattr &= ~__COLOR;
367 /* If can do color video, set the color pair bits. */
368 if (__tc_Co != 0 && attr & __COLOR)
369 win->wattr |= attr & __COLOR;
370 }
371