test/back_ground.c

   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 */