Terminfo emulation library; currently understands only about reading from

termcap database using cgetent(3)

1 files changed, 237 insertions, 0 deletions

diff --git a/lib/libtermlib/getterm.c b/lib/libtermlib/getterm.c
new file mode 100644
index 00000000000..f2c8c0a9b10
--- /dev/null
+++ b/lib/libtermlib/getterm.c
@@ -0,0 +1,237 @@
+/*	$OpenBSD: getterm.c,v 1.1 1996/05/31 05:40:02 tholo Exp $	*/
+
+/*
+ * Copyright (c) 1996 SigmaSoft, Th. Lockert <tholo@sigmasoft.com>
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *	This product includes software developed by SigmaSoft, Th.  Lockert.
+ * 4. The name of the author may not be used to endorse or promote products
+ *    derived from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
+ * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
+ * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
+ * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+ * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+ * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
+ * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
+ * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
+ * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#ifndef lint
+static char rcsid[] = "$OpenBSD: getterm.c,v 1.1 1996/05/31 05:40:02 tholo Exp $";
+#endif
+
+#include <stdlib.h>
+#include <string.h>
+#include <sys/param.h>
+#include <sys/ioctl.h>
+#include "term.h"
+#include "term.private.h"
+#include "pathnames.h"
+
+#define	PVECSIZ	32
+
+TERMINAL *cur_term;
+char *_ti_buf;
+char *UP;
+char *BC;
+char PC;
+int LINES, COLS, TABSIZE;
+
+static int _ti_use_env = TRUE;
+
+/*
+ * Internal routine to read in a terminal description.
+ * Currently supports reading from termcap files and databases
+ * only; should be extended to also support reading from binary
+ * terminfo files
+ *
+ * Will also set up global variables for compatibility with old
+ * termcap routines, as well as populate cur_term's capability
+ * variables.  If called from the termcap tgetent() compatibility
+ * routine, it will copy the termcap entry into the buffer
+ * provided to that routine.  Note that no other code in this
+ * library depends on the termcap entry being kept
+ */
+int
+_ti_getterm(name)
+     const char *name;
+{
+    register char *p;
+    register char *cp;
+    char  *dummy;
+    char **fname;
+    char  *home;
+    int    i;
+    char   pathbuf[MAXPATHLEN];	/* holds raw path of filenames */
+    char  *pathvec[PVECSIZ];	/* to point to names in pathbuf */
+    char  *termpath;
+    long   num;
+#ifdef TIOCGWINSZ
+    struct winsize winsz;
+#endif
+
+    fname = pathvec;
+    p = pathbuf;
+    cp = getenv("TERMCAP");
+    /*
+     * TERMCAP can have one of two things in it. It can be the
+     * name of a file to use instead of /etc/termcap. In this
+     * case it better start with a "/". Or it can be an entry to
+     * use so we don't have to read the file. In this case it
+     * has to already have the newlines crunched out.  If TERMCAP
+     * does not hold a file name then a path of names is searched
+     * instead.  The path is found in the TERMPATH variable, or
+     * becomes "$HOME/.termcap /etc/termcap" if no TERMPATH exists.
+     */
+    if (!cp || *cp != '/') {	/* no TERMCAP or it holds an entry */
+	if ((termpath = getenv("TERMPATH")) != NULL)
+	    strncpy(pathbuf, termpath, MAXPATHLEN);
+	else {
+	    if ((home = getenv("HOME")) != NULL) {
+		/* set up default */
+		p += strlen(home);	/* path, looking in */
+		strcpy(pathbuf, home);	/* $HOME first */
+		*p++ = '/';
+	    }	/* if no $HOME look in current directory */
+	    strncpy(p, _PATH_DEF, MAXPATHLEN - (p - pathbuf));
+	}
+    }
+    else					/* user-defined name in TERMCAP */
+	strncpy(pathbuf, cp, MAXPATHLEN);	/* still can be tokenized */
+
+    *fname++ = pathbuf;	/* tokenize path into vector of names */
+    while (*++p)
+	if (*p == ' ' || *p == ':') {
+	    *p = '\0';
+	    while (*++p)
+		if (*p != ' ' && *p != ':')
+		    break;
+	    if (*p == '\0')
+		break;
+	    *fname++ = p;
+	    if (fname >= pathvec + PVECSIZ) {
+		fname--;
+		break;
+	    }
+	}
+    *fname = (char *) 0;			/* mark end of vector */
+    if (cp && *cp && *cp != '/')
+	if (cgetset(cp) < 0)
+	    return (-2);
+
+    dummy = NULL;
+    i = cgetent(&dummy, pathvec, (char *)name);      
+	
+    if (i == 0) {
+	char *s;
+
+	if ((s = home = strchr(dummy, ':')) == NULL)
+	    cur_term->name = strdup(name);
+	else {
+	    *home = '\0';
+	    while (s > dummy && *s != '|')
+		s--;
+	    if (s > dummy)
+		s++;
+	    cur_term->name = strdup(s);
+	    *home = ':';
+	}
+	for (i = 0; i < _ti_numcaps; i++) {
+	    switch (_ti_captoidx[i].type) {
+		case TYPE_BOOL:
+		    if (cgetcap(dummy, (char *)_ti_captoidx[i].name, ':') == NULL)
+			cur_term->bools[_ti_captoidx[i].idx] = 0;
+		    else
+			cur_term->bools[_ti_captoidx[i].idx] = 1;
+		    break;
+		case TYPE_NUM:
+		    if (cgetnum(dummy, (char *)_ti_captoidx[i].name, &num) < 0)
+			cur_term->nums[_ti_captoidx[i].idx] = 0;
+		    else
+			cur_term->nums[_ti_captoidx[i].idx] = (int)num;
+		    break;
+		case TYPE_STR:
+		    if (cgetstr(dummy, (char *)_ti_captoidx[i].name, &s) < 0)
+			cur_term->strs[_ti_captoidx[i].idx] = NULL;
+		    else {
+			cur_term->strs[_ti_captoidx[i].idx] = _ti_captoinfo(s);
+			free(s);
+		    }
+		    break;
+	    }
+	}
+	_ti_fillcap(cur_term);
+	if (_ti_buf)
+	    strcpy(_ti_buf, dummy);
+	UP = cursor_up;
+	BC = backspace_if_not_bs;
+	PC = pad_char ? pad_char[0] : '\0';
+	i = 0;
+
+	LINES = lines;
+	COLS = columns;
+	TABSIZE = init_tabs;
+	if (TABSIZE == 0)
+	    TABSIZE = 8;
+	init_tabs = TABSIZE;
+	if (_ti_use_env) {
+#ifdef TIOCGWINSZ
+	    /*
+	     * get the current window size, overrides entries in termcap
+	     */
+	    if (ioctl(cur_term->fd, TIOCGWINSZ, &winsz) >= 0) {
+		if (winsz.ws_row > 0)
+		    LINES = winsz.ws_row;
+		if (winsz.ws_col > 0)
+		    COLS = winsz.ws_col;
+	    }
+#endif
+	    /*
+	     * LINES and COLS environment variables overrides any other
+	     * method of getting the terminal window size
+	     */
+	    if ((s = getenv("LINES")) != NULL)
+		LINES = atoi(s);
+	    if ((s = getenv("COLS")) != NULL)
+		COLS = atoi(s);
+	}
+	lines = LINES;
+	columns = COLS;
+    }
+
+    /* We are done with the returned termcap buffer now; free it */
+    if (dummy)
+	free(dummy);
+
+    /* we found a "tc" reference loop, return error */
+    if (i == -3)
+	return (-1);
+
+    return (i + 1);
+}
+
+/*
+ * Allows the calling program to not have the window size or
+ * environment variables LINES and COLS override the termcap
+ * or terminfo lines/columns specifications
+ */
+void
+use_env(flag)
+    int flag;
+{
+    _ti_use_env = flag;
+}