1 /****************************************************************************
2 * Copyright 2018-2020,2021 Thomas E. Dickey *
3 * Copyright 2017 Free Software Foundation, Inc. *
5 * Permission is hereby granted, free of charge, to any person obtaining a *
6 * copy of this software and associated documentation files (the *
7 * "Software"), to deal in the Software without restriction, including *
8 * without limitation the rights to use, copy, modify, merge, publish, *
9 * distribute, distribute with modifications, sublicense, and/or sell *
10 * copies of the Software, and to permit persons to whom the Software is *
11 * furnished to do so, subject to the following conditions: *
13 * The above copyright notice and this permission notice shall be included *
14 * in all copies or substantial portions of the Software. *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
17 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
18 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
19 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
20 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
21 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
22 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
24 * Except as contained in this notice, the name(s) of the above copyright *
25 * holders shall not be used in advertising or otherwise to promote the *
26 * sale, use or other dealings in this Software without prior written *
28 ****************************************************************************/
30 * $Id: demo_new_pair.c,v 1.24 2021/02/21 01:24:06 tom Exp $
32 * Demonstrate the alloc_pair() function.
35 #include <test.priv.h>
37 #include <popup_msg.h>
39 #if HAVE_ALLOC_PAIR && USE_WIDEC_SUPPORT
41 #include <sys/types.h>
45 #define MAX_BITS 8 /* all but A_ALTCHARSET */
46 #define MAX_ATTR ((1<<MAX_BITS)-1)
49 valid_cap(NCURSES_CONST char *name)
51 char *value = tigetstr(name);
52 return (value != 0 && value != (char *) -1) ? TRUE : FALSE;
58 static bool init = FALSE;
59 static attr_t table[MAX_BITS * MAX_BITS];
64 attr_t bits[MAX_BITS];
67 bits[limit++] = WA_NORMAL;
68 if (valid_cap("smso"))
69 bits[limit++] = WA_STANDOUT;
70 if (valid_cap("smul"))
71 bits[limit++] = WA_UNDERLINE;
73 bits[limit++] = WA_REVERSE;
74 if (valid_cap("blink"))
75 bits[limit++] = WA_BLINK;
77 bits[limit++] = WA_DIM;
78 if (valid_cap("bold"))
79 bits[limit++] = WA_BOLD;
80 for (j = 0; j < limit; ++j) {
81 for (k = 0; k < limit; ++k) {
82 table[j * limit + k] = bits[j] | bits[k];
86 return table[now % limit];
90 our_content(int pair, int *fg, int *bg)
93 *fg = (pair / COLORS) % COLORS;
94 *bg = (pair % COLORS);
101 our_content(now, &fg, &bg);
102 return alloc_pair(fg, bg);
109 if ((short) now > 0) {
110 if (now < COLOR_PAIRS) {
112 our_content(now, &fg, &bg);
113 if (init_pair((short) now, (short) fg, (short) bg) != OK)
126 return time((time_t *) 0);
132 static const char *msg[] =
134 "Usage: demo_new_pair [options]",
136 "Repeatedly print using all possible color combinations.",
139 " -g use getcchar to check setcchar",
140 " -i use init_pair rather than alloc_pair",
141 " -p start in paged-mode",
142 " -s start in single-step mode",
143 " -w print a wide-character cell",
146 for (n = 0; n < SIZEOF(msg); ++n) {
147 fprintf(stderr, "%s\n", msg[n]);
149 ExitProgram(EXIT_FAILURE);
152 #define use_pages() \
153 paged_mode = TRUE, single_mode = TRUE
155 #define use_single() \
156 paged_mode = FALSE, single_mode = TRUE
158 #define update_modes() \
159 scrollok(stdscr, !paged_mode); \
160 nodelay(stdscr, !single_mode || paged_mode)
163 main(int argc, char *argv[])
165 static const char *help[] =
167 "This program iterates over the possible color combinations,",
168 "allocating or initializing color pairs. For best results,",
169 "choose screen-width dividing evenly into the number of colors,",
172 " 32x64,32x128 256 colors",
173 " 24x44,24x88 88 colors",
174 " 32x64,24x128 16 colors",
177 " c toggle between coloring and de-coloring cells",
178 " p show one page at a time",
179 " s show one character at a time",
180 " <space> display char/page without pausing",
181 " v/V cycle through video attributes",
182 " w toggle between \"#\" and a double-width equivalent",
183 " ? print this screen (exit on any character).",
185 "To exit this program, press ^Q, ^[ or \"q\".",
190 bool check_set = FALSE;
191 bool clobber = FALSE;
192 bool hascolor = FALSE;
193 bool use_init = FALSE;
194 bool use_wide = FALSE;
195 bool paged_mode = FALSE;
196 bool single_mode = FALSE;
201 time_t start = now();
202 long total_cells = 0;
205 setlocale(LC_ALL, "");
207 while ((ch = getopt(argc, argv, "gipsw")) != -1) {
230 if (isatty(fileno(stderr))) {
232 } else if ((ch = open("/dev/tty", O_WRONLY)) >= 0) {
233 output = fdopen(ch, "w");
235 fprintf(stderr, "cannot open terminal for output\n");
236 ExitProgram(EXIT_FAILURE);
238 if (newterm(NULL, output, stdin) == 0) {
239 fprintf(stderr, "Cannot initialize terminal\n");
241 ExitProgram(EXIT_FAILURE);
243 (void) cbreak(); /* read chars without wait for \n */
244 (void) noecho(); /* don't echo input */
248 keypad(stdscr, TRUE);
250 if ((hascolor = has_colors())) {
258 * Repeatedly cycle through all colors, initializing pairs as needed.
259 * Provide for single-stepping, or page-at-a-time, as well as quitting.
268 popup_msg(stdscr, help);
293 if (--video_mode < 0)
294 video_mode = MAX_ATTR;
297 if (video_mode > MAX_ATTR)
301 use_wide = !use_wide;
310 my_attrs = next_attr(video_mode);
313 our_content(current, &fg, &bg);
314 my_pair = find_pair(fg, bg);
321 ? next_color(current)
322 : make_color(current));
325 my_attrs = next_attr(current);
330 wch[0] = use_wide ? 0xff03 : '#';
332 setcchar(&temp, wch, my_attrs,
334 (use_init ? NULL : (void *) &my_pair));
339 attr_t chk_attrs = 0;
343 #define AllButColor(a) ((a) & (A_ATTRIBUTES & ~A_COLOR))
345 if (getcchar(&temp, NULL, &chk_attrs, &chk_pair,
346 (use_init ? NULL : (void *) &chk_pair2)) != 2) {
348 } else if (getcchar(&temp, chk_wch, &chk_attrs, &chk_pair,
349 (use_init ? NULL : (void *) &chk_pair2)) != OK) {
351 } else if (chk_wch[0] != wch[0]) {
353 } else if (AllButColor(my_attrs) != AllButColor(chk_attrs)) {
355 } else if (my_pair != chk_pair) {
357 } else if (!use_init && (my_pair != chk_pair2)) {
361 wch[0] = (wchar_t) (problem + '0');
362 setcchar(&temp, wch, my_attrs,
364 (use_init ? NULL : (void *) &my_pair));
369 * At the end of a page, move the cursor to the home position.
371 if ((add_wch(&temp) == ERR) && paged_mode) {
372 nodelay(stdscr, !single_mode);
375 total_cells += 1 + (use_wide ? 1 : 0);
381 printf("%.1f cells/second\n",
382 (double) (total_cells) / (double) (now() - start));
384 ExitProgram(EXIT_SUCCESS);
391 printf("This program requires the ncurses alloc_pair function\n");
392 ExitProgram(EXIT_FAILURE);