Annotation of src/usr.bin/window/wwinit.c, Revision 1.16
1.16 ! david 1: /* $OpenBSD: wwinit.c,v 1.15 2003/06/03 02:56:23 millert Exp $ */
1.3 niklas 2: /* $NetBSD: wwinit.c,v 1.11 1996/02/08 21:49:07 mycroft Exp $ */
1.1 deraadt 3:
4: /*
5: * Copyright (c) 1983, 1993
6: * The Regents of the University of California. All rights reserved.
7: *
8: * This code is derived from software contributed to Berkeley by
9: * Edward Wang at The University of California, Berkeley.
10: *
11: * Redistribution and use in source and binary forms, with or without
12: * modification, are permitted provided that the following conditions
13: * are met:
14: * 1. Redistributions of source code must retain the above copyright
15: * notice, this list of conditions and the following disclaimer.
16: * 2. Redistributions in binary form must reproduce the above copyright
17: * notice, this list of conditions and the following disclaimer in the
18: * documentation and/or other materials provided with the distribution.
1.15 millert 19: * 3. Neither the name of the University nor the names of its contributors
1.1 deraadt 20: * may be used to endorse or promote products derived from this software
21: * without specific prior written permission.
22: *
23: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33: * SUCH DAMAGE.
34: */
35:
36: #ifndef lint
37: #if 0
38: static char sccsid[] = "@(#)wwinit.c 8.2 (Berkeley) 4/28/95";
39: #else
1.16 ! david 40: static char rcsid[] = "$OpenBSD: wwinit.c,v 1.15 2003/06/03 02:56:23 millert Exp $";
1.1 deraadt 41: #endif
42: #endif /* not lint */
43:
1.5 downsj 44: #include <stdlib.h>
1.1 deraadt 45: #include "ww.h"
46: #include "tt.h"
47: #include <sys/signal.h>
48: #include <fcntl.h>
1.16 ! david 49: #include <signal.h>
1.14 jason 50: #include <string.h>
1.1 deraadt 51: #include "char.h"
52:
53: wwinit()
54: {
1.11 mpech 55: int i, j;
1.1 deraadt 56: char *kp;
1.2 deraadt 57: sigset_t sigset, osigset;
1.1 deraadt 58:
59: wwdtablesize = 3;
60: wwhead.ww_forw = &wwhead;
61: wwhead.ww_back = &wwhead;
62:
1.2 deraadt 63: sigemptyset(&sigset);
64: sigaddset(&sigset, SIGCHLD);
65: sigaddset(&sigset, SIGALRM);
66: sigaddset(&sigset, SIGHUP);
67: sigaddset(&sigset, SIGTERM);
68: sigprocmask(SIG_BLOCK, &sigset, &osigset);
69:
1.8 deraadt 70: if (signal(SIGCHLD, wwchild) == SIG_ERR ||
71: signal(SIGHUP, wwquit) == SIG_ERR ||
72: signal(SIGTERM, wwquit) == SIG_ERR ||
73: signal(SIGPIPE, SIG_IGN) == SIG_ERR) {
1.1 deraadt 74: wwerrno = WWE_SYS;
75: return -1;
76: }
77:
78: if (wwgettty(0, &wwoldtty) < 0)
79: return -1;
80: wwwintty = wwoldtty;
81: #ifdef OLD_TTY
82: wwwintty.ww_sgttyb.sg_flags &= ~XTABS;
83: wwnewtty.ww_sgttyb = wwoldtty.ww_sgttyb;
84: wwnewtty.ww_sgttyb.sg_erase = -1;
85: wwnewtty.ww_sgttyb.sg_kill = -1;
86: wwnewtty.ww_sgttyb.sg_flags |= CBREAK;
87: wwnewtty.ww_sgttyb.sg_flags &= ~(ECHO|CRMOD);
88: wwnewtty.ww_tchars.t_intrc = -1;
89: wwnewtty.ww_tchars.t_quitc = -1;
90: wwnewtty.ww_tchars.t_startc = -1;
91: wwnewtty.ww_tchars.t_stopc = -1;
92: wwnewtty.ww_tchars.t_eofc = -1;
93: wwnewtty.ww_tchars.t_brkc = -1;
94: wwnewtty.ww_ltchars.t_suspc = -1;
95: wwnewtty.ww_ltchars.t_dsuspc = -1;
96: wwnewtty.ww_ltchars.t_rprntc = -1;
97: wwnewtty.ww_ltchars.t_flushc = -1;
98: wwnewtty.ww_ltchars.t_werasc = -1;
99: wwnewtty.ww_ltchars.t_lnextc = -1;
100: wwnewtty.ww_lmode = wwoldtty.ww_lmode | LLITOUT;
101: wwnewtty.ww_ldisc = wwoldtty.ww_ldisc;
102: #else
103: #ifndef OXTABS
104: #define OXTABS XTABS
105: #endif
106: #ifndef _POSIX_VDISABLE
107: #define _POSIX_VDISABLE -1
108: #endif
109: wwwintty.ww_termios.c_oflag &= ~OXTABS;
110: wwnewtty.ww_termios = wwoldtty.ww_termios;
111: wwnewtty.ww_termios.c_iflag &=
112: ~(ISTRIP | INLCR | IGNCR | ICRNL | IXON | IXOFF | IMAXBEL);
113: wwnewtty.ww_termios.c_oflag = 0;
114: wwnewtty.ww_termios.c_cflag &= ~(CSIZE | PARENB);
115: wwnewtty.ww_termios.c_cflag |= CS8;
116: wwnewtty.ww_termios.c_lflag = 0;
117: for (i = 0; i < NCCS; i++)
118: wwnewtty.ww_termios.c_cc[i] = _POSIX_VDISABLE;
119: wwnewtty.ww_termios.c_cc[VMIN] = 1;
120: wwnewtty.ww_termios.c_cc[VTIME] = 0;
121: #endif
122: if (wwsettty(0, &wwnewtty) < 0)
123: goto bad;
124:
125: if ((wwterm = getenv("TERM")) == 0) {
126: wwerrno = WWE_BADTERM;
127: goto bad;
128: }
1.10 millert 129: #ifdef TERMINFO
130: if (setupterm(wwterm, STDOUT_FILENO, NULL) != 0) {
131: wwerrno = WWE_BADTERM;
132: goto bad;
133: }
134: #else
1.1 deraadt 135: if (tgetent(wwtermcap, wwterm) != 1) {
136: wwerrno = WWE_BADTERM;
137: goto bad;
138: }
1.10 millert 139: #endif
1.1 deraadt 140: #ifdef OLD_TTY
141: wwospeed = wwoldtty.ww_sgttyb.sg_ospeed;
142: #else
143: wwospeed = cfgetospeed(&wwoldtty.ww_termios);
144: wwbaud = wwospeed;
145: #endif
146: switch (wwospeed) {
147: default:
148: case B0:
149: wwbaud = 0;
150: break;
151: case B50:
152: wwbaud = 50;
153: break;
154: case B75:
155: wwbaud = 75;
156: break;
157: case B110:
158: wwbaud = 110;
159: break;
160: case B134:
161: wwbaud = 134;
162: break;
163: case B150:
164: wwbaud = 150;
165: break;
166: case B200:
167: wwbaud = 200;
168: break;
169: case B300:
170: wwbaud = 300;
171: break;
172: case B600:
173: wwbaud = 600;
174: break;
175: case B1200:
176: wwbaud = 1200;
177: break;
178: case B1800:
179: wwbaud = 1800;
180: break;
181: case B2400:
182: wwbaud = 2400;
183: break;
184: case B4800:
185: wwbaud = 4800;
186: break;
187: case B9600:
188: wwbaud = 9600;
189: break;
190: #ifdef B19200
191: case B19200:
192: #else
193: case EXTA:
194: #endif
195: wwbaud = 19200;
196: break;
197: #ifdef B38400
198: case B38400:
199: #else
200: case EXTB:
201: #endif
202: wwbaud = 38400;
203: break;
204: #ifdef B57600
205: case B57600:
1.6 downsj 206: wwbaud = 57600;
1.1 deraadt 207: break;
208: #endif
209: #ifdef B115200
210: case B115200:
211: wwbaud = 115200;
212: break;
213: #endif
214: }
215:
216: if (xxinit() < 0)
217: goto bad;
218: wwnrow = tt.tt_nrow;
219: wwncol = tt.tt_ncol;
220: wwavailmodes = tt.tt_availmodes;
221: wwwrap = tt.tt_wrap;
222:
223: if (wwavailmodes & WWM_REV)
224: wwcursormodes = WWM_REV | wwavailmodes & WWM_BLK;
225: else if (wwavailmodes & WWM_UL)
226: wwcursormodes = WWM_UL;
227:
1.7 millert 228: if ((wwib = malloc(512)) == 0)
1.1 deraadt 229: goto bad;
230: wwibe = wwib + 512;
231: wwibq = wwibp = wwib;
232:
1.3 niklas 233: wwsmap = (unsigned char **)
234: wwalloc(0, 0, wwnrow, wwncol, sizeof (unsigned char));
235: if (wwsmap == 0)
1.1 deraadt 236: goto bad;
237: for (i = 0; i < wwnrow; i++)
238: for (j = 0; j < wwncol; j++)
239: wwsmap[i][j] = WWX_NOBODY;
240:
241: wwos = (union ww_char **)
242: wwalloc(0, 0, wwnrow, wwncol, sizeof (union ww_char));
243: if (wwos == 0)
244: goto bad;
245: /* wwos is cleared in wwstart1() */
246: wwns = (union ww_char **)
247: wwalloc(0, 0, wwnrow, wwncol, sizeof (union ww_char));
248: if (wwns == 0)
249: goto bad;
250: for (i = 0; i < wwnrow; i++)
251: for (j = 0; j < wwncol; j++)
252: wwns[i][j].c_w = ' ';
253: if (tt.tt_checkpoint) {
254: /* wwcs is also cleared in wwstart1() */
255: wwcs = (union ww_char **)
256: wwalloc(0, 0, wwnrow, wwncol, sizeof (union ww_char));
257: if (wwcs == 0)
258: goto bad;
259: }
260:
1.7 millert 261: wwtouched = malloc(wwnrow);
1.1 deraadt 262: if (wwtouched == 0) {
263: wwerrno = WWE_NOMEM;
264: goto bad;
265: }
266: for (i = 0; i < wwnrow; i++)
267: wwtouched[i] = 0;
268:
1.7 millert 269: wwupd = (struct ww_update *) malloc(wwnrow * sizeof *wwupd);
1.1 deraadt 270: if (wwupd == 0) {
271: wwerrno = WWE_NOMEM;
272: goto bad;
273: }
274:
275: wwindex[WWX_NOBODY] = &wwnobody;
276: wwnobody.ww_order = NWW;
277:
278: kp = wwwintermcap;
279: if (wwavailmodes & WWM_REV)
1.13 dhartmei 280: wwaddcap1(WWT_REV, &kp, wwwintermcap + sizeof wwwintermcap -
281: kp);
1.1 deraadt 282: if (wwavailmodes & WWM_BLK)
1.13 dhartmei 283: wwaddcap1(WWT_BLK, &kp, wwwintermcap + sizeof wwwintermcap -
284: kp);
1.1 deraadt 285: if (wwavailmodes & WWM_UL)
1.13 dhartmei 286: wwaddcap1(WWT_UL, &kp, wwwintermcap + sizeof wwwintermcap -
287: kp);
1.1 deraadt 288: if (wwavailmodes & WWM_GRP)
1.13 dhartmei 289: wwaddcap1(WWT_GRP, &kp, wwwintermcap + sizeof wwwintermcap -
290: kp);
1.1 deraadt 291: if (wwavailmodes & WWM_DIM)
1.13 dhartmei 292: wwaddcap1(WWT_DIM, &kp, wwwintermcap + sizeof wwwintermcap -
293: kp);
1.1 deraadt 294: if (wwavailmodes & WWM_USR)
1.13 dhartmei 295: wwaddcap1(WWT_USR, &kp, wwwintermcap + sizeof wwwintermcap -
296: kp);
1.1 deraadt 297: if (tt.tt_insline && tt.tt_delline || tt.tt_setscroll)
1.13 dhartmei 298: wwaddcap1(WWT_ALDL, &kp, wwwintermcap + sizeof wwwintermcap -
299: kp);
1.1 deraadt 300: if (tt.tt_inschar)
1.13 dhartmei 301: wwaddcap1(WWT_IMEI, &kp, wwwintermcap + sizeof wwwintermcap -
302: kp);
1.1 deraadt 303: if (tt.tt_insspace)
1.13 dhartmei 304: wwaddcap1(WWT_IC, &kp, wwwintermcap + sizeof wwwintermcap -
305: kp);
1.1 deraadt 306: if (tt.tt_delchar)
1.13 dhartmei 307: wwaddcap1(WWT_DC, &kp, wwwintermcap + sizeof wwwintermcap -
308: kp);
309: wwaddcap("kb", &kp, wwwintermcap + sizeof wwwintermcap - kp);
310: wwaddcap("ku", &kp, wwwintermcap + sizeof wwwintermcap - kp);
311: wwaddcap("kd", &kp, wwwintermcap + sizeof wwwintermcap - kp);
312: wwaddcap("kl", &kp, wwwintermcap + sizeof wwwintermcap - kp);
313: wwaddcap("kr", &kp, wwwintermcap + sizeof wwwintermcap - kp);
314: wwaddcap("kh", &kp, wwwintermcap + sizeof wwwintermcap - kp);
1.1 deraadt 315: if ((j = tgetnum("kn")) >= 0) {
316: char cap[32];
317:
1.13 dhartmei 318: (void) snprintf(kp, wwwintermcap + sizeof wwwintermcap - kp,
319: "kn#%d:", j);
1.1 deraadt 320: for (; *kp; kp++)
321: ;
322: for (i = 1; i <= j; i++) {
1.12 pvalchev 323: (void) snprintf(cap, sizeof(cap), "k%d", i);
1.13 dhartmei 324: wwaddcap(cap, &kp, wwwintermcap +
325: sizeof wwwintermcap - kp);
1.1 deraadt 326: cap[0] = 'l';
1.13 dhartmei 327: wwaddcap(cap, &kp, wwwintermcap +
328: sizeof wwwintermcap - kp);
1.1 deraadt 329: }
330: }
331: /*
332: * It's ok to do this here even if setenv() is destructive
333: * since tt_init() has already made its own copy of it and
334: * wwterm now points to the copy.
335: */
336: (void) setenv("TERM", WWT_TERM, 1);
337: #ifdef TERMINFO
338: if (wwterminfoinit() < 0)
339: goto bad;
340: #endif
341:
342: if (tt.tt_checkpoint)
1.8 deraadt 343: if (signal(SIGALRM, wwalarm) == SIG_ERR) {
1.1 deraadt 344: wwerrno = WWE_SYS;
345: goto bad;
346: }
347: wwstart1();
1.2 deraadt 348:
349: sigprocmask(SIG_SETMASK, &osigset, (sigset_t *)0);
1.1 deraadt 350: return 0;
1.2 deraadt 351:
1.1 deraadt 352: bad:
353: /*
354: * Don't bother to free storage. We're supposed
355: * to exit when wwinit fails anyway.
356: */
357: (void) wwsettty(0, &wwoldtty);
1.2 deraadt 358:
359: sigprocmask(SIG_SETMASK, &osigset, (sigset_t *)0);
1.1 deraadt 360: return -1;
361: }
362:
1.13 dhartmei 363: wwaddcap(cap, kp, len)
1.11 mpech 364: char *cap;
365: char **kp;
1.13 dhartmei 366: int len;
1.1 deraadt 367: {
1.13 dhartmei 368: char tbuf[1024]; /* tgetstr(, &tp) does strlcpy(tp,, 1024) */
1.1 deraadt 369: char *tp = tbuf;
1.11 mpech 370: char *str, *p;
1.1 deraadt 371:
372: if ((str = tgetstr(cap, &tp)) != 0) {
1.13 dhartmei 373: int need = strlen(cap) + 3;
374:
375: for (p = str; *p; ++p)
376: need += strlen(unctrl(*p));
377: if (need > len)
378: return;
1.1 deraadt 379: while (*(*kp)++ = *cap++)
380: ;
381: (*kp)[-1] = '=';
382: while (*str) {
383: for (p = unctrl(*str++); *(*kp)++ = *p++;)
384: ;
385: (*kp)--;
386: }
387: *(*kp)++ = ':';
388: **kp = 0;
389: }
390: }
391:
1.13 dhartmei 392: wwaddcap1(cap, kp, len)
1.11 mpech 393: char *cap;
394: char **kp;
1.13 dhartmei 395: int len;
1.1 deraadt 396: {
1.13 dhartmei 397: if (strlen(cap) + 1 > len)
398: return;
1.1 deraadt 399: while (*(*kp)++ = *cap++)
400: ;
401: (*kp)--;
402: }
403:
404: wwstart()
405: {
1.11 mpech 406: int i;
1.1 deraadt 407:
408: (void) wwsettty(0, &wwnewtty);
409: for (i = 0; i < wwnrow; i++)
410: wwtouched[i] = WWU_TOUCHED;
411: wwstart1();
412: }
413:
414: wwstart1()
415: {
1.11 mpech 416: int i, j;
1.1 deraadt 417:
418: for (i = 0; i < wwnrow; i++)
419: for (j = 0; j < wwncol; j++) {
420: wwos[i][j].c_w = ' ';
421: if (tt.tt_checkpoint)
422: wwcs[i][j].c_w = ' ';
423: }
424: xxstart();
425: if (tt.tt_checkpoint)
426: wwdocheckpoint = 1;
427: }
428:
429: /*
430: * Reset data structures and terminal from an unknown state.
431: * Restoring wwos has been taken care of elsewhere.
432: */
433: wwreset()
434: {
1.11 mpech 435: int i;
1.1 deraadt 436:
437: xxreset();
438: for (i = 0; i < wwnrow; i++)
439: wwtouched[i] = WWU_TOUCHED;
440: }