date and time created 83/06/27 13:57:00 by sam

SCCS-vsn: lib/libterm/TEST/tc2.c 4.1

diff --git a/usr/src/lib/libterm/TEST/tc2.c b/usr/src/lib/libterm/TEST/tc2.c
new file mode 100644 (file)
index 0000000..935f697
--- /dev/null
+++ b/usr/src/lib/libterm/TEST/tc2.c
@@ -0,0 +1,51 @@
+#ifndef lint
+static char sccsid[] = "@(#)tc2.c      4.1 (Berkeley) %G%";
+#endif
+
+/*
+ * tc2 [term]
+ * Dummy program to test out termlib.
+ * Commands are "tcc\n" where t is type (s for string, f for flag,
+ * or n for number) and cc is the name of the capability.
+ */
+#include <stdio.h>
+char buf[1024];
+char *getenv(), *tgetstr();
+
+main(argc, argv) char **argv; {
+       char *p, *q;
+       int rc;
+       char b[3], c;
+       char area[200];
+
+       if (argc < 2)
+               p = getenv("TERM");
+       else
+               p = argv[1];
+       rc = tgetent(buf,p);
+       for (;;) {
+               c = getchar();
+               if (c < 0)
+                       exit(0);
+               b[0] = getchar();
+               if (b[0] < ' ')
+                       exit(0);
+               b[1] = getchar();
+               b[2] = 0;
+               getchar();
+               switch(c) {
+                       case 'f':
+                               printf("%s: %d\n",b,tgetflag(b));
+                               break;
+                       case 'n':
+                               printf("%s: %d\n",b,tgetnum(b));
+                               break;
+                       case 's':
+                               q = area;
+                               printf("%s: %s\n",b,tgetstr(b,&q));
+                               break;
+                       default:
+                               exit(0);
+               }
+       }
+}