tests/test-terminfo.c

   1 /* Ad-hoc testing program for <termcap.h>.
   2    Copyright (C) 2022-2024 Free Software Foundation, Inc.
   3
   4    This program is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation, either version 3 of the License, or
   7    (at your option) any later version.
   8
   9    This program is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12    GNU General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
  16
  17 #include <config.h>
  18
  19 /* Specification.  */
  20 #include "terminfo.h"
  21
  22 #include <stdio.h>
  23 /* Get getenv().  */
  24 #include <stdlib.h>
  25 /* Get STDOUT_FILENO.  */
  26 #include <unistd.h>
  27
  28 int
  29 main (int argc, char *argv[])
  30 {
  31   const char *underline_on = NULL;
  32   const char *underline_off = NULL;
  33   const char *bold_on = NULL;
  34   const char *invert_on = NULL;
  35   const char *attributes_off = NULL;
  36
  37   {
  38     const char *term = getenv ("TERM");
  39     if (term != NULL && *term != '\0')
  40       {
  41         #if HAVE_TERMINFO
  42         int err = 1;
  43         if (setupterm (term, STDOUT_FILENO, &err) == 0 || err == 1)
  44           {
  45             underline_on = tigetstr ("smul");
  46             underline_off = tigetstr ("rmul");
  47             bold_on = tigetstr ("bold");
  48             invert_on = tigetstr ("rev");
  49             attributes_off = tigetstr ("sgr0");
  50           }
  51         #elif HAVE_TERMCAP
  52         static char tbuf[2048];
  53         if (tgetent (tbuf, term) > 0)
  54           {
  55             underline_on = tgetstr ("us", NULL);
  56             underline_off = tgetstr ("ue", NULL);
  57             bold_on = tgetstr ("md", NULL);
  58             invert_on = tgetstr ("mr", NULL);
  59             attributes_off = tgetstr ("me", NULL);
  60           }
  61         #endif
  62       }
  63   }
  64
  65   if (bold_on) tputs (bold_on, 1, putchar);
  66   printf ("#include");
  67   if (attributes_off) tputs (attributes_off, 1, putchar);
  68   printf (" <stdio.h>\n");
  69   if (underline_on) tputs (underline_on, 1, putchar);
  70   printf ("int");
  71   if (underline_off) tputs (underline_off, 1, putchar);
  72   printf ("\n");
  73   if (invert_on) tputs (invert_on, 1, putchar);
  74   printf ("main");
  75   if (attributes_off) tputs (attributes_off, 1, putchar);
  76   printf (" ()\n");
  77   printf ("{\n");
  78   printf ("  printf (\"Hello world\\n\");\n");
  79   printf ("  ");
  80   if (bold_on) tputs (bold_on, 1, putchar);
  81   printf ("return");
  82   if (attributes_off) tputs (attributes_off, 1, putchar);
  83   printf (" 0;\n");
  84   printf ("}\n");
  85
  86   return 0;
  87 }