1 /* $NetBSD: color.c,v 1.38 2011/10/03 12:32:15 roy Exp $ */
2
3 /*
4 * Copyright (c) 2000 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 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 #ifndef lint
34 __RCSID("$NetBSD: color.c,v 1.38 2011/10/03 12:32:15 roy Exp $");
35 #endif /* not lint */
36
37 #include "curses.h"
38 #include "curses_private.h"
39
40 /* Have we initialised colours? */
41 int __using_color = 0;
42
43 /* Default colour number */
44 attr_t __default_color = 0;
45
46 /* Default colour pair values - white on black. */
47 struct __pair __default_pair = {COLOR_WHITE, COLOR_BLACK, 0};
48
49 /* Default colour values */
50 /* Flags for colours and pairs */
51 #define __USED 0x01
52
53 static void
54 __change_pair(short);
55
56 /*
57 * has_colors --
58 * Check if terminal has colours.
59 */
60 bool
has_colors(void)61 has_colors(void)
62 {
63 if (max_colors > 0 && max_pairs > 0 &&
64 ((set_a_foreground != NULL && set_a_background != NULL) ||
65 initialize_pair != NULL || initialize_color != NULL ||
66 (set_background != NULL && set_foreground != NULL)))
67 return(TRUE);
68 else
69 return(FALSE);
70 }
71
72 /*
73 * can_change_color --
74 * Check if terminal can change colours.
75 */
76 bool
can_change_color(void)77 can_change_color(void)
78 {
79 if (can_change)
80 return(TRUE);
81 else
82 return(FALSE);
83 }
84
85 /*
86 * start_color --
87 * Initialise colour support.
88 */
89 int
start_color(void)90 start_color(void)
91 {
92 int i;
93 attr_t temp_nc;
94 struct __winlist *wlp;
95 WINDOW *win;
96 int y, x;
97
98 if (has_colors() == FALSE)
99 return(ERR);
100
101 /* Max colours and colour pairs */
102 if (max_colors == -1)
103 COLORS = 0;
104 else {
105 COLORS = max_colors > MAX_COLORS ? MAX_COLORS : max_colors;
106 if (max_pairs == -1) {
107 COLOR_PAIRS = 0;
108 COLORS = 0;
109 } else {
110 COLOR_PAIRS = (max_pairs > MAX_PAIRS - 1 ?
111 MAX_PAIRS - 1 : max_pairs);
112 /* Use the last colour pair for curses default. */
113 __default_color = COLOR_PAIR(MAX_PAIRS - 1);
114 }
115 }
116 if (!COLORS)
117 return (ERR);
118
119 _cursesi_screen->COLORS = COLORS;
120 _cursesi_screen->COLOR_PAIRS = COLOR_PAIRS;
121
122 /* Reset terminal colour and colour pairs. */
123 if (orig_colors != NULL)
124 tputs(orig_colors, 0, __cputchar);
125 if (orig_pair != NULL) {
126 tputs(orig_pair, 0, __cputchar);
127 curscr->wattr &= _cursesi_screen->mask_op;
128 }
129
130 /* Type of colour manipulation - ANSI/TEK/HP/other */
131 if (set_a_foreground != NULL && set_a_background != NULL)
132 _cursesi_screen->color_type = COLOR_ANSI;
133 else if (initialize_pair != NULL)
134 _cursesi_screen->color_type = COLOR_HP;
135 else if (initialize_color != NULL)
136 _cursesi_screen->color_type = COLOR_TEK;
137 else if (set_foreground != NULL && set_background != NULL)
138 _cursesi_screen->color_type = COLOR_OTHER;
139 else
140 return(ERR); /* Unsupported colour method */
141
142 #ifdef DEBUG
143 __CTRACE(__CTRACE_COLOR, "start_color: COLORS = %d, COLOR_PAIRS = %d",
144 COLORS, COLOR_PAIRS);
145 switch (_cursesi_screen->color_type) {
146 case COLOR_ANSI:
147 __CTRACE(__CTRACE_COLOR, " (ANSI style)\n");
148 break;
149 case COLOR_HP:
150 __CTRACE(__CTRACE_COLOR, " (HP style)\n");
151 break;
152 case COLOR_TEK:
153 __CTRACE(__CTRACE_COLOR, " (Tektronics style)\n");
154 break;
155 case COLOR_OTHER:
156 __CTRACE(__CTRACE_COLOR, " (Other style)\n");
157 break;
158 }
159 #endif
160
161 /*
162 * Attributes that cannot be used with color.
163 * Store these in an attr_t for wattrset()/wattron().
164 */
165 _cursesi_screen->nca = __NORMAL;
166 if (no_color_video != -1) {
167 temp_nc = (attr_t) t_no_color_video(_cursesi_screen->term);
168 if (temp_nc & 0x0001)
169 _cursesi_screen->nca |= __STANDOUT;
170 if (temp_nc & 0x0002)
171 _cursesi_screen->nca |= __UNDERSCORE;
172 if (temp_nc & 0x0004)
173 _cursesi_screen->nca |= __REVERSE;
174 if (temp_nc & 0x0008)
175 _cursesi_screen->nca |= __BLINK;
176 if (temp_nc & 0x0010)
177 _cursesi_screen->nca |= __DIM;
178 if (temp_nc & 0x0020)
179 _cursesi_screen->nca |= __BOLD;
180 if (temp_nc & 0x0040)
181 _cursesi_screen->nca |= __BLANK;
182 if (temp_nc & 0x0080)
183 _cursesi_screen->nca |= __PROTECT;
184 if (temp_nc & 0x0100)
185 _cursesi_screen->nca |= __ALTCHARSET;
186 }
187 #ifdef DEBUG
188 __CTRACE(__CTRACE_COLOR, "start_color: _cursesi_screen->nca = %08x\n",
189 _cursesi_screen->nca);
190 #endif
191
192 /* Set up initial 8 colours */
193 if (COLORS >= COLOR_BLACK)
194 (void) init_color(COLOR_BLACK, 0, 0, 0);
195 if (COLORS >= COLOR_RED)
196 (void) init_color(COLOR_RED, 1000, 0, 0);
197 if (COLORS >= COLOR_GREEN)
198 (void) init_color(COLOR_GREEN, 0, 1000, 0);
199 if (COLORS >= COLOR_YELLOW)
200 (void) init_color(COLOR_YELLOW, 1000, 1000, 0);
201 if (COLORS >= COLOR_BLUE)
202 (void) init_color(COLOR_BLUE, 0, 0, 1000);
203 if (COLORS >= COLOR_MAGENTA)
204 (void) init_color(COLOR_MAGENTA, 1000, 0, 1000);
205 if (COLORS >= COLOR_CYAN)
206 (void) init_color(COLOR_CYAN, 0, 1000, 1000);
207 if (COLORS >= COLOR_WHITE)
208 (void) init_color(COLOR_WHITE, 1000, 1000, 1000);
209
210 /* Initialise other colours */
211 for (i = 8; i < COLORS; i++) {
212 _cursesi_screen->colours[i].red = 0;
213 _cursesi_screen->colours[i].green = 0;
214 _cursesi_screen->colours[i].blue = 0;
215 _cursesi_screen->colours[i].flags = 0;
216 }
217
218 /* Initialise pair 0 to default colours. */
219 _cursesi_screen->colour_pairs[0].fore = -1;
220 _cursesi_screen->colour_pairs[0].back = -1;
221 _cursesi_screen->colour_pairs[0].flags = 0;
222
223 /* Initialise user colour pairs to default (white on black) */
224 for (i = 0; i < COLOR_PAIRS; i++) {
225 _cursesi_screen->colour_pairs[i].fore = COLOR_WHITE;
226 _cursesi_screen->colour_pairs[i].back = COLOR_BLACK;
227 _cursesi_screen->colour_pairs[i].flags = 0;
228 }
229
230 /* Initialise default colour pair. */
231 _cursesi_screen->colour_pairs[PAIR_NUMBER(__default_color)].fore =
232 __default_pair.fore;
233 _cursesi_screen->colour_pairs[PAIR_NUMBER(__default_color)].back =
234 __default_pair.back;
235 _cursesi_screen->colour_pairs[PAIR_NUMBER(__default_color)].flags =
236 __default_pair.flags;
237
238 __using_color = 1;
239
240 /* Set all positions on all windows to curses default colours. */
241 for (wlp = _cursesi_screen->winlistp; wlp != NULL; wlp = wlp->nextp) {
242 win = wlp->winp;
243 if (wlp->winp != __virtscr && wlp->winp != curscr) {
244 /* Set color attribute on other windows */
245 win->battr |= __default_color;
246 for (y = 0; y < win->maxy; y++) {
247 for (x = 0; x < win->maxx; x++) {
248 win->alines[y]->line[x].attr &= ~__COLOR;
249 win->alines[y]->line[x].attr |= __default_color;
250 }
251 }
252 __touchwin(win);
253 }
254 }
255
256 return(OK);
257 }
258
259 /*
260 * init_pair --
261 * Set pair foreground and background colors.
262 * Our default colour ordering is ANSI - 1 = red, 4 = blue, 3 = yellow,
263 * 6 = cyan. The older style (Sb/Sf) uses 1 = blue, 4 = red, 3 = cyan,
264 * 6 = yellow, so we swap them here and in pair_content().
265 */
266 int
init_pair(short pair,short fore,short back)267 init_pair(short pair, short fore, short back)
268 {
269 int changed;
270
271 #ifdef DEBUG
272 __CTRACE(__CTRACE_COLOR, "init_pair: %d, %d, %d\n", pair, fore, back);
273 #endif
274
275 if (pair < 0 || pair >= COLOR_PAIRS)
276 return (ERR);
277
278 if (pair == 0) /* Ignore request for pair 0, it is default. */
279 return OK;
280
281 if (fore >= COLORS)
282 return (ERR);
283 if (back >= COLORS)
284 return (ERR);
285
286 /* Swap red/blue and yellow/cyan */
287 if (_cursesi_screen->color_type == COLOR_OTHER) {
288 switch (fore) {
289 case COLOR_RED:
290 fore = COLOR_BLUE;
291 break;
292 case COLOR_BLUE:
293 fore = COLOR_RED;
294 break;
295 case COLOR_YELLOW:
296 fore = COLOR_CYAN;
297 break;
298 case COLOR_CYAN:
299 fore = COLOR_YELLOW;
300 break;
301 }
302 switch (back) {
303 case COLOR_RED:
304 back = COLOR_BLUE;
305 break;
306 case COLOR_BLUE:
307 back = COLOR_RED;
308 break;
309 case COLOR_YELLOW:
310 back = COLOR_CYAN;
311 break;
312 case COLOR_CYAN:
313 back = COLOR_YELLOW;
314 break;
315 }
316 }
317
318 if ((_cursesi_screen->colour_pairs[pair].flags & __USED) &&
319 (fore != _cursesi_screen->colour_pairs[pair].fore ||
320 back != _cursesi_screen->colour_pairs[pair].back))
321 changed = 1;
322 else
323 changed = 0;
324
325 _cursesi_screen->colour_pairs[pair].flags |= __USED;
326 _cursesi_screen->colour_pairs[pair].fore = fore;
327 _cursesi_screen->colour_pairs[pair].back = back;
328
329 /* XXX: need to initialise HP style (Ip) */
330
331 if (changed)
332 __change_pair(pair);
333 return (OK);
334 }
335
336 /*
337 * pair_content --
338 * Get pair foreground and background colours.
339 */
340 int
pair_content(short pair,short * forep,short * backp)341 pair_content(short pair, short *forep, short *backp)
342 {
343 if (pair < 0 || pair > _cursesi_screen->COLOR_PAIRS)
344 return(ERR);
345
346 *forep = _cursesi_screen->colour_pairs[pair].fore;
347 *backp = _cursesi_screen->colour_pairs[pair].back;
348
349 /* Swap red/blue and yellow/cyan */
350 if (_cursesi_screen->color_type == COLOR_OTHER) {
351 switch (*forep) {
352 case COLOR_RED:
353 *forep = COLOR_BLUE;
354 break;
355 case COLOR_BLUE:
356 *forep = COLOR_RED;
357 break;
358 case COLOR_YELLOW:
359 *forep = COLOR_CYAN;
360 break;
361 case COLOR_CYAN:
362 *forep = COLOR_YELLOW;
363 break;
364 }
365 switch (*backp) {
366 case COLOR_RED:
367 *backp = COLOR_BLUE;
368 break;
369 case COLOR_BLUE:
370 *backp = COLOR_RED;
371 break;
372 case COLOR_YELLOW:
373 *backp = COLOR_CYAN;
374 break;
375 case COLOR_CYAN:
376 *backp = COLOR_YELLOW;
377 break;
378 }
379 }
380 return(OK);
381 }
382
383 /*
384 * init_color --
385 * Set colour red, green and blue values.
386 */
387 int
init_color(short color,short red,short green,short blue)388 init_color(short color, short red, short green, short blue)
389 {
390 #ifdef DEBUG
391 __CTRACE(__CTRACE_COLOR, "init_color: %d, %d, %d, %d\n",
392 color, red, green, blue);
393 #endif
394 if (color < 0 || color >= _cursesi_screen->COLORS)
395 return(ERR);
396
397 _cursesi_screen->colours[color].red = red;
398 _cursesi_screen->colours[color].green = green;
399 _cursesi_screen->colours[color].blue = blue;
400 /* XXX Not yet implemented */
401 return(ERR);
402 /* XXX: need to initialise Tek style (Ic) and support HLS */
403 }
404
405 /*
406 * color_content --
407 * Get colour red, green and blue values.
408 */
409 int
color_content(short color,short * redp,short * greenp,short * bluep)410 color_content(short color, short *redp, short *greenp, short *bluep)
411 {
412 if (color < 0 || color >= _cursesi_screen->COLORS)
413 return(ERR);
414
415 *redp = _cursesi_screen->colours[color].red;
416 *greenp = _cursesi_screen->colours[color].green;
417 *bluep = _cursesi_screen->colours[color].blue;
418 return(OK);
419 }
420
421 /*
422 * use_default_colors --
423 * Use terminal default colours instead of curses default colour.
424 */
425 int
use_default_colors()426 use_default_colors()
427 {
428 #ifdef DEBUG
429 __CTRACE(__CTRACE_COLOR, "use_default_colors\n");
430 #endif
431
432 return(assume_default_colors(-1, -1));
433 }
434
435 /*
436 * assume_default_colors --
437 * Set the default foreground and background colours.
438 */
439 int
assume_default_colors(short fore,short back)440 assume_default_colors(short fore, short back)
441 {
442 #ifdef DEBUG
443 __CTRACE(__CTRACE_COLOR, "assume_default_colors: %d, %d\n",
444 fore, back);
445 __CTRACE(__CTRACE_COLOR, "assume_default_colors: default_colour = %d, pair_number = %d\n", __default_color, PAIR_NUMBER(__default_color));
446 #endif
447
448 /* Swap red/blue and yellow/cyan */
449 if (_cursesi_screen->color_type == COLOR_OTHER) {
450 switch (fore) {
451 case COLOR_RED:
452 fore = COLOR_BLUE;
453 break;
454 case COLOR_BLUE:
455 fore = COLOR_RED;
456 break;
457 case COLOR_YELLOW:
458 fore = COLOR_CYAN;
459 break;
460 case COLOR_CYAN:
461 fore = COLOR_YELLOW;
462 break;
463 }
464 switch (back) {
465 case COLOR_RED:
466 back = COLOR_BLUE;
467 break;
468 case COLOR_BLUE:
469 back = COLOR_RED;
470 break;
471 case COLOR_YELLOW:
472 back = COLOR_CYAN;
473 break;
474 case COLOR_CYAN:
475 back = COLOR_YELLOW;
476 break;
477 }
478 }
479 __default_pair.fore = fore;
480 __default_pair.back = back;
481 __default_pair.flags = __USED;
482
483 if (COLOR_PAIRS) {
484 _cursesi_screen->colour_pairs[PAIR_NUMBER(__default_color)].fore = fore;
485 _cursesi_screen->colour_pairs[PAIR_NUMBER(__default_color)].back = back;
486 _cursesi_screen->colour_pairs[PAIR_NUMBER(__default_color)].flags = __USED;
487 }
488
489 /*
490 * If we've already called start_color(), make sure all instances
491 * of the curses default colour pair are dirty.
492 */
493 if (__using_color)
494 __change_pair(PAIR_NUMBER(__default_color));
495
496 return(OK);
497 }
498
499 /* no_color_video is a terminfo macro, but we need to retain binary compat */
500 #ifdef __strong_alias
501 #undef no_color_video
__strong_alias(no_color_video,no_color_attributes)502 __strong_alias(no_color_video, no_color_attributes)
503 #endif
504 /*
505 * no_color_attributes --
506 * Return attributes that cannot be combined with color.
507 */
508 attr_t
509 no_color_attributes(void)
510 {
511 return(_cursesi_screen->nca);
512 }
513
514 /*
515 * __set_color --
516 * Set terminal foreground and background colours.
517 */
518 void
__set_color(WINDOW * win,attr_t attr)519 __set_color( /*ARGSUSED*/ WINDOW *win, attr_t attr)
520 {
521 short pair;
522
523 if ((curscr->wattr & __COLOR) == (attr & __COLOR))
524 return;
525
526 pair = PAIR_NUMBER((u_int32_t)attr);
527 #ifdef DEBUG
528 __CTRACE(__CTRACE_COLOR, "__set_color: %d, %d, %d\n", pair,
529 _cursesi_screen->colour_pairs[pair].fore,
530 _cursesi_screen->colour_pairs[pair].back);
531 #endif
532 switch (_cursesi_screen->color_type) {
533 /* Set ANSI forground and background colours */
534 case COLOR_ANSI:
535 if (_cursesi_screen->colour_pairs[pair].fore < 0 ||
536 _cursesi_screen->colour_pairs[pair].back < 0)
537 __unset_color(curscr);
538 if (_cursesi_screen->colour_pairs[pair].fore >= 0)
539 tputs(tiparm(t_set_a_foreground(_cursesi_screen->term),
540 (int)_cursesi_screen->colour_pairs[pair].fore),
541 0, __cputchar);
542 if (_cursesi_screen->colour_pairs[pair].back >= 0)
543 tputs(tiparm(t_set_a_background(_cursesi_screen->term),
544 (int)_cursesi_screen->colour_pairs[pair].back),
545 0, __cputchar);
546 break;
547 case COLOR_HP:
548 /* XXX: need to support HP style */
549 break;
550 case COLOR_TEK:
551 /* XXX: need to support Tek style */
552 break;
553 case COLOR_OTHER:
554 if (_cursesi_screen->colour_pairs[pair].fore < 0 ||
555 _cursesi_screen->colour_pairs[pair].back < 0)
556 __unset_color(curscr);
557 if (_cursesi_screen->colour_pairs[pair].fore >= 0)
558 tputs(tiparm(t_set_foreground(_cursesi_screen->term),
559 (int)_cursesi_screen->colour_pairs[pair].fore),
560 0, __cputchar);
561 if (_cursesi_screen->colour_pairs[pair].back >= 0)
562 tputs(tiparm(t_set_background(_cursesi_screen->term),
563 (int)_cursesi_screen->colour_pairs[pair].back),
564 0, __cputchar);
565 break;
566 }
567 curscr->wattr &= ~__COLOR;
568 curscr->wattr |= attr & __COLOR;
569 }
570
571 /*
572 * __unset_color --
573 * Clear terminal foreground and background colours.
574 */
575 void
__unset_color(WINDOW * win)576 __unset_color(WINDOW *win)
577 {
578 #ifdef DEBUG
579 __CTRACE(__CTRACE_COLOR, "__unset_color\n");
580 #endif
581 switch (_cursesi_screen->color_type) {
582 /* Clear ANSI forground and background colours */
583 case COLOR_ANSI:
584 if (orig_pair != NULL) {
585 tputs(orig_pair, 0, __cputchar);
586 win->wattr &= __mask_op;
587 }
588 break;
589 case COLOR_HP:
590 /* XXX: need to support HP style */
591 break;
592 case COLOR_TEK:
593 /* XXX: need to support Tek style */
594 break;
595 case COLOR_OTHER:
596 if (orig_pair != NULL) {
597 tputs(orig_pair, 0, __cputchar);
598 win->wattr &= __mask_op;
599 }
600 break;
601 }
602 }
603
604 /*
605 * __restore_colors --
606 * Redo color definitions after restarting 'curses' mode.
607 */
608 void
__restore_colors(void)609 __restore_colors(void)
610 {
611 if (can_change != 0)
612 switch (_cursesi_screen->color_type) {
613 case COLOR_HP:
614 /* XXX: need to re-initialise HP style (Ip) */
615 break;
616 case COLOR_TEK:
617 /* XXX: need to re-initialise Tek style (Ic) */
618 break;
619 }
620 }
621
622 /*
623 * __change_pair --
624 * Mark dirty all positions using pair.
625 */
626 void
__change_pair(short pair)627 __change_pair(short pair)
628 {
629 struct __winlist *wlp;
630 WINDOW *win;
631 int y, x;
632 __LINE *lp;
633 uint32_t cl = COLOR_PAIR(pair);
634
635
636 for (wlp = _cursesi_screen->winlistp; wlp != NULL; wlp = wlp->nextp) {
637 #ifdef DEBUG
638 __CTRACE(__CTRACE_COLOR, "__change_pair: win = %p\n",
639 wlp->winp);
640 #endif
641 win = wlp->winp;
642 if (win == __virtscr)
643 continue;
644 else if (win == curscr) {
645 /* Reset colour attribute on curscr */
646 #ifdef DEBUG
647 __CTRACE(__CTRACE_COLOR,
648 "__change_pair: win == curscr\n");
649 #endif
650 for (y = 0; y < curscr->maxy; y++) {
651 lp = curscr->alines[y];
652 for (x = 0; x < curscr->maxx; x++) {
653 if ((lp->line[x].attr & __COLOR) == cl)
654 lp->line[x].attr &= ~__COLOR;
655 }
656 }
657 } else {
658 /* Mark dirty those positions with colour pair "pair" */
659 for (y = 0; y < win->maxy; y++) {
660 lp = win->alines[y];
661 for (x = 0; x < win->maxx; x++)
662 if ((lp->line[x].attr &
663 __COLOR) == cl) {
664 if (!(lp->flags & __ISDIRTY))
665 lp->flags |= __ISDIRTY;
666 /*
667 * firstchp/lastchp are shared
668 * between parent window and
669 * sub-window.
670 */
671 if (*lp->firstchp > x)
672 *lp->firstchp = x;
673 if (*lp->lastchp < x)
674 *lp->lastchp = x;
675 }
676 #ifdef DEBUG
677 if ((win->alines[y]->flags & __ISDIRTY))
678 __CTRACE(__CTRACE_COLOR,
679 "__change_pair: first = %d, "
680 "last = %d\n",
681 *win->alines[y]->firstchp,
682 *win->alines[y]->lastchp);
683 #endif
684 }
685 }
686 }
687 }
688