ncurses 6.1 - patch 20180127
[ncurses.git] / test / demo_termcap.c
index 30967cc0f4548d3d3b87f9568edb8704df9ace31..e252d1d9814400f1c75dc49547eb2223c5a9ee2a 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
 /****************************************************************************
- * Copyright (c) 2005-2013,2014 Free Software Foundation, Inc.              *
+ * Copyright (c) 2005-2016,2017 Free Software Foundation, Inc.              *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
@@ -29,7 +29,7 @@
 /*
  * Author: Thomas E. Dickey
  *
 /*
  * Author: Thomas E. Dickey
  *
- * $Id: demo_termcap.c,v 1.45 2014/09/05 08:44:49 tom Exp $
+ * $Id: demo_termcap.c,v 1.56 2017/12/26 22:41:47 tom Exp $
  *
  * A simple demo of the termcap interface.
  */
  *
  * A simple demo of the termcap interface.
  */
 #endif
 #endif
 
 #endif
 #endif
 
+#if defined(NCURSES_VERSION) && HAVE_TERMCAP_H
+#include <termcap.h>
+#endif
+
+static void failed(const char *) GCC_NORETURN;
+
 static void
 failed(const char *msg)
 {
 static void
 failed(const char *msg)
 {
@@ -68,8 +74,10 @@ static bool b_opt = FALSE;
 static bool n_opt = FALSE;
 static bool s_opt = FALSE;
 static bool q_opt = FALSE;
 static bool n_opt = FALSE;
 static bool s_opt = FALSE;
 static bool q_opt = FALSE;
+#ifdef NCURSES_VERSION
 static bool x_opt = FALSE;
 static bool y_opt = FALSE;
 static bool x_opt = FALSE;
 static bool y_opt = FALSE;
+#endif
 
 static char *d_opt;
 static char *e_opt;
 
 static char *d_opt;
 static char *e_opt;
@@ -94,8 +102,9 @@ static long total_s_values;
 static char *
 make_dbitem(char *p, char *q)
 {
 static char *
 make_dbitem(char *p, char *q)
 {
-    char *result = malloc(strlen(e_opt) + 2 + (size_t) (p - q));
-    sprintf(result, "%s=%.*s", e_opt, (int) (p - q), q);
+    size_t need = strlen(e_opt) + 2 + (size_t) (p - q);
+    char *result = malloc(need);
+    _nc_SPRINTF(result, _nc_SLIMIT(need) "%s=%.*s", e_opt, (int) (p - q), q);
     return result;
 }
 
     return result;
 }
 
@@ -150,6 +159,7 @@ next_dbitem(void)
     return result;
 }
 
     return result;
 }
 
+#if NO_LEAKS
 static void
 free_dblist(void)
 {
 static void
 free_dblist(void)
 {
@@ -161,6 +171,73 @@ free_dblist(void)
        db_list = 0;
     }
 }
        db_list = 0;
     }
 }
+#endif /* NO_LEAKS */
+
+static void
+show_string(const char *name, const char *value)
+{
+    printf(FNAME(str), name);
+    if (value == ((char *) -1)) {
+       printf("CANCELLED");
+    } else if (value == ((char *) 0)) {
+       printf("ABSENT");
+    } else {
+       while (*value != 0) {
+           int ch = UChar(*value++);
+           switch (ch) {
+           case '\177':
+               fputs("^?", stdout);
+               break;
+           case '\033':
+               fputs("\\E", stdout);
+               break;
+           case '\b':
+               fputs("\\b", stdout);
+               break;
+           case '\f':
+               fputs("\\f", stdout);
+               break;
+           case '\n':
+               fputs("\\n", stdout);
+               break;
+           case '\r':
+               fputs("\\r", stdout);
+               break;
+           case ' ':
+               fputs("\\s", stdout);
+               break;
+           case '\t':
+               fputs("\\t", stdout);
+               break;
+           case '^':
+               fputs("\\^", stdout);
+               break;
+           case ':':
+               fputs("\\072", stdout);
+               break;
+           case '\\':
+               fputs("\\\\", stdout);
+               break;
+           default:
+               if (isgraph(ch))
+                   fputc(ch, stdout);
+               else if (ch < 32)
+                   printf("^%c", ch + '@');
+               else
+                   printf("\\%03o", ch);
+               break;
+           }
+       }
+    }
+    printf("\n");
+}
+
+static void
+show_number(const char *name, int value)
+{
+    printf(FNAME(num), name);
+    printf(" %d\n", value);
+}
 
 static void
 dumpit(NCURSES_CONST char *cap)
 
 static void
 dumpit(NCURSES_CONST char *cap)
