1 /* $NetBSD: attributes.c,v 1.15 2007/05/28 15:01:54 blymn 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.15 2007/05/28 15:01:54 blymn 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 #ifdef HAVE_WCHAR 152 *attr &= WA_ATTRIBUTES; 153 #endif 154 } 155 156 if (pair != NULL) 157 *pair = PAIR_NUMBER(win->wattr); 158 return OK; 159 } 160 161 /* 162 * wattr_on -- 163 * Test and set attributes on stdscr 164 * 165 * Modes are blinking, bold (extra bright), dim (half-bright), 166 * blanking (invisible), protected and reverse video 167 */ 168 /* ARGSUSED */ 169 int 170 wattr_on(WINDOW *win, attr_t attr, void *opt) 171 { 172 #ifdef DEBUG 173 __CTRACE(__CTRACE_ATTR, "wattr_on: win %p, attr %08x\n", win, attr); 174 #endif 175 /* If can enter modes, set the relevent attribute bits. */ 176 if (__tc_me != NULL) { 177 if (attr & __BLINK && __tc_mb != NULL) 178 win->wattr |= __BLINK; 179 if (attr & __BOLD && __tc_md != NULL) 180 win->wattr |= __BOLD; 181 if (attr & __DIM && __tc_mh != NULL) 182 win->wattr |= __DIM; 183 if (attr & __BLANK && __tc_mk != NULL) 184 win->wattr |= __BLANK; 185 if (attr & __PROTECT && __tc_mp != NULL) 186 win->wattr |= __PROTECT; 187 if (attr & __REVERSE && __tc_mr != NULL) 188 win->wattr |= __REVERSE; 189 #ifdef HAVE_WCHAR 190 if (attr & WA_LOW && __tc_Xo != NULL) 191 win->wattr |= WA_LOW; 192 if (attr & WA_TOP && __tc_Xt != NULL) 193 win->wattr |= WA_TOP; 194 if (attr & WA_LEFT && __tc_Xl != NULL) 195 win->wattr |= WA_LEFT; 196 if (attr & WA_RIGHT && __tc_Xr != NULL) 197 win->wattr |= WA_RIGHT; 198 if (attr & WA_HORIZONTAL && __tc_Xh != NULL) 199 win->wattr |= WA_HORIZONTAL; 200 if (attr & WA_VERTICAL && __tc_Xv != NULL) 201 win->wattr |= WA_VERTICAL; 202 #endif /* HAVE_WCHAR */ 203 } 204 if (attr & __STANDOUT) 205 wstandout(win); 206 if (attr & __UNDERSCORE) 207 wunderscore(win); 208 if ((attr_t) attr & __COLOR) 209 __wcolor_set(win, (attr_t) attr); 210 return OK; 211 } 212 213 /* 214 * wattr_off -- 215 * Test and unset attributes on stdscr 216 * 217 * Note that the 'me' sequence unsets all attributes. We handle 218 * which attributes should really be set in refresh.c:makech(). 219 */ 220 /* ARGSUSED */ 221 int 222 wattr_off(WINDOW *win, attr_t attr, void *opt) 223 { 224 #ifdef DEBUG 225 __CTRACE(__CTRACE_ATTR, "wattr_off: win %p, attr %08x\n", win, attr); 226 #endif 227 /* If can do exit modes, unset the relevent attribute bits. */ 228 if (__tc_me != NULL) { 229 if (attr & __BLINK) 230 win->wattr &= ~__BLINK; 231 if (attr & __BOLD) 232 win->wattr &= ~__BOLD; 233 if (attr & __DIM) 234 win->wattr &= ~__DIM; 235 if (attr & __BLANK) 236 win->wattr &= ~__BLANK; 237 if (attr & __PROTECT) 238 win->wattr &= ~__PROTECT; 239 if (attr & __REVERSE) 240 win->wattr &= ~__REVERSE; 241 #ifdef HAVE_WCHAR 242 if (attr & WA_LOW) 243 win->wattr &= ~WA_LOW; 244 if (attr & WA_TOP) 245 win->wattr &= ~WA_TOP; 246 if (attr & WA_LEFT) 247 win->wattr &= ~WA_LEFT; 248 if (attr & WA_RIGHT) 249 win->wattr &= ~WA_RIGHT; 250 if (attr & WA_HORIZONTAL) 251 win->wattr &= ~WA_HORIZONTAL; 252 if (attr & WA_VERTICAL) 253 win->wattr &= ~WA_VERTICAL; 254 #endif /* HAVE_WCHAR */ 255 } 256 if (attr & __STANDOUT) 257 wstandend(win); 258 if (attr & __UNDERSCORE) 259 wunderend(win); 260 if ((attr_t) attr & __COLOR) { 261 if (__tc_Co != 0) 262 win->wattr &= ~__COLOR; 263 } 264 return OK; 265 } 266 267 /* 268 * wattr_set -- 269 * Set attributes and color pair on stdscr 270 */ 271 int 272 wattr_set(WINDOW *win, attr_t attr, short pair, void *opt) 273 { 274 #ifdef DEBUG 275 __CTRACE(__CTRACE_ATTR, "wattr_set: win %p, attr %08x, pair %d\n", 276 win, attr, pair); 277 #endif 278 wattr_off(win, __ATTRIBUTES, opt); 279 /* 280 * This overwrites any colour setting from the attributes 281 * and is compatible with ncurses. 282 */ 283 attr = (attr & ~__COLOR) | COLOR_PAIR(pair); 284 wattr_on(win, attr, opt); 285 return OK; 286 } 287 288 /* 289 * wattron -- 290 * Test and set attributes. 291 */ 292 int 293 wattron(WINDOW *win, int attr) 294 { 295 #ifdef DEBUG 296 __CTRACE(__CTRACE_ATTR, "wattron: win %p, attr %08x\n", win, attr); 297 #endif 298 return wattr_on(win, (attr_t) attr, NULL); 299 } 300 301 /* 302 * wattroff -- 303 * Test and unset attributes. 304 */ 305 int 306 wattroff(WINDOW *win, int attr) 307 { 308 #ifdef DEBUG 309 __CTRACE(__CTRACE_ATTR, "wattroff: win %p, attr %08x\n", win, attr); 310 #endif 311 return wattr_off(win, (attr_t) attr, NULL); 312 } 313 314 /* 315 * wattrset -- 316 * Set specific attribute modes. 317 * Unset others. 318 */ 319 int 320 wattrset(WINDOW *win, int attr) 321 { 322 #ifdef DEBUG 323 __CTRACE(__CTRACE_ATTR, "wattrset: win %p, attr %08x\n", win, attr); 324 #endif 325 wattr_off(win, __ATTRIBUTES, NULL); 326 wattr_on(win, (attr_t) attr, 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