date and time created 86/07/02 16:23:39 by sam

[unix-history] / usr / src / lib / libcurses / setterm.c

diff --git a/usr/src/lib/libcurses/setterm.c b/usr/src/lib/libcurses/setterm.c
index 3332ecc..363ccca 100644 (file)
--- a/usr/src/lib/libcurses/setterm.c
+++ b/usr/src/lib/libcurses/setterm.c
@@ -1,29 +1,42 @@
+/*
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved.  The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)setterm.c  5.2 (Berkeley) %G%";
+#endif not lint
+

 /*
  * Terminal initialization routines.
  *
 /*
  * Terminal initialization routines.
  *

- * %G% (Berkeley) @(#)setterm.c        1.8

  */
 
  */
 

-# undef        DEBUG
-

 # include      "curses.ext"
 # include      "curses.ext"

-# include      "cr_ex.h"

 
 

-static bool    *sflags[]       = {
-                       &AM, &BS, &EO, &HZ, &IN, &MI, &MS, &NC, &OS, &UL, &XN
+static bool    *sflags[] = {
+                       &AM, &BS, &DA, &DB, &EO, &HC, &HZ, &IN, &MI,
+                       &MS, &NC, &NS, &OS, &UL, &XB, &XN, &XT, &XS,
+                       &XX

                };
 
                };
 

-static char    *xPC,
-               **sstrs[]       = {
-                       &AL, &BC,  &BT, &CD, &CE, &CL, &CM, &DC, &DL,
-                       &DM, &DO,  &ED, &EI, &HO, &IC, &IM, &IP, &LL,
-                       &MA, &ND, &xPC, &SE, &SF, &SO, &SR, &TA, &TE,
-                       &TI, &UC,  &UE, &UP, &US, &VB, &VS, &VE
+static char    *_PC,
+               **sstrs[] = {
+                       &AL, &BC, &BT, &CD, &CE, &CL, &CM, &CR, &CS,
+                       &DC, &DL, &DM, &DO, &ED, &EI, &K0, &K1, &K2,
+                       &K3, &K4, &K5, &K6, &K7, &K8, &K9, &HO, &IC,
+                       &IM, &IP, &KD, &KE, &KH, &KL, &KR, &KS, &KU,
+                       &LL, &MA, &ND, &NL, &_PC, &RC, &SC, &SE, &SF,
+                       &SO, &SR, &TA, &TE, &TI, &UC, &UE, &UP, &US,
+                       &VB, &VS, &VE, &AL_PARM, &DL_PARM, &UP_PARM,
+                       &DOWN_PARM, &LEFT_PARM, &RIGHT_PARM,

                },
                *tgoto();
 
                },
                *tgoto();
 

-static char    tspace[256],            /* Space for capability strings */
-               *aoftspace;             /* Address of tspace for relocation */
+char           _tspace[2048];          /* Space for capability strings */
+
+static char    *aoftspace;             /* Address of _tspace for relocation */

 
 static int     destcol, destline;
 
 
 static int     destcol, destline;
 


