/*
* VT220 and higher implement the 22, 24, 25 and 27 codes.
* VT510 implements concealed text.
*
* ISO 6429 specifies additional SGR codes so that one needn't use SGR 0
* to reset everything before switching, e.g., set/clear pairs are
* bold 1/22
* faint 2/22
* italics 3/23
* underline 4/24
* blink 5/25
* inverse 7/27
* concealed 8/28
*/
static int
test_iso_6429_sgr(MENU_ARGS)
{
set_test_colors();
ed(2);
/* *INDENT-OFF* */
cup( 1,20); printf("Extended/Graphic rendition test pattern:");
cup( 4, 1); c_sgr("0"); printf("vanilla");
cup( 4,40); c_sgr("0;1"); printf("bold");
cup( 6, 6); c_sgr("22;4"); printf("underline");
cup( 6,45); c_sgr("24;1;4"); printf("bold underline");
cup( 8, 1); c_sgr("22;24;5"); printf("blink");
cup( 8,40); c_sgr("25;5;1"); printf("bold blink");
cup(10, 6); c_sgr("22;4;5"); printf("underline blink");
cup(10,45); c_sgr("24;25;1;4;5"); printf("bold underline blink");
cup(12, 1); c_sgr("22;24;25;7"); printf("negative");
cup(12,40); c_sgr("1"); printf("bold negative");
cup(14, 6); c_sgr("22;4;7"); printf("underline negative");
cup(14,45); c_sgr("1;4;7"); printf("bold underline negative");
cup(16, 1); c_sgr("22;24;5;7"); printf("blink negative");
cup(16,40); c_sgr("1"); printf("bold blink negative");
cup(18, 6); c_sgr("22;4"); printf("underline blink negative");
cup(18,45); c_sgr("1"); printf("bold underline blink negative");
cup(20, 6); c_sgr(""); set_foreground(9); printf("original foreground");
cup(20,45); c_sgr(""); set_background(9); printf("original background");
cup(22, 1); c_sgr(";8"); printf("concealed");
cup(22,40); c_sgr("8;7"); printf("concealed negative");
/* *INDENT-ON* */
c_sgr(""); /* same as c_sgr("0") */
printf(" <- concealed text");
decscnm(FALSE); /* Inverse video off */
cup(max_lines - 1, 1);
el(0);
printf("Dark background. ");
holdit();
decscnm(TRUE); /* Inverse video */
cup(max_lines - 1, 1);
el(0);
printf("Light background. ");
holdit();
decscnm(FALSE);
cup(max_lines - 1, 1);
el(0);
printf("Dark background. ");
holdit();
reset_colors();
return MENU_NOHOLD;
}
void
bye(void)
{
/* Force my personal prejudices upon the poor luser */
if (LOG_ENABLED)
fprintf(log_fp, "Cleanup & exit\n");
default_level(); /* Enter ANSI mode (if in VT52 mode) */
decckm(FALSE); /* cursor keys normal */
deccolm(FALSE); /* 80 col mode */
decscnm(FALSE); /* Normal screen */
decom(FALSE); /* Absolute origin mode */
decawm(TRUE); /* Wrap around on */
decarm(TRUE); /* Auto repeat on */
decstbm(0, 0); /* No scroll region */
sgr("0"); /* Normal character attributes */
/* Say goodbye */
vt_clear(2);
vt_move(12, 30);
printf("That's all, folks!\n");
printf("\n\n\n");
inflush();
close_tty();
exit(EXIT_SUCCESS);
}
/* Graphic rendition requires special handling with color, since SGR-0
* is supposed to reset the colors as well.
*/
static void
show_graphic_rendition(void)
{
ed(2);
/* *INDENT-OFF* */
cup( 1,20); printf("Color/Graphic rendition test pattern:");
cup( 4, 1); c_sgr("0"); printf("vanilla");
cup( 4,40); c_sgr("0;1"); printf("bold");
cup( 6, 6); c_sgr(";4"); printf("underline");
cup( 6,45); c_sgr(";1");c_sgr("4");printf("bold underline");
cup( 8, 1); c_sgr("0;5"); printf("blink");
cup( 8,40); c_sgr("0;5;1"); printf("bold blink");
cup(10, 6); c_sgr("0;4;5"); printf("underline blink");
cup(10,45); c_sgr("0;1;4;5"); printf("bold underline blink");
cup(12, 1); c_sgr("1;4;5;0;7"); printf("negative");
cup(12,40); c_sgr("0;1;7"); printf("bold negative");
cup(14, 6); c_sgr("0;4;7"); printf("underline negative");
cup(14,45); c_sgr("0;1;4;7"); printf("bold underline negative");
cup(16, 1); c_sgr("1;4;;5;7"); printf("blink negative");
cup(16,40); c_sgr("0;1;5;7"); printf("bold blink negative");
cup(18, 6); c_sgr("0;4;5;7"); printf("underline blink negative");
cup(18,45); c_sgr("0;1;4;5;7"); printf("bold underline blink negative");
cup(20, 6); c_sgr(""); set_foreground(9); printf("original foreground");
cup(20,45); c_sgr(""); set_background(9); printf("original background");
/* *INDENT-ON* */
c_sgr(""); /* same as c_sgr("0") */
decscnm(FALSE); /* Inverse video off */
cup(max_lines - 1, 1);
el(0);
printf("Dark background. ");
holdit();
decscnm(TRUE); /* Inverse video */
cup(max_lines - 1, 1);
el(0);
printf("Light background. ");
holdit();
decscnm(FALSE);
}
int
bug_f(MENU_ARGS)
{
/*
* VT100 "toggle origin mode, forget rest" bug. If you try to set
* (or clear) parameters and one of them is the "origin mode"
* ("?6") parameter, parameters that appear after the "?6"
* remain unaffected. This is also true on CIT-101 terminals.
*/
decscnm(TRUE); /* Set reverse mode */
deccolm(TRUE); /* Set 132 column mode */
println("Test VT100 'Toggle origin mode, forget rest' bug, part 1.");
printf("The screen should be in reverse, %d column mode.\n", max_cols);
holdit();
ed(2);
rm("?6;5;3"); /* Reset (origin, reverse, 132 col) */
println("Test VT100 'Toggle origin mode, forget rest' bug, part 2.\n");
printf("The screen should be in non-reverse, %d column mode.\n", min_cols);
return MENU_HOLD;
}
/* Set up my personal prejudices */
int
setup_terminal(MENU_ARGS)
{
if (LOG_ENABLED)
fprintf(log_fp, "Setup Terminal with test-defaults\n");
default_level(); /* Enter ANSI mode (if in VT52 mode) */
decckm(FALSE); /* cursor keys normal */
deccolm(FALSE); /* 80 col mode */
decsclm(FALSE); /* Jump scroll */
decscnm(FALSE); /* Normal screen */
decom(FALSE); /* Absolute origin mode */
decawm(TRUE); /* Wrap around on */
decarm(FALSE); /* Auto repeat off */
sm("?40"); /* Enable 80/132 switch (xterm) */
rm("?45"); /* Disable reverse wrap (xterm) */
decstbm(0, 0); /* No scroll region */
sgr("0"); /* Normal character attributes */
return MENU_NOHOLD;
}
int
tst_screen(MENU_ARGS)
{
/* Test of:
- DECSTBM (Set Top and Bottom Margins)
- TBC (Tabulation Clear)
- HTS (Horizontal Tabulation Set)
- SM RM (Set/Reset mode): - 80/132 chars
. - Origin: Relative/absolute
. - Scroll: Smooth/jump
. - Wraparound
- SGR (Select Graphic Rendition)
- SM RM (Set/Reset Mode) - Inverse
- DECSC (Save Cursor)
- DECRC (Restore Cursor)
*/
int i, j, cset, row, col, background;
static const char *tststr = "*qx`";
static const char *attr[5] =
{
";0", ";1", ";4", ";5", ";7"
};
set_tty_crmod(TRUE); /* want to disable tab/space conversion */
cup(1, 1);
decawm(TRUE); /* DECAWM: Wrap Around ON */
for (col = 1; col <= min_cols * 2; col++)
printf("*");
decawm(FALSE); /* DECAWM: Wrap Around OFF */
cup(3, 1);
for (col = 1; col <= min_cols * 2; col++)
printf("*");
decawm(TRUE); /* DECAWM: Wrap Around ON */
cup(5, 1);
println("This should be three identical lines of *'s completely filling");
println("the top of the screen without any empty lines between.");
println("(Test of WRAP AROUND mode setting.)");
holdit();
ed(2);
tbc(3);
cup(1, 1);
for (col = 1; col <= min_cols - 2; col += 3) {
cuf(3);
hts();
}
cup(1, 4);
for (col = 4; col <= min_cols - 2; col += 6) {
tbc(0);
cuf(6);
}
cup(1, 7);
tbc(1);
tbc(2); /* no-op */
cup(1, 1);
for (col = 1; col <= min_cols - 2; col += 6)
printf("%c*", TAB);
cup(2, 2);
for (col = 2; col <= min_cols - 2; col += 6)
printf(" *");
cup(4, 1);
println("Test of TAB setting/resetting. These two lines");
printf("should look the same. ");
holdit();
for (background = 0; background <= 1; background++) {
if (background)
decscnm(FALSE);
else
decscnm(TRUE);
deccolm(TRUE); /* 132 cols */
ed(2); /* VT100 clears screen on SM3/RM3, but not obviously, so... */
cup(1, 1);
tbc(3);
for (col = 1; col <= max_cols; col += TABWIDTH) {
cuf(TABWIDTH);
hts();
}
cup(1, 1);
for (col = 1; col <= max_cols; col += 10)
printf("%.*s", (max_cols > col) ? (max_cols - col) : 10, "1234567890");
for (row = 3; row <= 20; row++) {
cup(row, row);
printf("This is %d column mode, %s background.", max_cols,
background ? "dark" : "light");
}
holdit();
deccolm(FALSE); /* 80 cols */
ed(2); /* VT100 clears screen on SM3/RM3, but not obviously, so... */
cup(1, 1);
for (col = 1; col <= min_cols; col += 10)
printf("%.*s", (min_cols > col) ? (min_cols - col) : 10, "1234567890");
for (row = 3; row <= 20; row++) {
cup(row, row);
printf("This is %d column mode, %s background.", min_cols,
background ? "dark" : "light");
}
holdit();
}
do_scrolling();
ed(2);
decstbm(max_lines - 1, max_lines);
printf(
"\nOrigin mode test. This line should be at the bottom of the screen.");
cup(1, 1);
printf("%s",
"This line should be the one above the bottom of the screen. ");
holdit();
ed(2);
decom(FALSE); /* Origin mode (absolute) */
cup(max_lines, 1);
printf(
"Origin mode test. This line should be at the bottom of the screen.");
cup(1, 1);
printf("%s", "This line should be at the top of the screen. ");
holdit();
decstbm(1, max_lines);
ed(2);
/* *INDENT-OFF* */
cup( 1,20); printf("Graphic rendition test pattern:");
cup( 4, 1); sgr("0"); printf("vanilla");
cup( 4,40); sgr("0;1"); printf("bold");
cup( 6, 6); sgr(";4"); printf("underline");
cup( 6,45);sgr(";1");sgr("4");printf("bold underline");
cup( 8, 1); sgr("0;5"); printf("blink");
cup( 8,40); sgr("0;5;1"); printf("bold blink");
cup(10, 6); sgr("0;4;5"); printf("underline blink");
cup(10,45); sgr("0;1;4;5"); printf("bold underline blink");
cup(12, 1); sgr("1;4;5;0;7"); printf("negative");
cup(12,40); sgr("0;1;7"); printf("bold negative");
cup(14, 6); sgr("0;4;7"); printf("underline negative");
cup(14,45); sgr("0;1;4;7"); printf("bold underline negative");
cup(16, 1); sgr("1;4;;5;7"); printf("blink negative");
cup(16,40); sgr("0;1;5;7"); printf("bold blink negative");
cup(18, 6); sgr("0;4;5;7"); printf("underline blink negative");
cup(18,45); sgr("0;1;4;5;7"); printf("bold underline blink negative");
/* *INDENT-ON* */
sgr("");
decscnm(FALSE); /* Inverse video off */
cup(max_lines - 1, 1);
el(0);
printf("Dark background. ");
holdit();
decscnm(TRUE); /* Inverse video */
cup(max_lines - 1, 1);
el(0);
printf("Light background. ");
holdit();
decscnm(FALSE);
ed(2);
/* *INDENT-OFF* */
cup(8,12); printf("normal");
cup(8,24); printf("bold");
cup(8,36); printf("underscored");
cup(8,48); printf("blinking");
cup(8,60); printf("reversed");
cup(10,1); printf("stars:");
cup(12,1); printf("line:");
cup(14,1); printf("x'es:");
cup(16,1); printf("diamonds:");
/* *INDENT-ON* */
for (cset = 0; cset <= 3; cset++) {
for (i = 0; i <= 4; i++) {
cup(10 + 2 * cset, 12 + 12 * i);
sgr(attr[i]);
if (cset == 0 || cset == 2)
scs_normal();
else
scs_graphics();
for (j = 0; j <= 4; j++) {
printf("%c", tststr[cset]);
}
decsc();
cup(cset + 1, i + 1);
sgr("");
scs_normal();
printf("A");
decrc();
for (j = 0; j <= 4; j++) {
printf("%c", tststr[cset]);
}
}
}
sgr("0");
scs_normal();
cup(21, 1);
println("Test of the SAVE/RESTORE CURSOR feature. There should");
println("be ten characters of each flavour, and a rectangle");
println("of 5 x 4 A's filling the top left of the screen.");
restore_ttymodes();
return MENU_HOLD;
}
