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.3 2021/02/13 21:07:58 tom Exp $
  30  */
  31
  32 #define NEED_COLOR_CODE 1
  33 #define NEED_COLOR_NAME 1
  34 #include <color_name.h>
  35 #include <dump_window.h>
  36
  37 #if USE_WIDEC_SUPPORT
  38
  39 static int default_bg = COLOR_BLACK;
  40 static int default_fg = COLOR_WHITE;
  41 static wchar_t wide_fill = L' ';
  42
  43 static wchar_t
  44 decode_wchar(const char *value)
  45 {
  46     wchar_t result;
  47     char *next = NULL;
  48     int radix = 0;
  49
  50     if (!strncmp(value, "U+", 2)) {
  51         value += 2;
  52         radix = 16;
  53     }
  54     result = strtol(value, &next, radix);
  55     if (next == value || (next == NULL || *next != '\0')) {
  56         fprintf(stderr, "decoding wchar_t: %s\n", value);
  57         exit(EXIT_FAILURE);
  58     }
  59     return result;
  60 }
  61
  62 static void
  63 test_background(void)
  64 {
  65     NCURSES_COLOR_T f, b;
  66     int row;
  67     int chr;
  68     wchar_t blank[2];
  69     wchar_t graphics[2];
  70     cchar_t data;
  71
  72     if (pair_content(0, &f, &b) == ERR) {
  73         printw("pair 0 contains no data\n");
  74     } else {
  75         printw("pair 0 contains (%d,%d)\n", (int) f, (int) b);
  76     }
  77     dump_window(stdscr);
  78
  79     blank[0] = wide_fill;
  80     blank[1] = L'\0';
  81
  82     printw("Initializing pair 1 to red/%s\n", color_name(default_bg));
  83     init_pair(1, COLOR_RED, (NCURSES_COLOR_T) default_bg);
  84     setcchar(&data, blank, A_NORMAL, 1, NULL);
  85     bkgrndset(&data);
  86     printw("RED/BLACK\n");
  87     dump_window(stdscr);
  88
  89     printw("Initializing pair 2 to %s/blue\n", color_name(default_fg));
  90     init_pair(2, (NCURSES_COLOR_T) default_fg, COLOR_BLUE);
  91     setcchar(&data, blank, A_NORMAL, 2, NULL);
  92     bkgrndset(&data);
  93     printw("This line should be %s/blue\n", color_name(default_fg));
  94     dump_window(stdscr);
  95
  96     printw("Initializing pair 3 to %s/cyan (ACS_HLINE)\n", color_name(default_fg));
  97     init_pair(3, (NCURSES_COLOR_T) default_fg, COLOR_CYAN);
  98     printw("...and drawing a box which should be followed by lines\n");
  99     graphics[0] = ACS_HLINE & A_CHARTEXT;
 100     graphics[1] = L'\0';
 101     setcchar(&data, graphics, A_ALTCHARSET, 3, NULL);
 102     bkgrndset(&data);
 103     /*
 104      * Characters from vt100 line-drawing should be mapped to line-drawing,
 105      * since A_ALTCHARSET is set in the background, and the character part
 106      * of the background is replaced by the nonblank characters written.
 107      *
 108      * Characters not in the line-drawing range are usually sent as-is.
 109      *
 110      * With SVr4 curses it is possible to rely on this to mix uppercase text
 111      * with the (lowercase) line-drawing characters.  ncurses uses some of
 112      * the uppercase characters for encoding thick- and double-lines.
 113      */
 114     row = 7;
 115     mvprintw(row++, 10, "l");
 116     for (chr = 0; chr < 32; ++chr)
 117         AddCh(' ');
 118     printw("x\n");
 119     chr = 32;
 120     while (chr < 128) {
 121         if ((chr % 32) == 0)
 122             mvprintw(row++, 10, "x");
 123         AddCh((chr == 127) ? ' ' : chr);
 124         if ((++chr % 32) == 0)
 125             printw("x\n");
 126     }
 127     mvprintw(row++, 10, "m");
 128     for (chr = 0; chr < 32; ++chr)
 129         AddCh(' ');
 130     printw("j\n");
 131     dump_window(stdscr);
 132
 133     setcchar(&data, blank, A_NORMAL, 0, NULL);
 134     bkgrndset(&data);
 135     printw("Default Colors\n");
 136     dump_window(stdscr);
 137
 138     printw("Resetting colors to pair 1\n");
 139     setcchar(&data, blank, A_NORMAL, 1, NULL);
 140     bkgrndset(&data);
 141     printw("This line should be red/%s\n", color_name(default_bg));
 142     dump_window(stdscr);
 143
 144     printw("Setting screen to pair 0\n");
 145     setcchar(&data, blank, A_NORMAL, 0, NULL);
 146     bkgrndset(&data);
 147     dump_window(stdscr);
 148
 149     printw("Setting screen to pair 1\n");
 150     setcchar(&data, blank, A_NORMAL, 1, NULL);
 151     bkgrndset(&data);
 152     dump_window(stdscr);
 153
 154     printw("Setting screen to pair 2\n");
 155     setcchar(&data, blank, A_NORMAL, 2, NULL);
 156     bkgrndset(&data);
 157     dump_window(stdscr);
 158
 159     printw("Setting screen to pair 3\n");
 160     setcchar(&data, blank, A_NORMAL, 3, NULL);
 161     bkgrndset(&data);
 162     dump_window(stdscr);
 163
 164     printw("Setting screen to pair 0\n");
 165     setcchar(&data, blank, A_NORMAL, 0, NULL);
 166     bkgrndset(&data);
 167     dump_window(stdscr);
 168 }
 169
 170 static void
 171 usage(void)
 172 {
 173     static const char *msg[] =
 174     {
 175         "Usage: background [options]"
 176         ,""
 177         ,"Options:"
 178 #if HAVE_ASSUME_DEFAULT_COLORS
 179         ," -a       invoke assume_default_colors, repeat to use in init_pair"
 180 #endif
 181         ," -b XXX   specify background color"
 182 #if HAVE_USE_DEFAULT_COLORS
 183         ," -d       invoke use_default_colors, repeat to use in init_pair"
 184 #endif
 185         ," -f XXX   specify foreground color"
 186         ," -l FILE  log window-dumps to this file"
 187         ," -w       fill background with stipple pattern"
 188         ," -W CODE  fill background with this Unicode value"
 189     };
 190     size_t n;
 191
 192     for (n = 0; n < SIZEOF(msg); n++)
 193         fprintf(stderr, "%s\n", msg[n]);
 194
 195     ExitProgram(EXIT_FAILURE);
 196 }
 197
 198 int
 199 main(int argc GCC_UNUSED, char *argv[]GCC_UNUSED)
 200 {
 201 #if HAVE_ASSUME_DEFAULT_COLORS
 202     int a_option = 0;
 203 #endif
 204 #if HAVE_USE_DEFAULT_COLORS
 205     int d_option = 0;
 206 #endif
 207     int n;
 208
 209     setlocale(LC_ALL, "");
 210
 211     while ((n = getopt(argc, argv, "ab:df:l:wW:")) != -1) {
 212         switch (n) {
 213 #if HAVE_ASSUME_DEFAULT_COLORS
 214         case 'a':
 215             ++a_option;
 216             break;
 217 #endif
 218         case 'b':
 219             default_bg = color_code(optarg);
 220             break;
 221 #if HAVE_USE_DEFAULT_COLORS
 222         case 'd':
 223             ++d_option;
 224             break;
 225 #endif
 226         case 'f':
 227             default_fg = color_code(optarg);
 228             break;
 229         case 'l':
 230             if (!open_dump(optarg))
 231                 usage();
 232             break;
 233         case 'w':
 234             wide_fill = L'\u2591';
 235             break;
 236         case 'W':
 237             wide_fill = decode_wchar(optarg);
 238             break;
 239         default:
 240             usage();
 241         }
 242     }
 243 #if HAVE_USE_DEFAULT_COLORS && HAVE_ASSUME_DEFAULT_COLORS
 244     if (a_option && d_option) {
 245         fprintf(stderr, "Use either -a or -d option, but not both\n");
 246         ExitProgram(EXIT_FAILURE);
 247     }
 248 #endif
 249
 250     initscr();
 251     cbreak();
 252     noecho();
 253
 254     if (has_colors()) {
 255         start_color();
 256
 257 #if HAVE_USE_DEFAULT_COLORS
 258         if (d_option) {
 259             printw("Using default colors...\n");
 260             use_default_colors();
 261             if (d_option > 1) {
 262                 default_fg = -1;
 263                 default_bg = -1;
 264             }
 265         }
 266 #endif
 267 #if HAVE_ASSUME_DEFAULT_COLORS
 268         if (a_option) {
 269             printw("Using assumed colors %s/%s...\n",
 270                    color_name(default_fg),
 271                    color_name(default_bg));
 272             assume_default_colors(default_fg, default_bg);
 273             if (a_option > 1) {
 274                 default_fg = -1;
 275                 default_bg = -1;
 276             }
 277         }
 278 #endif
 279
 280         test_background();
 281
 282     } else {
 283         printw("This demo requires a color terminal");
 284         getch();
 285     }
 286     endwin();
 287     close_dump();
 288     ExitProgram(EXIT_SUCCESS);
 289 }
 290
 291 #else
 292 int
 293 main(void)
 294 {
 295     printf("This program requires the wide-curses library\n");
 296     ExitProgram(EXIT_FAILURE);
 297 }
 298 #endif /* USE_WIDEC_SUPPORT */