cons.c revision 1.40.2.1 1 /* $NetBSD: cons.c,v 1.40.2.1 2001/07/10 14:01:58 lukem Exp $ */
2
3 /*
4 * Copyright (c) 1988 University of Utah.
5 * Copyright (c) 1990, 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 * the Systems Programming Group of the University of Utah Computer
10 * Science Department.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. All advertising materials mentioning features or use of this software
21 * must display the following acknowledgement:
22 * This product includes software developed by the University of
23 * California, Berkeley and its contributors.
24 * 4. Neither the name of the University nor the names of its contributors
25 * may be used to endorse or promote products derived from this software
26 * without specific prior written permission.
27 *
28 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
29 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
30 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
31 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
32 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
37 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38 * SUCH DAMAGE.
39 *
40 * from: Utah $Hdr: cons.c 1.7 92/01/21$
41 *
42 * @(#)cons.c 8.2 (Berkeley) 1/12/94
43 */
44
45 #include <sys/param.h>
46 #include <sys/proc.h>
47 #include <sys/user.h>
48 #include <sys/systm.h>
49 #include <sys/buf.h>
50 #include <sys/ioctl.h>
51 #include <sys/tty.h>
52 #include <sys/file.h>
53 #include <sys/conf.h>
54 #include <sys/vnode.h>
55
56 #include <dev/cons.h>
57
58 struct tty *constty = NULL; /* virtual console output device */
59 struct consdev *cn_tab; /* physical console device info */
60 struct vnode *cn_devvp; /* vnode for underlying device. */
61
62 int
63 cnopen(dev, flag, mode, p)
64 dev_t dev;
65 int flag, mode;
66 struct proc *p;
67 {
68 dev_t cndev;
69
70 if (cn_tab == NULL)
71 return (0);
72
73 /*
74 * always open the 'real' console device, so we don't get nailed
75 * later. This follows normal device semantics; they always get
76 * open() calls.
77 */
78 cndev = cn_tab->cn_dev;
79 if (cndev == NODEV) {
80 /*
81 * This is most likely an error in the console attach
82 * code. Panicing looks better than jumping into nowhere
83 * through cdevsw below....
84 */
85 panic("cnopen: cn_tab->cn_dev == NODEV\n");
86 }
87 if (dev == cndev) {
88 /*
89 * This causes cnopen() to be called recursively, which
90 * is generally a bad thing. It is often caused when
91 * dev == 0 and cn_dev has not been set, but was probably
92 * initialised to 0.
93 */
94 panic("cnopen: cn_tab->cn_dev == dev\n");
95 }
96
97 if (cn_devvp == NULLVP) {
98 /* try to get a reference on its vnode, but fail silently */
99 cdevvp(cndev, &cn_devvp);
100 }
101 return ((*cdevsw[major(cndev)].d_open)(cndev, flag, mode, p));
102 }
103
104 int
105 cnclose(dev, flag, mode, p)
106 dev_t dev;
107 int flag, mode;
108 struct proc *p;
109 {
110 struct vnode *vp;
111
112 if (cn_tab == NULL)
113 return (0);
114
115 /*
116 * If the real console isn't otherwise open, close it.
117 * If it's otherwise open, don't close it, because that'll
118 * screw up others who have it open.
119 */
120 dev = cn_tab->cn_dev;
121 if (cn_devvp != NULLVP) {
122 /* release our reference to real dev's vnode */
123 vrele(cn_devvp);
124 cn_devvp = NULLVP;
125 }
126 if (vfinddev(dev, VCHR, &vp) && vcount(vp))
127 return (0);
128 return ((*cdevsw[major(dev)].d_close)(dev, flag, mode, p));
129 }
130
131 int
132 cnread(dev, uio, flag)
133 dev_t dev;
134 struct uio *uio;
135 int flag;
136 {
137
138 /*
139 * If we would redirect input, punt. This will keep strange
140 * things from happening to people who are using the real
141 * console. Nothing should be using /dev/console for
142 * input (except a shell in single-user mode, but then,
143 * one wouldn't TIOCCONS then).
144 */
145 if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE))
146 return 0;
147 else if (cn_tab == NULL)
148 return ENXIO;
149
150 dev = cn_tab->cn_dev;
151 return ((*cdevsw[major(dev)].d_read)(dev, uio, flag));
152 }
153
154 int
155 cnwrite(dev, uio, flag)
156 dev_t dev;
157 struct uio *uio;
158 int flag;
159 {
160
161 /*
162 * Redirect output, if that's appropriate.
163 * If there's no real console, return ENXIO.
164 */
165 if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE))
166 dev = constty->t_dev;
167 else if (cn_tab == NULL)
168 return ENXIO;
169 else
170 dev = cn_tab->cn_dev;
171 return ((*cdevsw[major(dev)].d_write)(dev, uio, flag));
172 }
173
174 void
175 cnstop(tp, flag)
176 struct tty *tp;
177 int flag;
178 {
179
180 }
181
182 int
183 cnioctl(dev, cmd, data, flag, p)
184 dev_t dev;
185 u_long cmd;
186 caddr_t data;
187 int flag;
188 struct proc *p;
189 {
190 int error;
191
192 /*
193 * Superuser can always use this to wrest control of console
194 * output from the "virtual" console.
195 */
196 if (cmd == TIOCCONS && constty != NULL) {
197 error = suser(p->p_ucred, (u_short *) NULL);
198 if (error)
199 return (error);
200 constty = NULL;
201 return (0);
202 }
203
204 /*
205 * Redirect the ioctl, if that's appropriate.
206 * Note that strange things can happen, if a program does
207 * ioctls on /dev/console, then the console is redirected
208 * out from under it.
209 */
210 if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE))
211 dev = constty->t_dev;
212 else if (cn_tab == NULL)
213 return ENXIO;
214 else
215 dev = cn_tab->cn_dev;
216 return ((*cdevsw[major(dev)].d_ioctl)(dev, cmd, data, flag, p));
217 }
218
219 /*ARGSUSED*/
220 int
221 cnpoll(dev, events, p)
222 dev_t dev;
223 int events;
224 struct proc *p;
225 {
226
227 /*
228 * Redirect the poll, if that's appropriate.
229 * I don't want to think of the possible side effects
230 * of console redirection here.
231 */
232 if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE))
233 dev = constty->t_dev;
234 else if (cn_tab == NULL)
235 return ENXIO;
236 else
237 dev = cn_tab->cn_dev;
238 return ((*cdevsw[major(dev)].d_poll)(dev, events, p));
239 }
240
241 /*ARGSUSED*/
242 int
243 cnkqfilter(dev, kn)
244 dev_t dev;
245 struct knote *kn;
246 {
247
248 /*
249 * Redirect the kqfilter, if that's appropriate.
250 * I don't want to think of the possible side effects
251 * of console redirection here.
252 */
253 if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE))
254 dev = constty->t_dev;
255 else if (cn_tab == NULL)
256 return ENXIO;
257 else
258 dev = cn_tab->cn_dev;
259 return ((*cdevsw[major(dev)].d_kqfilter)(dev, kn));
260 }
261
262 int
263 cngetc()
264 {
265
266 if (cn_tab == NULL)
267 return (0);
268 return ((*cn_tab->cn_getc)(cn_tab->cn_dev));
269 }
270
271 int
272 cngetsn(cp, size)
273 char *cp;
274 int size;
275 {
276 char *lp;
277 int c, len;
278
279 cnpollc(1);
280
281 lp = cp;
282 len = 0;
283 for (;;) {
284 c = cngetc();
285 switch (c) {
286 case '\n':
287 case '\r':
288 printf("\n");
289 *lp++ = '\0';
290 cnpollc(0);
291 return (len);
292 case '\b':
293 case '\177':
294 case '#':
295 if (len) {
296 --len;
297 --lp;
298 printf("\b \b");
299 }
300 continue;
301 case '@':
302 case 'u'&037: /* CTRL-u */
303 len = 0;
304 lp = cp;
305 printf("\n");
306 continue;
307 default:
308 if (len + 1 >= size || c < ' ') {
309 printf("\007");
310 continue;
311 }
312 printf("%c", c);
313 ++len;
314 *lp++ = c;
315 }
316 }
317 }
318
319 void
320 cnputc(c)
321 int c;
322 {
323
324 if (cn_tab == NULL)
325 return;
326
327 if (c) {
328 (*cn_tab->cn_putc)(cn_tab->cn_dev, c);
329 if (c == '\n')
330 (*cn_tab->cn_putc)(cn_tab->cn_dev, '\r');
331 }
332 }
333
334 void
335 cnpollc(on)
336 int on;
337 {
338 static int refcount = 0;
339
340 if (cn_tab == NULL)
341 return;
342 if (!on)
343 --refcount;
344 if (refcount == 0)
345 (*cn_tab->cn_pollc)(cn_tab->cn_dev, on);
346 if (on)
347 ++refcount;
348 }
349
350 void
351 nullcnpollc(dev, on)
352 dev_t dev;
353 int on;
354 {
355
356 }
357
358 void
359 cnbell(pitch, period, volume)
360 u_int pitch, period, volume;
361 {
362
363 if (cn_tab == NULL || cn_tab->cn_bell == NULL)
364 return;
365 (*cn_tab->cn_bell)(cn_tab->cn_dev, pitch, period, volume);
366 }
367