Merge from vendor branch GDB:
[dragonfly.git] / usr.bin / window / wwtty.c
1 /*
2  * Copyright (c) 1983, 1993
3  *      The Regents of the University of California.  All rights reserved.
4  *
5  * This code is derived from software contributed to Berkeley by
6  * Edward Wang at The University of California, Berkeley.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. All advertising materials mentioning features or use of this software
17  *    must display the following acknowledgement:
18  *      This product includes software developed by the University of
19  *      California, Berkeley and its contributors.
20  * 4. Neither the name of the University nor the names of its contributors
21  *    may be used to endorse or promote products derived from this software
22  *    without specific prior written permission.
23  *
24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34  * SUCH DAMAGE.
35  *
36  * @(#)wwtty.c  8.1 (Berkeley) 6/6/93
37  * $FreeBSD: src/usr.bin/window/wwtty.c,v 1.1.1.1.14.1 2001/05/17 09:45:02 obrien Exp $
38  * $DragonFly: src/usr.bin/window/wwtty.c,v 1.2 2003/06/17 04:29:34 dillon Exp $
39  */
40
41 #include "ww.h"
42 #include <sys/types.h>
43 #include <fcntl.h>
44 #if !defined(OLD_TTY) && !defined(TIOCGWINSZ)
45 #include <sys/ioctl.h>
46 #endif
47
48 wwgettty(d, t)
49 register struct ww_tty *t;
50 {
51 #ifdef OLD_TTY
52         if (ioctl(d, TIOCGETP, (char *)&t->ww_sgttyb) < 0)
53                 goto bad;
54         if (ioctl(d, TIOCGETC, (char *)&t->ww_tchars) < 0)
55                 goto bad;
56         if (ioctl(d, TIOCGLTC, (char *)&t->ww_ltchars) < 0)
57                 goto bad;
58         if (ioctl(d, TIOCLGET, (char *)&t->ww_lmode) < 0)
59                 goto bad;
60         if (ioctl(d, TIOCGETD, (char *)&t->ww_ldisc) < 0)
61                 goto bad;
62 #else
63         if (tcgetattr(d, &t->ww_termios) < 0)
64                 goto bad;
65 #endif
66         if ((t->ww_fflags = fcntl(d, F_GETFL, 0)) < 0)
67                 goto bad;
68         return 0;
69 bad:
70         wwerrno = WWE_SYS;
71         return -1;
72 }
73
74 /*
75  * Set the modes of tty 'd' to 't'
76  * 'o' is the current modes.  We set the line discipline only if
77  * it changes, to avoid unnecessary flushing of typeahead.
78  */
79 wwsettty(d, t)
80 register struct ww_tty *t;
81 {
82 #ifdef OLD_TTY
83         int i;
84
85         /* XXX, for buggy tty drivers that don't wait for output to drain */
86         while (ioctl(d, TIOCOUTQ, &i) >= 0 && i > 0)
87                 usleep(100000);
88         if (ioctl(d, TIOCSETN, (char *)&t->ww_sgttyb) < 0)
89                 goto bad;
90         if (ioctl(d, TIOCSETC, (char *)&t->ww_tchars) < 0)
91                 goto bad;
92         if (ioctl(d, TIOCSLTC, (char *)&t->ww_ltchars) < 0)
93                 goto bad;
94         if (ioctl(d, TIOCLSET, (char *)&t->ww_lmode) < 0)
95                 goto bad;
96         if (ioctl(d, TIOCGETD, (char *)&i) < 0)
97                 goto bad;
98         if (t->ww_ldisc != i &&
99             ioctl(d, TIOCSETD, (char *)&t->ww_ldisc) < 0)
100                 goto bad;
101 #else
102 #ifdef sun
103         /* XXX, for buggy tty drivers that don't wait for output to drain */
104         (void) tcdrain(d);
105 #endif
106         if (tcsetattr(d, TCSADRAIN, &t->ww_termios) < 0)
107                 goto bad;
108 #endif
109         if (fcntl(d, F_SETFL, t->ww_fflags) < 0)
110                 goto bad;
111         return 0;
112 bad:
113         wwerrno = WWE_SYS;
114         return -1;
115 }
116
117 /*
118  * The ttysize and stop-start routines must also work
119  * on the control side of pseudoterminals.
120  */
121
122 wwgetttysize(d, r, c)
123         int *r, *c;
124 {
125         struct winsize winsize;
126
127         if (ioctl(d, TIOCGWINSZ, (char *)&winsize) < 0) {
128                 wwerrno = WWE_SYS;
129                 return -1;
130         }
131         if (winsize.ws_row != 0)
132                 *r = winsize.ws_row;
133         if (winsize.ws_col != 0)
134                 *c = winsize.ws_col;
135         return 0;
136 }
137
138 wwsetttysize(d, r, c)
139 {
140         struct winsize winsize;
141
142         winsize.ws_row = r;
143         winsize.ws_col = c;
144         winsize.ws_xpixel = winsize.ws_ypixel = 0;
145         if (ioctl(d, TIOCSWINSZ, (char *)&winsize) < 0) {
146                 wwerrno = WWE_SYS;
147                 return -1;
148         }
149         return 0;
150 }
151
152 wwstoptty(d)
153 {
154 #if !defined(OLD_TTY) && defined(TCOOFF)
155         /* not guaranteed to work on the pty side */
156         if (tcflow(d, TCOOFF) < 0)
157 #else
158         if (ioctl(d, TIOCSTOP, (char *)0) < 0)
159 #endif
160         {
161                 wwerrno = WWE_SYS;
162                 return -1;
163         }
164         return 0;
165 }
166
167 wwstarttty(d)
168 {
169 #if !defined(OLD_TTY) && defined(TCOON)
170         /* not guaranteed to work on the pty side */
171         if (tcflow(d, TCOON) < 0)
172 #else
173         if (ioctl(d, TIOCSTART, (char *)0) < 0)
174 #endif
175         {
176                 wwerrno = WWE_SYS;
177                 return -1;
178         }
179         return 0;
180 }