xref: /freebsd/contrib/ncurses/test/back_ground.c (revision 9768746b)
1 /****************************************************************************
2  * Copyright 2021 Thomas E. Dickey                                          *
3  *                                                                          *
4  * Permission is hereby granted, free of charge, to any person obtaining a  *
5  * copy of this software and associated documentation files (the            *
6  * "Software"), to deal in the Software without restriction, including      *
7  * without limitation the rights to use, copy, modify, merge, publish,      *
8  * distribute, distribute with modifications, sublicense, and/or sell       *
9  * copies of the Software, and to permit persons to whom the Software is    *
10  * furnished to do so, subject to the following conditions:                 *
11  *                                                                          *
12  * The above copyright notice and this permission notice shall be included  *
13  * in all copies or substantial portions of the Software.                   *
14  *                                                                          *
15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
16  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
17  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
18  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
21  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
22  *                                                                          *
23  * Except as contained in this notice, the name(s) of the above copyright   *
24  * holders shall not be used in advertising or otherwise to promote the     *
25  * sale, use or other dealings in this Software without prior written       *
26  * authorization.                                                           *
27  ****************************************************************************/
28 /*
29  * $Id: back_ground.c,v 1.5 2021/02/20 12:23:21 tom Exp $
30  */
31 
32 #include <test.priv.h>
33 
34 #if USE_WIDEC_SUPPORT
35 
36 #define NEED_COLOR_CODE 1
37 #define NEED_COLOR_NAME 1
38 #include <color_name.h>
39 #include <dump_window.h>
40 
41 static int default_bg = COLOR_BLACK;
42 static int default_fg = COLOR_WHITE;
43 static wchar_t wide_fill = L' ';
44 
45 static wchar_t
46 decode_wchar(const char *value)
47 {
48     long result;
49     char *next = NULL;
50     int radix = 0;
51 
52     if (!strncmp(value, "U+", 2)) {
53 	value += 2;
54 	radix = 16;
55     }
56     result = strtol(value, &next, radix);
57     if (next == value || (next == NULL || *next != '\0')) {
58 	fprintf(stderr, "decoding wchar_t: %s\n", value);
59 	exit(EXIT_FAILURE);
60     }
61     return (wchar_t) result;
62 }
63 
64 static void
65 test_background(void)
66 {
67     NCURSES_COLOR_T f, b;
68     int row;
69     int chr;
70     wchar_t blank[2];
71     wchar_t graphics[2];
72     cchar_t data;
73 
74     if (pair_content(0, &f, &b) == ERR) {
75 	printw("pair 0 contains no data\n");
76     } else {
77 	printw("pair 0 contains (%d,%d)\n", (int) f, (int) b);
78     }
79     dump_window(stdscr);
80 
81     blank[0] = wide_fill;
82     blank[1] = L'\0';
83 
84     printw("Initializing pair 1 to red/%s\n", color_name(default_bg));
85     init_pair(1, COLOR_RED, (NCURSES_COLOR_T) default_bg);
86     setcchar(&data, blank, A_NORMAL, 1, NULL);
87     bkgrndset(&data);
88     printw("RED/BLACK\n");
89     dump_window(stdscr);
90 
91     printw("Initializing pair 2 to %s/blue\n", color_name(default_fg));
92     init_pair(2, (NCURSES_COLOR_T) default_fg, COLOR_BLUE);
93     setcchar(&data, blank, A_NORMAL, 2, NULL);
94     bkgrndset(&data);
95     printw("This line should be %s/blue\n", color_name(default_fg));
96     dump_window(stdscr);
97 
98     printw("Initializing pair 3 to %s/cyan (ACS_HLINE)\n", color_name(default_fg));
99     init_pair(3, (NCURSES_COLOR_T) default_fg, COLOR_CYAN);
100     printw("...and drawing a box which should be followed by lines\n");
101     graphics[0] = ACS_HLINE & A_CHARTEXT;
102     graphics[1] = L'\0';
103     setcchar(&data, graphics, A_ALTCHARSET, 3, NULL);
104     bkgrndset(&data);
105     /*
106      * Characters from vt100 line-drawing should be mapped to line-drawing,
107      * since A_ALTCHARSET is set in the background, and the character part
108      * of the background is replaced by the nonblank characters written.
109      *
110      * Characters not in the line-drawing range are usually sent as-is.
111      *
112      * With SVr4 curses it is possible to rely on this to mix uppercase text
113      * with the (lowercase) line-drawing characters.  ncurses uses some of
114      * the uppercase characters for encoding thick- and double-lines.
115      */
116     row = 7;
117     mvprintw(row++, 10, "l");
118     for (chr = 0; chr < 32; ++chr)
119 	AddCh(' ');
120     printw("x\n");
121     chr = 32;
122     while (chr < 128) {
123 	if ((chr % 32) == 0)
124 	    mvprintw(row++, 10, "x");
125 	AddCh((chr == 127) ? ' ' : chr);
126 	if ((++chr % 32) == 0)
127 	    printw("x\n");
128     }
129     mvprintw(row++, 10, "m");
130     for (chr = 0; chr < 32; ++chr)
131 	AddCh(' ');
132     printw("j\n");
133     dump_window(stdscr);
134 
135     setcchar(&data, blank, A_NORMAL, 0, NULL);
136     bkgrndset(&data);
137     printw("Default Colors\n");
138     dump_window(stdscr);
139 
140     printw("Resetting colors to pair 1\n");
141     setcchar(&data, blank, A_NORMAL, 1, NULL);
142     bkgrndset(&data);
143     printw("This line should be red/%s\n", color_name(default_bg));
144     dump_window(stdscr);
145 
146     printw("Setting screen to pair 0\n");
147     setcchar(&data, blank, A_NORMAL, 0, NULL);
148     bkgrndset(&data);
149     dump_window(stdscr);
150 
151     printw("Setting screen to pair 1\n");
152     setcchar(&data, blank, A_NORMAL, 1, NULL);
153     bkgrndset(&data);
154     dump_window(stdscr);
155 
156     printw("Setting screen to pair 2\n");
157     setcchar(&data, blank, A_NORMAL, 2, NULL);
158     bkgrndset(&data);
159     dump_window(stdscr);
160 
161     printw("Setting screen to pair 3\n");
162     setcchar(&data, blank, A_NORMAL, 3, NULL);
163     bkgrndset(&data);
164     dump_window(stdscr);
165 
166     printw("Setting screen to pair 0\n");
167     setcchar(&data, blank, A_NORMAL, 0, NULL);
168     bkgrndset(&data);
169     dump_window(stdscr);
170 }
171 
172 static void
173 usage(void)
174 {
175     static const char *msg[] =
176     {
177 	"Usage: background [options]"
178 	,""
179 	,"Options:"
180 #if HAVE_ASSUME_DEFAULT_COLORS
181 	," -a       invoke assume_default_colors, repeat to use in init_pair"
182 #endif
183 	," -b XXX   specify background color"
184 #if HAVE_USE_DEFAULT_COLORS
185 	," -d       invoke use_default_colors, repeat to use in init_pair"
186 #endif
187 	," -f XXX   specify foreground color"
188 	," -l FILE  log window-dumps to this file"
189 	," -w       fill background with stipple pattern"
190 	," -W CODE  fill background with this Unicode value"
191     };
192     size_t n;
193 
194     for (n = 0; n < SIZEOF(msg); n++)
195 	fprintf(stderr, "%s\n", msg[n]);
196 
197     ExitProgram(EXIT_FAILURE);
198 }
199 
200 int
201 main(int argc GCC_UNUSED, char *argv[]GCC_UNUSED)
202 {
203 #if HAVE_ASSUME_DEFAULT_COLORS
204     int a_option = 0;
205 #endif
206 #if HAVE_USE_DEFAULT_COLORS
207     int d_option = 0;
208 #endif
209     int n;
210 
211     setlocale(LC_ALL, "");
212 
213     while ((n = getopt(argc, argv, "ab:df:l:wW:")) != -1) {
214 	switch (n) {
215 #if HAVE_ASSUME_DEFAULT_COLORS
216 	case 'a':
217 	    ++a_option;
218 	    break;
219 #endif
220 	case 'b':
221 	    default_bg = color_code(optarg);
222 	    break;
223 #if HAVE_USE_DEFAULT_COLORS
224 	case 'd':
225 	    ++d_option;
226 	    break;
227 #endif
228 	case 'f':
229 	    default_fg = color_code(optarg);
230 	    break;
231 	case 'l':
232 	    if (!open_dump(optarg))
233 		usage();
234 	    break;
235 	case 'w':
236 	    wide_fill = L'\u2591';
237 	    break;
238 	case 'W':
239 	    wide_fill = decode_wchar(optarg);
240 	    break;
241 	default:
242 	    usage();
243 	}
244     }
245 #if HAVE_USE_DEFAULT_COLORS && HAVE_ASSUME_DEFAULT_COLORS
246     if (a_option && d_option) {
247 	fprintf(stderr, "Use either -a or -d option, but not both\n");
248 	ExitProgram(EXIT_FAILURE);
249     }
250 #endif
251 
252     initscr();
253     cbreak();
254     noecho();
255 
256     if (has_colors()) {
257 	start_color();
258 
259 #if HAVE_USE_DEFAULT_COLORS
260 	if (d_option) {
261 	    printw("Using default colors...\n");
262 	    use_default_colors();
263 	    if (d_option > 1) {
264 		default_fg = -1;
265 		default_bg = -1;
266 	    }
267 	}
268 #endif
269 #if HAVE_ASSUME_DEFAULT_COLORS
270 	if (a_option) {
271 	    printw("Using assumed colors %s/%s...\n",
272 		   color_name(default_fg),
273 		   color_name(default_bg));
274 	    assume_default_colors(default_fg, default_bg);
275 	    if (a_option > 1) {
276 		default_fg = -1;
277 		default_bg = -1;
278 	    }
279 	}
280 #endif
281 
282 	test_background();
283 
284     } else {
285 	printw("This demo requires a color terminal");
286 	getch();
287     }
288     endwin();
289     close_dump();
290     ExitProgram(EXIT_SUCCESS);
291 }
292 
293 #else
294 int
295 main(void)
296 {
297     printf("This program requires the wide-curses library\n");
298     ExitProgram(EXIT_FAILURE);
299 }
300 #endif /* USE_WIDEC_SUPPORT */
301