@@ -59,8 +72,11 @@ gettmode() {
 setterm(type)
 reg char       *type; {
 
 setterm(type)
 reg char       *type; {
 

-       reg int unknown;
-       char    genbuf[1024];
+       reg int         unknown;
+       static char     genbuf[1024];
+# ifdef TIOCGWINSZ
+       struct winsize win;
+# endif

 
 # ifdef DEBUG
        fprintf(outf, "SETTERM(\"%s\")\n", type);
 
 # ifdef DEBUG
        fprintf(outf, "SETTERM(\"%s\")\n", type);


@@ -76,81 +92,103 @@ reg char   *type; {
 # ifdef DEBUG
        fprintf(outf, "SETTERM: tty = %s\n", type);
 # endif
 # ifdef DEBUG
        fprintf(outf, "SETTERM: tty = %s\n", type);
 # endif

+# ifdef TIOCGWINSZ
+       if (ioctl(_tty_ch, TIOCGWINSZ, &win) >= 0) {
+               if (LINES == 0)
+                       LINES = win.ws_row;
+               if (COLS == 0)
+                       COLS = win.ws_col;
+       }
+# endif
+

        if (LINES == 0)
                LINES = tgetnum("li");
        if (LINES <= 5)
                LINES = 24;
        if (LINES == 0)
                LINES = tgetnum("li");
        if (LINES <= 5)
                LINES = 24;

-       else if (LINES > 48)
-               LINES = 48;

 
        if (COLS == 0)
                COLS = tgetnum("co");
        if (COLS <= 4)
                COLS = 80;
 
        if (COLS == 0)
                COLS = tgetnum("co");
        if (COLS <= 4)
                COLS = 80;

-       else if (COLS > 1000)
-               COLS = 1000;
+

 # ifdef DEBUG
        fprintf(outf, "SETTERM: LINES = %d, COLS = %d\n", LINES, COLS);
 # endif
 # ifdef DEBUG
        fprintf(outf, "SETTERM: LINES = %d, COLS = %d\n", LINES, COLS);
 # endif

-       aoftspace = tspace;
+       aoftspace = _tspace;

        zap();                  /* get terminal description             */
        zap();                  /* get terminal description             */

+
+       /*
+        * Handle funny termcap capabilities
+        */
+       if (CS && SC && RC) AL=DL="";
+       if (AL_PARM && AL==NULL) AL="";
+       if (DL_PARM && DL==NULL) DL="";
+       if (IC && IM==NULL) IM="";
+       if (IC && EI==NULL) EI="";
+       if (!GT) BT=NULL;       /* If we can't tab, we can't backtab either */
+

        if (tgoto(CM, destcol, destline)[0] == 'O')
                CA = FALSE, CM = 0;
        else
                CA = TRUE;
        if (tgoto(CM, destcol, destline)[0] == 'O')
                CA = FALSE, CM = 0;
        else
                CA = TRUE;

-       PC = xPC ? xPC[0] : FALSE;
-       aoftspace = tspace;
-       strcpy(ttytype, longname(genbuf, type));
+
+       PC = _PC ? _PC[0] : FALSE;
+       aoftspace = _tspace;
+       strncpy(ttytype, longname(genbuf, type), sizeof(ttytype) - 1);
+       ttytype[sizeof(ttytype) - 1] = '\0';

        if (unknown)
                return ERR;
        return OK;
 }
        if (unknown)
                return ERR;
        return OK;
 }

+

 /*
  *     This routine gets all the terminal flags from the termcap database
  */
 /*
  *     This routine gets all the terminal flags from the termcap database
  */

-zap() {

 
 

-       reg bool        **fp;
-       reg char        *namp, ***sp;
-       reg int         SG, UG;
+zap()
+{
+       register char   *namp;
+       register bool   **fp;
+       register char   ***sp;
+#ifdef DEBUG
+       register char   *cp;
+#endif

        extern char     *tgetstr();
 
        extern char     *tgetstr();
 

-       /*
-        * get boolean flags
-        */
-       namp = "ambseohzinmimsncosulxn\0\0";
-# ifdef FULLDEBUG
-       fprintf(outf, "ZAP: namp = \"%s\"\n", namp);
-# endif
+       namp = "ambsdadbeohchzinmimsncnsosulxbxnxtxsxx";

        fp = sflags;
        do {
                *(*fp++) = tgetflag(namp);
        fp = sflags;
        do {
                *(*fp++) = tgetflag(namp);

-# ifdef FULLDEBUG
-               fprintf(outf, "ZAP: %.2s = %d", namp, *(*(fp - 1)));
-# endif
+#ifdef DEBUG
+               fprintf(outf, "%2.2s = %s\n", namp, *fp[-1] ? "TRUE" : "FALSE");
+#endif

                namp += 2;
        } while (*namp);
                namp += 2;
        } while (*namp);

-
-       /*
-        * get string values
-        */
-       namp = "albcbtcdceclcmdcdldmdoedeihoicimipllmandpcsesfsosrtatetiucueupusvbvsve";
-# ifdef FULLDEBUG
-       fprintf(outf, "ZAP: namp = \"%s\"\n", namp);
-# endif
+       namp = "albcbtcdceclcmcrcsdcdldmdoedeik0k1k2k3k4k5k6k7k8k9hoicimipkdkekhklkrkskullmandnlpcrcscsesfsosrtatetiucueupusvbvsveALDLUPDOLERI";

        sp = sstrs;
        do {
                *(*sp++) = tgetstr(namp, &aoftspace);
        sp = sstrs;
        do {
                *(*sp++) = tgetstr(namp, &aoftspace);

-# ifdef FULLDEBUG
-               fprintf(outf, "ZAP: %.2s = \"%s\"\n", namp, *(*(sp-1)));
-# endif
+#ifdef DEBUG
+               fprintf(outf, "%2.2s = %s", namp, *sp[-1] == NULL ? "NULL\n" : "\"");
+               if (*sp[-1] != NULL) {
+                       for (cp = *sp[-1]; *cp; cp++)
+                               fprintf(outf, "%s", unctrl(*cp));
+                       fprintf(outf, "\"\n");
+               }
+#endif

                namp += 2;
        } while (*namp);
                namp += 2;
        } while (*namp);

-       SG = tgetnum("sg");
-       UG = tgetnum("ug");
-       if ((SG || !SO) && (!UG && US)) {
-               SO = US;
-               SE = UE;
+       if (XS)
+               SO = SE = NULL;
+       else {
+               if (tgetnum("sg") > 0)
+                       SO = NULL;
+               if (tgetnum("ug") > 0)
+                       US = NULL;
+               if (!SO && US) {
+                       SO = US;
+                       SE = UE;
+               }

        }
 }
 
        }
 }