2 * Copyright (c) 1991, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 static char sccsid[] = "@(#)set.c 8.2 (Berkeley) 2/28/94";
43 #define CHK(val, dft) (val <= 0 ? dft : val)
45 int set_tabs __P((void));
48 * Reset the terminal mode bits to a sensible state. Very useful after
49 * a child program dies in raw mode.
54 tcgetattr(STDERR_FILENO, &mode);
56 #if defined(VDISCARD) && defined(CDISCARD)
57 mode.c_cc[VDISCARD] = CHK(mode.c_cc[VDISCARD], CDISCARD);
59 mode.c_cc[VEOF] = CHK(mode.c_cc[VEOF], CEOF);
60 mode.c_cc[VERASE] = CHK(mode.c_cc[VERASE], CERASE);
61 #if defined(VFLUSH) && defined(CFLUSH)
62 mode.c_cc[VFLUSH] = CHK(mode.c_cc[VFLUSH], CFLUSH);
64 mode.c_cc[VINTR] = CHK(mode.c_cc[VINTR], CINTR);
65 mode.c_cc[VKILL] = CHK(mode.c_cc[VKILL], CKILL);
66 #if defined(VLNEXT) && defined(CLNEXT)
67 mode.c_cc[VLNEXT] = CHK(mode.c_cc[VLNEXT], CLNEXT);
69 mode.c_cc[VQUIT] = CHK(mode.c_cc[VQUIT], CQUIT);
70 #if defined(VREPRINT) && defined(CRPRNT)
71 mode.c_cc[VREPRINT] = CHK(mode.c_cc[VREPRINT], CRPRNT);
73 mode.c_cc[VSTART] = CHK(mode.c_cc[VSTART], CSTART);
74 mode.c_cc[VSTOP] = CHK(mode.c_cc[VSTOP], CSTOP);
75 mode.c_cc[VSUSP] = CHK(mode.c_cc[VSUSP], CSUSP);
76 #if defined(VWERASE) && defined(CWERASE)
77 mode.c_cc[VWERASE] = CHK(mode.c_cc[VWERASE], CWERASE);
80 mode.c_iflag &= ~(IGNBRK | PARMRK | INPCK | ISTRIP | INLCR | IGNCR
89 mode.c_iflag |= (BRKINT | IGNPAR | ICRNL | IXON
115 | NLDLY | CRDLY | TABDLY | BSDLY | VTDLY | FFDLY
119 mode.c_oflag |= (OPOST
125 mode.c_cflag &= ~(CSIZE | CSTOPB | PARENB | PARODD | CLOCAL);
126 mode.c_cflag |= (CS8 | CREAD);
127 mode.c_lflag &= ~(ECHONL | NOFLSH | TOSTOP
136 mode.c_lflag |= (ISIG | ICANON | ECHO | ECHOE | ECHOK
145 tcsetattr(STDERR_FILENO, TCSADRAIN, &mode);
149 * Determine the erase, interrupt, and kill characters from the termcap
150 * entry and command line and update their values in 'mode'.
155 char *bp, *p, bs_char, buf[1024];
158 p = tgetstr("kb", &bp);
159 if (p == NULL || p[1] != '\0')
160 p = tgetstr("bc", &bp);
161 if (p != NULL && p[1] == '\0')
163 else if (tgetflag("bs"))
168 if (erasechar == 0 && !tgetflag("os") && mode.c_cc[VERASE] != CERASE) {
169 if (tgetflag("bs") || bs_char != 0)
173 erasechar = (bs_char != 0) ? bs_char : CTRL('h');
175 if (mode.c_cc[VERASE] == 0 || erasechar != 0)
176 mode.c_cc[VERASE] = erasechar ? erasechar : CERASE;
178 if (mode.c_cc[VINTR] == 0 || intrchar != 0)
179 mode.c_cc[VINTR] = intrchar ? intrchar : CINTR;
181 if (mode.c_cc[VKILL] == 0 || killchar != 0)
182 mode.c_cc[VKILL] = killchar ? killchar : CKILL;
186 * Set up various conversions in 'mode', including parity, tabs, returns,
187 * echo, and case, according to the termcap entry. If the program we're
188 * running was named with a leading upper-case character, map external
189 * uppercase to internal lowercase.
192 set_conversions(usingupper)
195 if (tgetflag("UC") || usingupper) {
197 mode.c_iflag |= IUCLC;
198 mode.c_oflag |= OLCUC;
200 } else if (tgetflag("LC")) {
202 mode.c_iflag &= ~IUCLC;
203 mode.c_oflag &= ~OLCUC;
206 mode.c_iflag &= ~(PARMRK | INPCK);
207 mode.c_lflag |= ICANON;
208 if (tgetflag("EP")) {
209 mode.c_cflag |= PARENB;
210 mode.c_cflag &= ~PARODD;
212 if (tgetflag("OP")) {
213 mode.c_cflag |= PARENB;
214 mode.c_cflag |= PARODD;
218 mode.c_oflag |= ONLCR;
220 mode.c_iflag |= ICRNL;
221 mode.c_lflag |= ECHO;
222 mode.c_oflag |= OXTABS;
223 if (tgetflag("NL")) { /* Newline, not linefeed. */
225 mode.c_oflag &= ~ONLCR;
227 mode.c_iflag &= ~ICRNL;
229 if (tgetflag("HD")) /* Half duplex. */
230 mode.c_lflag &= ~ECHO;
231 if (tgetflag("pt")) /* Print tabs. */
232 mode.c_oflag &= ~OXTABS;
233 mode.c_lflag |= (ECHOE | ECHOK);
236 /* Output startup string. */
244 if (tgetstr("pc", &bp) != 0) /* Get/set pad character. */
248 if (oldmode.c_oflag & (TAB3 | ONLCR | OCRNL | ONLRET)) {
249 oldmode.c_oflag &= (TAB3 | ONLCR | OCRNL | ONLRET);
250 tcsetattr(STDERR_FILENO, TCSADRAIN, &oldmode);
257 if (tgetstr("rs", &bp) != 0 || tgetstr("is", &bp) != 0) {
262 if (tgetstr("rf", &bp) != 0 || tgetstr("if", &bp) != 0) {
269 (void)putc('\r', stderr);
270 (void)fflush(stderr);
271 (void)sleep(1); /* Settle the terminal. */
276 * Set the hardware tabs on the terminal, using the ct (clear all tabs),
277 * st (set one tab) and ch (horizontal cursor addressing) capabilities.
278 * This is done before if and is, so they can patch in case we blow this.
279 * Return nonzero if we set any tab stops, zero if not.
285 char *capsp, *clear_tabs;
286 char *set_column, *set_pos, *set_tab, *tg_out;
290 set_tab = tgetstr("st", &capsp);
292 if (set_tab && (clear_tabs = tgetstr("ct", &capsp))) {
293 (void)putc('\r', stderr); /* Force to left margin. */
294 tputs(clear_tabs, 0, outc);
297 set_column = tgetstr("ch", &capsp);
298 set_pos = set_column ? NULL : tgetstr("cm", &capsp);
301 for (c = 8; c < columns; c += 8) {
303 * Get to the right column. "OOPS" is returned by
304 * tgoto() if it can't do the job. (*snarl*)
308 tg_out = tgoto(set_column, 0, c);
309 if (*tg_out == 'O' && set_pos)
310 tg_out = tgoto(set_pos, c, lines - 1);
312 tputs(tg_out, 1, outc);
314 (void)fprintf(stderr, "%s", " ");
316 tputs(set_tab, 0, outc);