kern_cons.c revision 101436 
1/*
2 * Copyright (c) 1988 University of Utah.
3 * Copyright (c) 1991 The Regents of the University of California.
4 * All rights reserved.
5 *
6 * This code is derived from software contributed to Berkeley by
7 * the Systems Programming Group of the University of Utah Computer
8 * Science Department.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 *    notice, this list of conditions and the following disclaimer in the
17 *    documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 *    must display the following acknowledgement:
20 *	This product includes software developed by the University of
21 *	California, Berkeley and its contributors.
22 * 4. Neither the name of the University nor the names of its contributors
23 *    may be used to endorse or promote products derived from this software
24 *    without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * SUCH DAMAGE.
37 *
38 *	from: @(#)cons.c	7.2 (Berkeley) 5/9/91
39 * $FreeBSD: head/sys/kern/tty_cons.c 101436 2002-08-06 18:56:41Z jake $
40 */
41
42#include "opt_ddb.h"
43
44#include <sys/param.h>
45#include <sys/systm.h>
46#include <sys/conf.h>
47#include <sys/cons.h>
48#include <sys/fcntl.h>
49#include <sys/kernel.h>
50#include <sys/malloc.h>
51#include <sys/namei.h>
52#include <sys/proc.h>
53#include <sys/queue.h>
54#include <sys/reboot.h>
55#include <sys/sysctl.h>
56#include <sys/tty.h>
57#include <sys/uio.h>
58#include <sys/vnode.h>
59
60#include <ddb/ddb.h>
61
62#include <machine/cpu.h>
63
64static	d_open_t	cnopen;
65static	d_close_t	cnclose;
66static	d_read_t	cnread;
67static	d_write_t	cnwrite;
68static	d_ioctl_t	cnioctl;
69static	d_poll_t	cnpoll;
70static	d_kqfilter_t	cnkqfilter;
71
72#define	CDEV_MAJOR	0
73static struct cdevsw cn_cdevsw = {
74	/* open */	cnopen,
75	/* close */	cnclose,
76	/* read */	cnread,
77	/* write */	cnwrite,
78	/* ioctl */	cnioctl,
79	/* poll */	cnpoll,
80	/* mmap */	nommap,
81	/* strategy */	nostrategy,
82	/* name */	"console",
83	/* maj */	CDEV_MAJOR,
84	/* dump */	nodump,
85	/* psize */	nopsize,
86	/* flags */	D_TTY | D_KQFILTER,
87	/* kqfilter */	cnkqfilter,
88};
89
90struct cn_device {
91	STAILQ_ENTRY(cn_device) cnd_next;
92	char		cnd_name[16];
93	struct		vnode *cnd_vp;
94	struct		consdev *cnd_cn;
95};
96
97#define CNDEVPATHMAX	32
98#define CNDEVTAB_SIZE	4
99static struct cn_device cn_devtab[CNDEVTAB_SIZE];
100static STAILQ_HEAD(, cn_device) cn_devlist =
101    STAILQ_HEAD_INITIALIZER(cn_devlist);
102
103#define CND_INVALID(cnd, td) 						\
104	(cnd == NULL || cnd->cnd_vp == NULL ||				\
105	    (cnd->cnd_vp->v_type == VBAD && !cn_devopen(cnd, td, 1)))
106
107static udev_t	cn_udev_t;
108SYSCTL_OPAQUE(_machdep, CPU_CONSDEV, consdev, CTLFLAG_RD,
109	&cn_udev_t, sizeof cn_udev_t, "T,dev_t", "");
110
111int	cons_unavail = 0;	/* XXX:
112				 * physical console not available for
113				 * input (i.e., it is in graphics mode)
114				 */
115static int cn_mute;
116static int openflag;			/* how /dev/console was opened */
117static int cn_is_open;
118static dev_t cn_devfsdev;		/* represents the device private info */
119static u_char console_pausing;		/* pause after each line during probe */
120static char *console_pausestr=
121"<pause; press any key to proceed to next line or '.' to end pause mode>";
122
123void	cndebug(char *);
124
125CONS_DRIVER(cons, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
126SET_DECLARE(cons_set, struct consdev);
127
128void
129cninit(void)
130{
131	struct consdev *best_cn, *cn, **list;
132
133	/*
134	 * Check if we should mute the console (for security reasons perhaps)
135	 * It can be changes dynamically using sysctl kern.consmute
136	 * once we are up and going.
137	 *
138	 */
139        cn_mute = ((boothowto & (RB_MUTE
140			|RB_SINGLE
141			|RB_VERBOSE
142			|RB_ASKNAME
143			|RB_CONFIG)) == RB_MUTE);
144
145	/*
146	 * Find the first console with the highest priority.
147	 */
148	best_cn = NULL;
149	SET_FOREACH(list, cons_set) {
150		cn = *list;
151		cnremove(cn);
152		if (cn->cn_probe == NULL)
153			continue;
154		cn->cn_probe(cn);
155		if (cn->cn_pri == CN_DEAD)
156			continue;
157		if (best_cn == NULL || cn->cn_pri > best_cn->cn_pri)
158			best_cn = cn;
159		if (boothowto & RB_MULTIPLE) {
160			/*
161			 * Initialize console, and attach to it.
162			 */
163			cnadd(cn);
164			cn->cn_init(cn);
165		}
166	}
167	if (best_cn == NULL)
168		return;
169	if ((boothowto & RB_MULTIPLE) == 0) {
170		cnadd(best_cn);
171		best_cn->cn_init(best_cn);
172	}
173	if (boothowto & RB_PAUSE)
174		console_pausing = 1;
175	/*
176	 * Make the best console the preferred console.
177	 */
178	cnselect(best_cn);
179}
180
181void
182cninit_finish()
183{
184	console_pausing = 0;
185}
186
187/* add a new physical console to back the virtual console */
188int
189cnadd(struct consdev *cn)
190{
191	struct cn_device *cnd;
192	int i;
193
194	STAILQ_FOREACH(cnd, &cn_devlist, cnd_next)
195		if (cnd->cnd_cn == cn)
196			return (0);
197	for (i = 0; i < CNDEVTAB_SIZE; i++) {
198		cnd = &cn_devtab[i];
199		if (cnd->cnd_cn == NULL)
200			break;
201	}
202	if (cnd->cnd_cn != NULL)
203		return (ENOMEM);
204	cnd->cnd_cn = cn;
205	STAILQ_INSERT_TAIL(&cn_devlist, cnd, cnd_next);
206	return (0);
207}
208
209void
210cnremove(struct consdev *cn)
211{
212	struct cn_device *cnd;
213
214	STAILQ_FOREACH(cnd, &cn_devlist, cnd_next) {
215		if (cnd->cnd_cn != cn)
216			continue;
217		STAILQ_REMOVE(&cn_devlist, cnd, cn_device, cnd_next);
218		if (cnd->cnd_vp != NULL)
219			vn_close(cnd->cnd_vp, openflag, NOCRED, NULL);
220		cnd->cnd_vp = NULL;
221		cnd->cnd_cn = NULL;
222		cnd->cnd_name[0] = '\0';
223#if 0
224		/*
225		 * XXX
226		 * syscons gets really confused if console resources are
227		 * freed after the system has initialized.
228		 */
229		if (cn->cn_term != NULL)
230			cn->cn_term(cn);
231#endif
232		return;
233	}
234}
235
236void
237cnselect(struct consdev *cn)
238{
239	struct cn_device *cnd;
240
241	STAILQ_FOREACH(cnd, &cn_devlist, cnd_next) {
242		if (cnd->cnd_cn != cn)
243			continue;
244		if (cnd == STAILQ_FIRST(&cn_devlist))
245			return;
246		STAILQ_REMOVE(&cn_devlist, cnd, cn_device, cnd_next);
247		STAILQ_INSERT_HEAD(&cn_devlist, cnd, cnd_next);
248		return;
249	}
250}
251
252void
253cndebug(char *str)
254{
255	int i, len;
256
257	len = strlen(str);
258	cnputc('>'); cnputc('>'); cnputc('>'); cnputc(' ');
259	for (i = 0; i < len; i++)
260		cnputc(str[i]);
261	cnputc('\n');
262}
263
264static int
265sysctl_kern_console(SYSCTL_HANDLER_ARGS)
266{
267	struct cn_device *cnd;
268	struct consdev *cp, **list;
269	char *name, *p;
270	int delete, len, error;
271
272	len = 2;
273	SET_FOREACH(list, cons_set) {
274		cp = *list;
275		if (cp->cn_dev != NULL)
276			len += strlen(devtoname(cp->cn_dev)) + 1;
277	}
278	STAILQ_FOREACH(cnd, &cn_devlist, cnd_next)
279		len += strlen(devtoname(cnd->cnd_cn->cn_dev)) + 1;
280	len = len > CNDEVPATHMAX ? len : CNDEVPATHMAX;
281	MALLOC(name, char *, len, M_TEMP, M_WAITOK | M_ZERO);
282	p = name;
283	STAILQ_FOREACH(cnd, &cn_devlist, cnd_next)
284		p += sprintf(p, "%s,", devtoname(cnd->cnd_cn->cn_dev));
285	*p++ = '/';
286	SET_FOREACH(list, cons_set) {
287		cp = *list;
288		if (cp->cn_dev != NULL)
289			p += sprintf(p, "%s,", devtoname(cp->cn_dev));
290	}
291	error = sysctl_handle_string(oidp, name, len, req);
292	if (error == 0 && req->newptr != NULL) {
293		p = name;
294		error = ENXIO;
295		delete = 0;
296		if (*p == '-') {
297			delete = 1;
298			p++;
299		}
300		SET_FOREACH(list, cons_set) {
301			cp = *list;
302			if (cp->cn_dev == NULL ||
303			    strcmp(p, devtoname(cp->cn_dev)) != 0)
304				continue;
305			if (delete) {
306				cnremove(cp);
307				error = 0;
308			} else {
309				error = cnadd(cp);
310				if (error == 0)
311					cnselect(cp);
312			}
313			break;
314		}
315	}
316	FREE(name, M_TEMP);
317	return (error);
318}
319
320SYSCTL_PROC(_kern, OID_AUTO, console, CTLTYPE_STRING|CTLFLAG_RW,
321	0, 0, sysctl_kern_console, "A", "Console device control");
322
323/*
324 * User has changed the state of the console muting.
325 * This may require us to open or close the device in question.
326 */
327static int
328sysctl_kern_consmute(SYSCTL_HANDLER_ARGS)
329{
330	int error;
331	int ocn_mute;
332
333	ocn_mute = cn_mute;
334	error = sysctl_handle_int(oidp, &cn_mute, 0, req);
335	if (error != 0 || req->newptr == NULL)
336		return (error);
337	if (ocn_mute && !cn_mute && cn_is_open)
338		error = cnopen(NODEV, openflag, 0, curthread);
339	else if (!ocn_mute && cn_mute && cn_is_open) {
340		error = cnclose(NODEV, openflag, 0, curthread);
341		cn_is_open = 1;		/* XXX hack */
342	}
343	return (error);
344}
345
346SYSCTL_PROC(_kern, OID_AUTO, consmute, CTLTYPE_INT|CTLFLAG_RW,
347	0, sizeof(cn_mute), sysctl_kern_consmute, "I", "");
348
349static int
350cn_devopen(struct cn_device *cnd, struct thread *td, int forceopen)
351{
352	char path[CNDEVPATHMAX];
353	struct nameidata nd;
354	struct vnode *vp;
355	dev_t dev;
356	int error;
357
358	if ((vp = cnd->cnd_vp) != NULL) {
359		if (!forceopen && vp->v_type != VBAD) {
360			dev = vp->v_rdev;
361			return ((*devsw(dev)->d_open)(dev, openflag, 0, td));
362		}
363		cnd->cnd_vp = NULL;
364		vn_close(vp, openflag, td->td_ucred, td);
365	}
366	if (cnd->cnd_name[0] == '\0')
367		strncpy(cnd->cnd_name, devtoname(cnd->cnd_cn->cn_dev),
368		    sizeof(cnd->cnd_name));
369	snprintf(path, sizeof(path), "/dev/%s", cnd->cnd_name);
370	NDINIT(&nd, LOOKUP, FOLLOW, UIO_SYSSPACE, path, td);
371	error = vn_open(&nd, &openflag, 0);
372	if (error == 0) {
373		NDFREE(&nd, NDF_ONLY_PNBUF);
374		VOP_UNLOCK(nd.ni_vp, 0, td);
375		if (nd.ni_vp->v_type == VCHR)
376			cnd->cnd_vp = nd.ni_vp;
377		else
378			vn_close(nd.ni_vp, openflag, td->td_ucred, td);
379	}
380	return (cnd->cnd_vp != NULL);
381}
382
383static int
384cnopen(dev_t dev, int flag, int mode, struct thread *td)
385{
386	struct cn_device *cnd;
387
388	openflag = flag | FWRITE;	/* XXX */
389	cn_is_open = 1;			/* console is logically open */
390	if (cn_mute)
391		return (0);
392	STAILQ_FOREACH(cnd, &cn_devlist, cnd_next)
393		cn_devopen(cnd, td, 0);
394	return (0);
395}
396
397static int
398cnclose(dev_t dev, int flag, int mode, struct thread *td)
399{
400	struct cn_device *cnd;
401	struct vnode *vp;
402
403	STAILQ_FOREACH(cnd, &cn_devlist, cnd_next) {
404		if ((vp = cnd->cnd_vp) == NULL)
405			continue;
406		cnd->cnd_vp = NULL;
407		vn_close(vp, openflag, td->td_ucred, td);
408	}
409	cn_is_open = 0;
410	return (0);
411}
412
413static int
414cnread(dev_t dev, struct uio *uio, int flag)
415{
416	struct cn_device *cnd;
417
418	cnd = STAILQ_FIRST(&cn_devlist);
419	if (cn_mute || CND_INVALID(cnd, curthread))
420		return (0);
421	dev = cnd->cnd_vp->v_rdev;
422	return ((*devsw(dev)->d_read)(dev, uio, flag));
423}
424
425static int
426cnwrite(dev_t dev, struct uio *uio, int flag)
427{
428	struct cn_device *cnd;
429
430	cnd = STAILQ_FIRST(&cn_devlist);
431	if (cn_mute || CND_INVALID(cnd, curthread))
432		goto done;
433	if (constty)
434		dev = constty->t_dev;
435	else
436		dev = cnd->cnd_vp->v_rdev;
437	if (dev != NULL) {
438		log_console(uio);
439		return ((*devsw(dev)->d_write)(dev, uio, flag));
440	}
441done:
442	uio->uio_resid = 0; /* dump the data */
443	return (0);
444}
445
446static int
447cnioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct thread *td)
448{
449	struct cn_device *cnd;
450	int error;
451
452	cnd = STAILQ_FIRST(&cn_devlist);
453	if (cn_mute || CND_INVALID(cnd, td))
454		return (0);
455	/*
456	 * Superuser can always use this to wrest control of console
457	 * output from the "virtual" console.
458	 */
459	if (cmd == TIOCCONS && constty) {
460		error = suser(td);
461		if (error)
462			return (error);
463		constty = NULL;
464		return (0);
465	}
466	dev = cnd->cnd_vp->v_rdev;
467	if (dev != NULL)
468		return ((*devsw(dev)->d_ioctl)(dev, cmd, data, flag, td));
469	return (0);
470}
471
472/*
473 * XXX
474 * poll/kqfilter do not appear to be correct
475 */
476static int
477cnpoll(dev_t dev, int events, struct thread *td)
478{
479	struct cn_device *cnd;
480
481	cnd = STAILQ_FIRST(&cn_devlist);
482	if (cn_mute || CND_INVALID(cnd, td))
483		return (0);
484	dev = cnd->cnd_vp->v_rdev;
485	if (dev != NULL)
486		return ((*devsw(dev)->d_poll)(dev, events, td));
487	return (0);
488}
489
490static int
491cnkqfilter(dev_t dev, struct knote *kn)
492{
493	struct cn_device *cnd;
494
495	cnd = STAILQ_FIRST(&cn_devlist);
496	if (cn_mute || CND_INVALID(cnd, curthread))
497		return (1);
498	dev = cnd->cnd_vp->v_rdev;
499	if (dev != NULL)
500		return ((*devsw(dev)->d_kqfilter)(dev, kn));
501	return (1);
502}
503
504/*
505 * Low level console routines.
506 */
507int
508cngetc(void)
509{
510	int c;
511
512	if (cn_mute)
513		return (-1);
514	while ((c = cncheckc()) == -1)
515		;
516	if (c == '\r')
517		c = '\n';		/* console input is always ICRNL */
518	return (c);
519}
520
521int
522cncheckc(void)
523{
524	struct cn_device *cnd;
525	struct consdev *cn;
526	int c;
527
528	if (cn_mute)
529		return (-1);
530	STAILQ_FOREACH(cnd, &cn_devlist, cnd_next) {
531		cn = cnd->cnd_cn;
532		c = cn->cn_checkc(cn->cn_dev);
533		if (c != -1) {
534			return (c);
535		}
536	}
537	return (-1);
538}
539
540void
541cnputc(int c)
542{
543	struct cn_device *cnd;
544	struct consdev *cn;
545	char *cp;
546
547	if (cn_mute || c == '\0')
548		return;
549	STAILQ_FOREACH(cnd, &cn_devlist, cnd_next) {
550		cn = cnd->cnd_cn;
551		if (c == '\n')
552			cn->cn_putc(cn->cn_dev, '\r');
553		cn->cn_putc(cn->cn_dev, c);
554	}
555#ifdef DDB
556	if (console_pausing && !db_active && (c == '\n')) {
557#else
558	if (console_pausing && (c == '\n')) {
559#endif
560		for (cp = console_pausestr; *cp != '\0'; cp++)
561			cnputc(*cp);
562		if (cngetc() == '.')
563			console_pausing = 0;
564		cnputc('\r');
565		for (cp = console_pausestr; *cp != '\0'; cp++)
566			cnputc(' ');
567		cnputc('\r');
568	}
569}
570
571void
572cndbctl(int on)
573{
574	struct cn_device *cnd;
575	struct consdev *cn;
576	static int refcount;
577
578	if (!on)
579		refcount--;
580	if (refcount == 0)
581		STAILQ_FOREACH(cnd, &cn_devlist, cnd_next) {
582			cn = cnd->cnd_cn;
583			if (cn->cn_dbctl != NULL)
584				cn->cn_dbctl(cn->cn_dev, on);
585		}
586	if (on)
587		refcount++;
588}
589
590static void
591cn_drvinit(void *unused)
592{
593
594	cn_devfsdev = make_dev(&cn_cdevsw, 0, UID_ROOT, GID_WHEEL, 0600,
595	    "console");
596}
597
598SYSINIT(cndev,SI_SUB_DRIVERS,SI_ORDER_MIDDLE+CDEV_MAJOR,cn_drvinit,NULL)
599