summaryrefslogtreecommitdiff
path: root/usr/src/lib/libcurses/screen/print.c
diff options
context:
space:
mode:
Diffstat (limited to 'usr/src/lib/libcurses/screen/print.c')
-rw-r--r--usr/src/lib/libcurses/screen/print.c712
1 files changed, 712 insertions, 0 deletions
diff --git a/usr/src/lib/libcurses/screen/print.c b/usr/src/lib/libcurses/screen/print.c
new file mode 100644
index 0000000000..870515a0e3
--- /dev/null
+++ b/usr/src/lib/libcurses/screen/print.c
@@ -0,0 +1,712 @@
+/*
+ * CDDL HEADER START
+ *
+ * The contents of this file are subject to the terms of the
+ * Common Development and Distribution License, Version 1.0 only
+ * (the "License"). You may not use this file except in compliance
+ * with the License.
+ *
+ * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
+ * or http://www.opensolaris.org/os/licensing.
+ * See the License for the specific language governing permissions
+ * and limitations under the License.
+ *
+ * When distributing Covered Code, include this CDDL HEADER in each
+ * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
+ * If applicable, add the following below this CDDL HEADER, with the
+ * fields enclosed by brackets "[]" replaced with your own identifying
+ * information: Portions Copyright [yyyy] [name of copyright owner]
+ *
+ * CDDL HEADER END
+ */
+/*
+ * Copyright 2001 Sun Microsystems, Inc. All rights reserved.
+ * Use is subject to license terms.
+ */
+
+/* Copyright (c) 1988 AT&T */
+/* All Rights Reserved */
+
+/*
+ * University Copyright- Copyright (c) 1982, 1986, 1988
+ * The Regents of the University of California
+ * All Rights Reserved
+ *
+ * University Acknowledgment- Portions of this document are derived from
+ * software developed by the University of California, Berkeley, and its
+ * contributors.
+ */
+
+#pragma ident "%Z%%M% %I% %E% SMI"
+
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+#include "curses_inc.h"
+#include "print.h"
+#include <signal.h> /* use this file to determine if this is SVR4.0 system */
+
+#ifdef SIGSTOP /* SVR4.0 and beyond */
+#define _ULIBTI "/usr/share/lib/terminfo"
+#else
+#define _ULIBTI "/usr/lib/terminfo"
+#endif
+
+char *progname;
+
+/* global variables */
+static enum printtypes printing = pr_none;
+static int onecolumn = 0; /* print a single column */
+static int width = 60; /* width of multi-column printing */
+static int restrictterm = 1; /* restrict termcap names */
+
+/* local variables */
+static int printed = 0;
+static size_t caplen = 0;
+
+void
+pr_init(enum printtypes type)
+{
+ printing = type;
+}
+
+void
+pr_onecolumn(int onoff)
+{
+ onecolumn = onoff;
+}
+
+void
+pr_width(int nwidth)
+{
+ if (nwidth > 0)
+ width = nwidth;
+}
+
+void
+pr_caprestrict(int onoff)
+{
+ restrictterm = onoff;
+}
+
+static char capbools[] =
+ "ambsbwdadbeoeshchshzinkmmimsncnsosptulxbxnxoxsxt";
+static int ncapbools = sizeof (capbools) / sizeof (capbools[0]);
+
+static char capnums[] =
+ "codBdCdFdNdTknlipbsgug";
+static int ncapnums = sizeof (capnums) / sizeof (capnums[0]);
+
+static char capstrs[] =
+ "ALDCDLDOICLERISFSRUPaealasbcbtcdcechclcmcsctcvdcdldmdsedeifshoi1i2i"
+ "cifimipisk0k1k2k3k4k5k6k7k8k9kbkdkekhklkokrkskul0l1l2l3l4l5l6l7l"
+ "8l9ndnlpcr1r2r3rcrfrpscsesosrsttetitsucueupusvbvevivs";
+static int ncapstrs = sizeof (capstrs) / sizeof (capstrs[0]);
+
+static int
+findcapname(char *capname, char *caplist, int listsize)
+{
+ int low = 0, mid, high = listsize - 2;
+ while (low <= high) {
+ mid = (low + high) / 4 * 2;
+ if (capname[0] == caplist[mid]) {
+ if (capname[1] == caplist[mid + 1])
+ return (1);
+ else if (capname[1] < caplist[mid + 1])
+ high = mid - 2;
+ else
+ low = mid + 2;
+ } else if (capname[0] < caplist[mid])
+ high = mid - 2;
+ else
+ low = mid + 2;
+ }
+ return (0);
+/*
+ * for (; *caplist; caplist += 2)
+ * if (caplist[0] == capname[0] && caplist[1] == capname[1])
+ * return (1);
+ * return (0);
+ */
+}
+
+/*
+ * Print out the first line of an entry.
+ */
+void
+pr_heading(char *term, char *synonyms)
+{
+ int do_print = 0; /* Can we print the path of the file ? */
+ char buffer[512]; /* Holds search pathname */
+ FILE *work_fp; /* Used to try and open the files */
+ char tail[4]; /* Used for terminfo pathname suffix */
+ char *terminfo; /* The value of $TERMINFO */
+
+
+ /*
+ * Try to obtain $TERMINFO
+ */
+ terminfo = getenv("TERMINFO");
+
+ if (term == (char *)0)
+ term = "";
+ /*
+ * Build the suffix for this device
+ */
+ tail[0] = '/';
+ tail[1] = *term;
+ tail[2] = '/';
+ tail[3] = '\0';
+
+ /*
+ * If we have it - use it, otherwise use /usr/share/lib/terminfo
+ * as base directory
+ */
+ if (terminfo != NULL)
+ (void) sprintf(buffer, "%s%s%s", terminfo, tail, term);
+ else
+ (void) sprintf(buffer, "%s%s%s", _ULIBTI, tail, term);
+
+ /*
+ * Attempt to open the file.
+ */
+ if ((work_fp = fopen(buffer, "r")) == NULL) {
+ /*
+ * Open failed. If we were looking in /usr/share/lib/terminfo
+ * we are done, otherwise look there next.
+ */
+ if (strncmp(buffer, _ULIBTI, strlen(_ULIBTI)) == 0) {
+ /*
+ * We are done. Not in /usr/share/lib/terminfo,
+ * and $TERMINFO is not set.
+ */
+ (void) fprintf(stderr, "Error: Term \"%s\" not "
+ "found in %s\n", term, _ULIBTI);
+ } else {
+ /*
+ * Check /usr/share/lib/terminfo last. If this fails,
+ * all hope is lost as we know it is not in $TERMINFO.
+ */
+ (void) sprintf(buffer, "%s%s%s", _ULIBTI, tail, term);
+
+ if ((work_fp = fopen(buffer, "r")) == NULL) {
+ /*
+ * All hope is lost
+ */
+ (void) fprintf(stderr, "Error: Term \"%s\" not "
+ "found in %s or %s\n", term, _ULIBTI,
+ getenv("TERMINFO"));
+ } else do_print = 1;
+ }
+ } else do_print = 1;
+
+ /*
+ * If we found it - print the comment(after closing the file)
+ */
+ if (do_print && *term) {
+ (void) fclose(work_fp);
+ (void) printf("# Reconstructed via infocmp from file: "
+ "%s\n", buffer);
+ }
+
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("%s,\n", synonyms);
+ break;
+ case (int)pr_cap:
+ (void) printf("%s:\\\n", synonyms);
+ caplen = strlen(synonyms) + 1;
+ break;
+ case (int)pr_longnames:
+ (void) printf("Terminal type %s\n", term);
+ (void) printf(" %s\n", synonyms);
+ break;
+ }
+}
+
+void
+pr_bheading(void)
+{
+ if (printing == pr_longnames)
+ (void) printf("flags\n");
+ printed = 0;
+}
+
+void
+pr_boolean(char *infoname, char *capname, char *fullname, int value)
+{
+ int vlen;
+ size_t nlen;
+
+ if (printing == pr_cap && restrictterm &&
+ !findcapname(capname, capbools, ncapbools))
+ return;
+
+ if (onecolumn) {
+ if (value < 0)
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("\t%s@,\n", infoname);
+ break;
+ case (int)pr_cap:
+ (void) printf("\t:%s@:\\\n", capname);
+ caplen += 4 + strlen(capname);
+ break;
+ case (int)pr_longnames:
+ (void) printf(" %s@\n", fullname);
+ }
+ else
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("\t%s,\n", infoname);
+ break;
+ case (int)pr_cap:
+ (void) printf("\t:%s:\\\n", capname);
+ caplen += 3 + strlen(capname);
+ break;
+ case (int)pr_longnames:
+ (void) printf(" %s\n", fullname);
+ }
+ } else {
+ switch ((int)printing) {
+ case (int)pr_terminfo: nlen = strlen(infoname);
+ break;
+ case (int)pr_cap: nlen = strlen(capname);
+ break;
+ case (int)pr_longnames:
+ nlen = strlen(fullname);
+ break;
+ }
+ vlen = (value < 0) ? 1 : 0;
+ if ((printed > 0) && (printed + nlen + vlen + 1 > width)) {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ case (int)pr_longnames:
+ (void) printf("\n");
+ break;
+ case (int)pr_cap:
+ (void) printf(":\\\n");
+ caplen += 1;
+ }
+ printed = 0;
+ }
+ if (printed == 0) {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("\t");
+ printed = 8;
+ break;
+ case (int)pr_cap:
+ (void) printf("\t:");
+ printed = 9;
+ caplen += 2;
+ break;
+ case (int)pr_longnames:
+ (void) printf(" ");
+ printed = 2;
+ }
+ } else {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ case (int)pr_longnames:
+ (void) printf(" ");
+ break;
+ case (int)pr_cap:
+ (void) printf(":");
+ caplen += 1;
+ }
+ printed++;
+ }
+ if (value < 0)
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("%s@,", infoname);
+ printed += nlen + 2;
+ break;
+ case (int)pr_cap:
+ (void) printf("%s@", capname);
+ printed += nlen + 1;
+ caplen += nlen + 1;
+ break;
+ case (int)pr_longnames:
+ (void) printf("%s@,", fullname);
+ printed += nlen + 2;
+ }
+ else
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("%s,", infoname);
+ printed += nlen + 1;
+ break;
+ case (int)pr_cap:
+ (void) printf("%s", capname);
+ printed += nlen;
+ caplen += nlen;
+ break;
+ case (int)pr_longnames:
+ (void) printf("%s,", fullname);
+ printed += nlen + 1;
+ }
+ }
+}
+
+void
+pr_bfooting(void)
+{
+ if (!onecolumn && (printed > 0))
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ case (int)pr_longnames:
+ (void) printf("\n");
+ break;
+ case (int)pr_cap:
+ (void) printf(":\\\n");
+ caplen += 1;
+ }
+}
+
+void
+pr_nheading(void)
+{
+ if (printing == pr_longnames)
+ (void) printf("\nnumbers\n");
+ printed = 0;
+}
+
+/*
+ * Return the length of the number if it were printed out
+ * with %d. The number is guaranteed to be in the range
+ * 0..maxshort.
+ */
+static int
+digitlen(int value)
+{
+ return (value >= 10000 ? 5 :
+ value >= 1000 ? 4 :
+ value >= 100 ? 3 :
+ value >= 10 ? 2 :
+ value >= 0 ? 1 : 0);
+}
+
+void
+pr_number(char *infoname, char *capname, char *fullname, int value)
+{
+ int vlen;
+ size_t nlen;
+
+ if (printing == pr_cap && restrictterm &&
+ !findcapname(capname, capnums, ncapnums))
+ return;
+
+ if (onecolumn) {
+ if (value < 0)
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("\t%s@,\n", infoname);
+ break;
+ case (int)pr_cap:
+ (void) printf("\t:%s@:\\\n", capname);
+ caplen += 4 + strlen(capname);
+ break;
+ case (int)pr_longnames:
+ (void) printf(" %s @\n", fullname);
+ }
+ else
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("\t%s#%d,\n", infoname,
+ value);
+ break;
+ case (int)pr_cap:
+ (void) printf("\t:%s#%d:\\\n",
+ capname, value);
+ caplen += 4 + strlen(capname) +
+ digitlen(value);
+ break;
+ case (int)pr_longnames:
+ (void) printf(" %s = %d\n", fullname,
+ value);
+ }
+ } else {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ nlen = strlen(infoname);
+ break;
+ case (int)pr_cap:
+ nlen = strlen(capname);
+ break;
+ case (int)pr_longnames:
+ nlen = strlen(fullname);
+ break;
+ }
+ vlen = digitlen(value);
+ if ((printed > 0) && (printed + nlen + vlen + 2 > width)) {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ case (int)pr_longnames:
+ (void) printf("\n");
+ break;
+ case (int)pr_cap:
+ (void) printf(":\\\n");
+ caplen += 1;
+ }
+ printed = 0;
+ }
+ if (printed == 0) {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("\t");
+ printed = 8;
+ break;
+ case (int)pr_cap:
+ (void) printf("\t:");
+ printed = 9;
+ caplen += 2;
+ break;
+ case (int)pr_longnames:
+ (void) printf(" ");
+ printed = 2;
+ }
+ } else {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ case (int)pr_longnames:
+ (void) printf(" ");
+ break;
+ case (int)pr_cap:
+ (void) printf(":");
+ caplen += 1;
+ }
+ printed++;
+ }
+ if (value < 0) {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("%s@,", infoname);
+ printed += nlen + 2;
+ break;
+ case (int)pr_cap:
+ (void) printf("%s@", capname);
+ printed += nlen + 1;
+ caplen += nlen + 1;
+ break;
+ case (int)pr_longnames:
+ (void) printf("%s@,", fullname);
+ printed += nlen + 2;
+ }
+ } else
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("%s#%d,", infoname,
+ value);
+ printed += nlen + vlen + 2;
+ break;
+ case (int)pr_cap:
+ (void) printf("%s#%d", capname, value);
+ printed += nlen + vlen + 1;
+ caplen += nlen + vlen + 1;
+ break;
+ case (int)pr_longnames:
+ (void) printf("%s = %d,", fullname,
+ value);
+ printed += nlen + vlen + 4;
+ }
+ }
+}
+
+void
+pr_nfooting(void)
+{
+ if (!onecolumn && (printed > 0))
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ case (int)pr_longnames:
+ (void) printf("\n");
+ break;
+ case (int)pr_cap:
+ (void) printf(":\\\n");
+ caplen += 1;
+ }
+}
+
+void
+pr_sheading(void)
+{
+ if (printing == pr_longnames)
+ (void) printf("\nstrings\n");
+ printed = 0;
+}
+
+void
+pr_string(char *infoname, char *capname, char *fullname, char *value)
+{
+ char *evalue;
+ int badcapvalue;
+ size_t nlen, vlen;
+
+ if (printing == pr_cap) {
+ if (restrictterm && !findcapname(capname, capstrs, ncapstrs))
+ return;
+ if (value)
+ value = infotocap(value, &badcapvalue);
+ }
+
+ if (onecolumn) {
+ if (value == NULL)
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("\t%s@,\n", infoname);
+ break;
+ case (int)pr_cap:
+ (void) printf("\t:%s@:\\\n", capname);
+ caplen += 4 + strlen(capname);
+ break;
+ case (int)pr_longnames:
+ (void) printf(" %s@\n", fullname);
+ }
+ else
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("\t%s=", infoname);
+ tpr(stdout, value);
+ (void) printf(",\n");
+ break;
+ case (int)pr_cap:
+ (void) printf("\t:%s%s=",
+ badcapvalue ? "." : "", capname);
+ caplen += 3 + strlen(capname) +
+ (badcapvalue ? 1 : 0);
+ caplen += cpr(stdout, value);
+ (void) printf(":\\\n");
+ caplen += 1;
+ break;
+ case (int)pr_longnames:
+ (void) printf(" %s = '", fullname);
+ tpr(stdout, value);
+ (void) printf("'\n");
+ }
+ } else {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ nlen = strlen(infoname);
+ break;
+ case (int)pr_cap:
+ nlen = strlen(capname);
+ if (badcapvalue)
+ nlen++;
+ break;
+ case (int)pr_longnames:
+ nlen = strlen(fullname);
+ }
+ if (value == NULL)
+ vlen = 1;
+ else
+ if (printing == pr_cap)
+ vlen = strlen(evalue = cexpand(value));
+ else
+ vlen = strlen(evalue = iexpand(value));
+ if ((printed > 0) && (printed + nlen + vlen + 1 > width)) {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ case (int)pr_longnames:
+ (void) printf("\n");
+ break;
+ case (int)pr_cap:
+ (void) printf(":\\\n");
+ caplen += 1;
+ }
+ printed = 0;
+ }
+ if (printed == 0) {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("\t");
+ printed = 8;
+ break;
+ case (int)pr_cap:
+ (void) printf("\t:");
+ printed = 9;
+ caplen += 2;
+ break;
+ case (int)pr_longnames:
+ (void) printf(" ");
+ printed = 2;
+ }
+ } else {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ case (int)pr_longnames:
+ (void) printf(" ");
+ break;
+ case (int)pr_cap:
+ (void) printf(":");
+ caplen += 1;
+ }
+ printed++;
+ }
+ if (value == NULL) {
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("%s@,", infoname);
+ printed += nlen + 2;
+ break;
+ case (int)pr_cap:
+ (void) printf("%s@", capname);
+ printed += nlen + 1;
+ caplen += nlen + 1;
+ break;
+ case (int)pr_longnames:
+ (void) printf("%s@,", fullname);
+ printed += nlen + 2;
+ }
+ } else
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ (void) printf("%s=%s,", infoname,
+ evalue);
+ printed += nlen + vlen + 2;
+ break;
+ case (int)pr_cap:
+ if (badcapvalue) {
+ (void) printf(".");
+ caplen += 1;
+ }
+ (void) printf("%s=%s", capname,
+ evalue);
+ printed += nlen + vlen + 1;
+ caplen += nlen + vlen + 1;
+ break;
+ case (int)pr_longnames:
+ (void) printf("%s = '%s',", fullname,
+ evalue);
+ printed += nlen + vlen + 6;
+ }
+ }
+}
+
+void
+pr_sfooting(void)
+{
+ if (onecolumn) {
+ if (printing == pr_cap)
+ (void) printf("\n");
+ } else {
+ if (printed > 0)
+ switch ((int)printing) {
+ case (int)pr_terminfo:
+ case (int)pr_longnames:
+ (void) printf("\n");
+ break;
+ case (int)pr_cap:
+ (void) printf(":\n");
+ caplen += 1;
+ }
+ }
+ if (caplen >= 1024) {
+ (void) fprintf(stderr, "%s: WARNING: termcap entry is too "
+ "long!\n", progname);
+ }
+
+ if (printing == pr_longnames)
+ (void) printf("end of strings\n");
+}
generated by cgit v1.2.3 (git 2.39.1) at 2025-05-25 18:36:40 +0000