@@ -184,61 +261,13 @@ dumpit(NCURSES_CONST char *cap)
             * Note that the strings returned are mostly terminfo format, since
             * ncurses does not convert except for a handful of special cases.
             */
             * Note that the strings returned are mostly terminfo format, since
             * ncurses does not convert except for a handful of special cases.
             */
-           printf(FNAME(str), cap);
-           while (*str != 0) {
-               int ch = UChar(*str++);
-               switch (ch) {
-               case '\177':
-                   fputs("^?", stdout);
-                   break;
-               case '\033':
-                   fputs("\\E", stdout);
-                   break;
-               case '\b':
-                   fputs("\\b", stdout);
-                   break;
-               case '\f':
-                   fputs("\\f", stdout);
-                   break;
-               case '\n':
-                   fputs("\\n", stdout);
-                   break;
-               case '\r':
-                   fputs("\\r", stdout);
-                   break;
-               case ' ':
-                   fputs("\\s", stdout);
-                   break;
-               case '\t':
-                   fputs("\\t", stdout);
-                   break;
-               case '^':
-                   fputs("\\^", stdout);
-                   break;
-               case ':':
-                   fputs("\\072", stdout);
-                   break;
-               case '\\':
-                   fputs("\\\\", stdout);
-                   break;
-               default:
-                   if (isgraph(ch))
-                       fputc(ch, stdout);
-                   else if (ch < 32)
-                       printf("^%c", ch + '@');
-                   else
-                       printf("\\%03o", ch);
-                   break;
-               }
-           }
-           printf("\n");
+           show_string(cap, str);
        }
     } else if ((num = tgetnum(cap)) >= 0) {
        total_values++;
        total_n_values++;
        if (!q_opt) {
        }
     } else if ((num = tgetnum(cap)) >= 0) {
        total_values++;
        total_n_values++;
        if (!q_opt) {
-           printf(FNAME(num), cap);
-           printf(" %d\n", num);
+           show_number(cap, num);
        }
     } else if (tgetflag(cap) > 0) {
        total_values++;
        }
     } else if (tgetflag(cap) > 0) {
        total_values++;
@@ -334,7 +363,7 @@ demo_termcap(NCURSES_CONST char *name)
 #ifdef NCURSES_VERSION
        if (x_opt && (my_blob == 0) && y_opt) {
 #if NCURSES_XNAMES
 #ifdef NCURSES_VERSION
        if (x_opt && (my_blob == 0) && y_opt) {
 #if NCURSES_XNAMES
-           TERMTYPE *term = &(cur_term->type);
+           TERMTYPE *term = (TERMTYPE *) cur_term;
            if (term != 0
                && ((NUM_BOOLEANS(term) != BOOLCOUNT)
                    || (NUM_NUMBERS(term) != NUMCOUNT)
            if (term != 0
                && ((NUM_BOOLEANS(term) != BOOLCOUNT)
                    || (NUM_NUMBERS(term) != NUMCOUNT)
@@ -405,6 +434,7 @@ parse_description(const char *input_name)
     if ((fp = fopen(input_name, "r")) == 0)
        failed("cannot open input-file");
     len = fread(my_blob, sizeof(char), (size_t) sb.st_size, fp);
     if ((fp = fopen(input_name, "r")) == 0)
        failed("cannot open input-file");
     len = fread(my_blob, sizeof(char), (size_t) sb.st_size, fp);
+    my_blob[sb.st_size] = '\0';
     fclose(fp);
 
     /*
     fclose(fp);
 
     /*
@@ -674,7 +704,7 @@ copy_code_list(NCURSES_CONST char *const *list)
                length += chunk;
            } else {
                result[count] = unused;
                length += chunk;
            } else {
                result[count] = unused;
-               strcpy(unused, list[count]);
+               _nc_STRCPY(unused, list[count], length);
                unused += chunk;
            }
        }
                unused += chunk;
            }
        }
@@ -689,7 +719,18 @@ copy_code_list(NCURSES_CONST char *const *list)
 
     return result;
 }
 
     return result;
 }
-#endif
+
+#if NO_LEAKS
+static void
+free_code_list(char **list)
+{
+    if (list) {
+       free(list[0]);
+       free(list);
+    }
+}
+#endif /* NO_LEAKS */
+#endif /* USE_CODE_LISTS */
 
 static void
 usage(void)
 
 static void
 usage(void)
@@ -711,6 +752,7 @@ usage(void)
        " -q       quiet (prints only counts)",
        " -r COUNT repeat for given count",
        " -s       print string-capabilities",
        " -q       quiet (prints only counts)",
        " -r COUNT repeat for given count",
        " -s       print string-capabilities",
+       " -v       print termcap-variables",
 #ifdef NCURSES_VERSION
        " -x       print extended capabilities",
 #endif
 #ifdef NCURSES_VERSION
        " -x       print extended capabilities",
 #endif
@@ -728,12 +770,15 @@ main(int argc, char *argv[])
     int n;
     char *name;
     bool a_opt = FALSE;
     int n;
     char *name;
     bool a_opt = FALSE;
+#if defined(NCURSES_VERSION) || defined(HAVE_CURSES_DATA_OSPEED)
+    bool v_opt = FALSE;
+#endif
     char *input_name = 0;
 
     int repeat;
     int r_opt = 1;
 
     char *input_name = 0;
 
     int repeat;
     int r_opt = 1;
 
-    while ((n = getopt(argc, argv, "abd:e:i:nqr:sxy")) != -1) {
+    while ((n = getopt(argc, argv, "abd:e:i:nqr:svxy")) != -1) {
        switch (n) {
        case 'a':
            a_opt = TRUE;
        switch (n) {
        case 'a':
            a_opt = TRUE;
@@ -763,6 +808,12 @@ main(int argc, char *argv[])
        case 's':
            s_opt = TRUE;
            break;
        case 's':
            s_opt = TRUE;
            break;
+#if defined(NCURSES_VERSION) || defined(HAVE_CURSES_DATA_OSPEED)
+       case 'v':
+           v_opt = TRUE;
+           break;
+#endif
+#ifdef NCURSES_VERSION
 #if NCURSES_XNAMES
        case 'x':
            x_opt = TRUE;
 #if NCURSES_XNAMES
        case 'x':
            x_opt = TRUE;
@@ -771,6 +822,7 @@ main(int argc, char *argv[])
            y_opt = TRUE;
            x_opt = TRUE;
            break;
            y_opt = TRUE;
            x_opt = TRUE;
            break;
+#endif
 #endif
        default:
            usage();
 #endif
        default:
            usage();
@@ -835,7 +887,23 @@ main(int argc, char *argv[])
     printf("%ld values (%ld booleans, %ld numbers, %ld strings)\n",
           total_values, total_b_values, total_n_values, total_s_values);
 
     printf("%ld values (%ld booleans, %ld numbers, %ld strings)\n",
           total_values, total_b_values, total_n_values, total_s_values);
 
+#if defined(NCURSES_VERSION) || defined(HAVE_CURSES_DATA_OSPEED)
+    if (v_opt) {
+       show_number("PC", PC);
+       show_string("UP", UP);
+       show_string("BC", BC);
+       show_number("ospeed", (int) ospeed);
+    }
+#endif
+
+#if NO_LEAKS
     free_dblist();
     free_dblist();
+#if USE_CODE_LISTS
+    free_code_list(my_boolcodes);
+    free_code_list(my_numcodes);
+    free_code_list(my_strcodes);
+#endif
+#endif /* NO_LEAKS */
 
     ExitProgram(EXIT_SUCCESS);
 }
 
     ExitProgram(EXIT_SUCCESS);
 }