![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to cr_tty.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / lib / libcurses|
Return to cr_tty.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / lib / libcurses |
1.1 root 1: /*
2: * Copyright (c) 1981 Regents of the University of California.
3: * All rights reserved.
4: *
5: * Redistribution and use in source and binary forms are permitted
6: * provided that: (1) source distributions retain this entire copyright
7: * notice and comment, and (2) distributions including binaries display
8: * the following acknowledgement: ``This product includes software
9: * developed by the University of California, Berkeley and its contributors''
10: * in the documentation or other materials provided with the distribution
11: * and in all advertising materials mentioning features or use of this
12: * software. Neither the name of the University nor the names of its
13: * contributors may be used to endorse or promote products derived
14: * from this software without specific prior written permission.
15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
16: * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
17: * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
18: */
19:
20: #ifndef lint
21: static char sccsid[] = "@(#)cr_tty.c 5.8 (Berkeley) 6/1/90";
22: #endif /* not lint */
23:
24: /*
25: * Terminal initialization routines.
26: *
27: */
28:
29: # include "curses.ext"
30:
31: static bool *sflags[] = {
32: &AM, &BS, &DA, &DB, &EO, &HC, &HZ, &IN, &MI,
33: &MS, &NC, &NS, &OS, &UL, &XB, &XN, &XT, &XS,
34: &XX
35: };
36:
37: static char *_PC,
38: **sstrs[] = {
39: &AL, &BC, &BT, &CD, &CE, &CL, &CM, &CR, &CS,
40: &DC, &DL, &DM, &DO, &ED, &EI, &K0, &K1, &K2,
41: &K3, &K4, &K5, &K6, &K7, &K8, &K9, &HO, &IC,
42: &IM, &IP, &KD, &KE, &KH, &KL, &KR, &KS, &KU,
43: &LL, &MA, &ND, &NL, &_PC, &RC, &SC, &SE, &SF,
44: &SO, &SR, &TA, &TE, &TI, &UC, &UE, &UP, &US,
45: &VB, &VS, &VE, &AL_PARM, &DL_PARM, &UP_PARM,
46: &DOWN_PARM, &LEFT_PARM, &RIGHT_PARM,
47: };
48:
49: extern char *tgoto();
50:
51: char _tspace[2048]; /* Space for capability strings */
52:
53: static char *aoftspace; /* Address of _tspace for relocation */
54:
55: static int destcol, destline;
56:
57: /*
58: * This routine does terminal type initialization routines, and
59: * calculation of flags at entry. It is almost entirely stolen from
60: * Bill Joy's ex version 2.6.
61: */
62: short ospeed = -1;
63:
64: gettmode() {
65:
66: if (ioctl(_tty_ch, TIOCGETP, &_tty) < 0)
67: return;
68: savetty();
69: if (ioctl(_tty_ch, TIOCSETP, &_tty) < 0)
70: _tty.sg_flags = _res_flg;
71: ospeed = _tty.sg_ospeed;
72: _res_flg = _tty.sg_flags;
73: UPPERCASE = (_tty.sg_flags & LCASE) != 0;
74: GT = ((_tty.sg_flags & XTABS) == 0);
75: NONL = ((_tty.sg_flags & CRMOD) == 0);
76: _tty.sg_flags &= ~XTABS;
77: ioctl(_tty_ch, TIOCSETP, &_tty);
78: # ifdef DEBUG
79: fprintf(outf, "GETTMODE: UPPERCASE = %s\n", UPPERCASE ? "TRUE":"FALSE");
80: fprintf(outf, "GETTMODE: GT = %s\n", GT ? "TRUE" : "FALSE");
81: fprintf(outf, "GETTMODE: NONL = %s\n", NONL ? "TRUE" : "FALSE");
82: fprintf(outf, "GETTMODE: ospeed = %d\n", ospeed);
83: # endif
84: }
85:
86: setterm(type)
87: reg char *type; {
88:
89: reg int unknown;
90: static char genbuf[1024];
91: # ifdef TIOCGWINSZ
92: struct winsize win;
93: # endif
94:
95: # ifdef DEBUG
96: fprintf(outf, "SETTERM(\"%s\")\n", type);
97: fprintf(outf, "SETTERM: LINES = %d, COLS = %d\n", LINES, COLS);
98: # endif
99: if (type[0] == '\0')
100: type = "xx";
101: unknown = FALSE;
102: if (tgetent(genbuf, type) != 1) {
103: unknown++;
104: strcpy(genbuf, "xx|dumb:");
105: }
106: # ifdef DEBUG
107: fprintf(outf, "SETTERM: tty = %s\n", type);
108: # endif
109: # ifdef TIOCGWINSZ
110: if (ioctl(_tty_ch, TIOCGWINSZ, &win) >= 0) {
111: if (LINES == 0)
112: LINES = win.ws_row;
113: if (COLS == 0)
114: COLS = win.ws_col;
115: }
116: # endif
117:
118: if (LINES == 0)
119: LINES = tgetnum("li");
120: if (LINES <= 5)
121: LINES = 24;
122:
123: if (COLS == 0)
124: COLS = tgetnum("co");
125: if (COLS <= 4)
126: COLS = 80;
127:
128: # ifdef DEBUG
129: fprintf(outf, "SETTERM: LINES = %d, COLS = %d\n", LINES, COLS);
130: # endif
131: aoftspace = _tspace;
132: zap(); /* get terminal description */
133:
134: /*
135: * Handle funny termcap capabilities
136: */
137: if (CS && SC && RC) AL=DL="";
138: if (AL_PARM && AL==NULL) AL="";
139: if (DL_PARM && DL==NULL) DL="";
140: if (IC && IM==NULL) IM="";
141: if (IC && EI==NULL) EI="";
142: if (!GT) BT=NULL; /* If we can't tab, we can't backtab either */
143:
144: if (tgoto(CM, destcol, destline)[0] == 'O')
145: CA = FALSE, CM = 0;
146: else
147: CA = TRUE;
148:
149: PC = _PC ? _PC[0] : FALSE;
150: aoftspace = _tspace;
151: {
152: /* xtype should be the same size as genbuf for longname(). */
153: static char xtype[1024];
154:
155: (void)strcpy(xtype,type);
156: strncpy(ttytype, longname(genbuf, xtype), sizeof(ttytype) - 1);
157: }
158: ttytype[sizeof(ttytype) - 1] = '\0';
159: if (unknown)
160: return ERR;
161: return OK;
162: }
163:
164: /*
165: * This routine gets all the terminal flags from the termcap database
166: */
167:
168: zap()
169: {
170: register char *namp;
171: register bool **fp;
172: register char ***sp;
173: #ifdef DEBUG
174: register char *cp;
175: #endif
176: extern char *tgetstr();
177:
178: namp = "ambsdadbeohchzinmimsncnsosulxbxnxtxsxx";
179: fp = sflags;
180: do {
181: *(*fp++) = tgetflag(namp);
182: #ifdef DEBUG
183: fprintf(outf, "%2.2s = %s\n", namp, *fp[-1] ? "TRUE" : "FALSE");
184: #endif
185: namp += 2;
186: } while (*namp);
187: namp = "albcbtcdceclcmcrcsdcdldmdoedeik0k1k2k3k4k5k6k7k8k9hoicimipkdkekhklkrkskullmandnlpcrcscsesfsosrtatetiucueupusvbvsveALDLUPDOLERI";
188: sp = sstrs;
189: do {
190: *(*sp++) = tgetstr(namp, &aoftspace);
191: #ifdef DEBUG
192: fprintf(outf, "%2.2s = %s", namp, *sp[-1] == NULL ? "NULL\n" : "\"");
193: if (*sp[-1] != NULL) {
194: for (cp = *sp[-1]; *cp; cp++)
195: fprintf(outf, "%s", unctrl(*cp));
196: fprintf(outf, "\"\n");
197: }
198: #endif
199: namp += 2;
200: } while (*namp);
201: if (XS)
202: SO = SE = NULL;
203: else {
204: if (tgetnum("sg") > 0)
205: SO = NULL;
206: if (tgetnum("ug") > 0)
207: US = NULL;
208: if (!SO && US) {
209: SO = US;
210: SE = UE;
211: }
212: }
213: }
214:
215: /*
216: * return a capability from termcap
217: */
218: char *
219: getcap(name)
220: char *name;
221: {
222: char *tgetstr();
223:
224: return tgetstr(name, &aoftspace);
225: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.