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: src/sys/kern/tty_cons.c,v 1.81.2.4 2001/12/17 18:44:41 guido Exp $ 40 * $DragonFly: src/sys/kern/tty_cons.c,v 1.21 2007/05/07 05:21:41 dillon Exp $ 41 */ 42 43 #include "opt_ddb.h" 44 45 #include <sys/param.h> 46 #include <sys/systm.h> 47 #include <sys/conf.h> 48 #include <sys/cons.h> 49 #include <sys/kernel.h> 50 #include <sys/proc.h> 51 #include <sys/priv.h> 52 #include <sys/reboot.h> 53 #include <sys/sysctl.h> 54 #include <sys/tty.h> 55 #include <sys/uio.h> 56 #include <sys/msgport.h> 57 #include <sys/msgport2.h> 58 #include <sys/device.h> 59 60 #include <ddb/ddb.h> 61 62 #include <machine/cpu.h> 63 64 static d_open_t cnopen; 65 static d_close_t cnclose; 66 static d_read_t cnread; 67 static d_write_t cnwrite; 68 static d_ioctl_t cnioctl; 69 static d_poll_t cnpoll; 70 static d_kqfilter_t cnkqfilter; 71 72 static int cnintercept(struct dev_generic_args *ap); 73 74 #define CDEV_MAJOR 0 75 static struct dev_ops cn_ops = { 76 { "console", CDEV_MAJOR, D_TTY | D_KQFILTER }, 77 .d_open = cnopen, 78 .d_close = cnclose, 79 .d_read = cnread, 80 .d_write = cnwrite, 81 .d_ioctl = cnioctl, 82 .d_poll = cnpoll, 83 .d_kqfilter = cnkqfilter, 84 }; 85 86 static struct dev_ops cn_iops = { 87 { "intercept", CDEV_MAJOR, D_TTY | D_KQFILTER }, 88 .d_default = cnintercept 89 }; 90 91 static struct dev_ops *cn_fwd_ops; 92 static cdev_t cn_dev; 93 94 //XXX: get this shit out! (alexh) 95 #if 0 96 SYSCTL_OPAQUE(_machdep, CPU_CONSDEV, consdev, CTLFLAG_RD, 97 &cn_udev, sizeof cn_udev, "T,udev_t", ""); 98 #endif 99 100 static int cn_mute; 101 102 int cons_unavail = 0; /* XXX: 103 * physical console not available for 104 * input (i.e., it is in graphics mode) 105 */ 106 107 static u_char cn_is_open; /* nonzero if logical console is open */ 108 static int openmode, openflag; /* how /dev/console was openned */ 109 static cdev_t cn_devfsdev; /* represents the device private info */ 110 static u_char cn_phys_is_open; /* nonzero if physical device is open */ 111 static u_char console_pausing; /* pause after each line during probe */ 112 static char *console_pausestr= 113 "<pause; press any key to proceed to next line or '.' to end pause mode>"; 114 115 struct consdev *cn_tab; /* physical console device info */ 116 struct consdev *gdb_tab; /* physical gdb debugger device info */ 117 118 CONS_DRIVER(cons, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL); 119 SET_DECLARE(cons_set, struct consdev); 120 121 void 122 cninit(void) 123 { 124 struct consdev *best_cp, *cp, **list; 125 126 /* 127 * Check if we should mute the console (for security reasons perhaps) 128 * It can be changes dynamically using sysctl kern.consmute 129 * once we are up and going. 130 * 131 */ 132 cn_mute = ((boothowto & (RB_MUTE 133 |RB_SINGLE 134 |RB_VERBOSE 135 |RB_ASKNAME 136 |RB_CONFIG)) == RB_MUTE); 137 138 /* 139 * Find the first console with the highest priority. 140 */ 141 best_cp = NULL; 142 SET_FOREACH(list, cons_set) { 143 cp = *list; 144 if (cp->cn_probe == NULL) 145 continue; 146 (*cp->cn_probe)(cp); 147 if (cp->cn_pri > CN_DEAD && cp->cn_probegood && 148 (best_cp == NULL || cp->cn_pri > best_cp->cn_pri)) 149 best_cp = cp; 150 } 151 152 153 /* 154 * If no console, give up. 155 */ 156 if (best_cp == NULL) { 157 if (cn_tab != NULL && cn_tab->cn_term != NULL) 158 (*cn_tab->cn_term)(cn_tab); 159 cn_tab = best_cp; 160 return; 161 } 162 163 /* 164 * Initialize console, then attach to it. This ordering allows 165 * debugging using the previous console, if any. 166 */ 167 (*best_cp->cn_init)(best_cp); 168 if (cn_tab != NULL && cn_tab != best_cp) { 169 /* Turn off the previous console. */ 170 if (cn_tab->cn_term != NULL) 171 (*cn_tab->cn_term)(cn_tab); 172 } 173 if (boothowto & RB_PAUSE) 174 console_pausing = 1; 175 cn_tab = best_cp; 176 } 177 178 179 /* 180 * Hook the open and close functions on the selected device. 181 */ 182 void 183 cninit_finish(void) 184 { 185 if ((cn_tab == NULL) || cn_mute) 186 return; 187 if (cn_tab->cn_dev == NULL) { 188 cn_tab->cn_init_fini(cn_tab); 189 if (cn_tab->cn_dev == NULL) { 190 kprintf("Unable to hook console! cn_tab %p\n", cn_tab); 191 return; 192 } 193 } 194 195 cn_fwd_ops = dev_ops_intercept(cn_tab->cn_dev, &cn_iops); 196 cn_dev = cn_tab->cn_dev; 197 console_pausing = 0; 198 } 199 200 static void 201 cnuninit(void) 202 { 203 if (cn_tab == NULL) 204 return; 205 if (cn_fwd_ops) 206 dev_ops_restore(cn_tab->cn_dev, cn_fwd_ops); 207 cn_fwd_ops = NULL; 208 cn_dev = NULL; 209 } 210 211 212 /* 213 * User has changed the state of the console muting. 214 * This may require us to open or close the device in question. 215 */ 216 static int 217 sysctl_kern_consmute(SYSCTL_HANDLER_ARGS) 218 { 219 int error; 220 int ocn_mute; 221 222 ocn_mute = cn_mute; 223 error = sysctl_handle_int(oidp, &cn_mute, 0, req); 224 if((error == 0) && (cn_tab != NULL) && (req->newptr != NULL)) { 225 if(ocn_mute && !cn_mute) { 226 /* 227 * going from muted to unmuted.. open the physical dev 228 * if the console has been openned 229 */ 230 cninit_finish(); 231 if (cn_is_open) { 232 /* XXX curproc is not what we want really */ 233 error = dev_dopen(cn_dev, openflag, 234 openmode, curproc->p_ucred); 235 } 236 /* if it failed, back it out */ 237 if ( error != 0) cnuninit(); 238 } else if (!ocn_mute && cn_mute) { 239 /* 240 * going from unmuted to muted.. close the physical dev 241 * if it's only open via /dev/console 242 */ 243 if (cn_is_open) { 244 error = dev_dclose(cn_dev, openflag, 245 openmode); 246 } 247 if (error == 0) 248 cnuninit(); 249 } 250 if (error != 0) { 251 /* 252 * back out the change if there was an error 253 */ 254 cn_mute = ocn_mute; 255 } 256 } 257 return (error); 258 } 259 260 SYSCTL_PROC(_kern, OID_AUTO, consmute, CTLTYPE_INT|CTLFLAG_RW, 261 0, sizeof cn_mute, sysctl_kern_consmute, "I", ""); 262 263 264 /* 265 * We intercept the OPEN and CLOSE calls on the original device, and 266 * forward the rest through. 267 */ 268 static int 269 cnintercept(struct dev_generic_args *ap) 270 { 271 int error; 272 273 if (ap->a_desc == &dev_open_desc) { 274 error = cnopen((struct dev_open_args *)ap); 275 } else if (ap->a_desc == &dev_close_desc) { 276 error = cnclose((struct dev_close_args *)ap); 277 } else if (cn_fwd_ops) { 278 error = dev_doperate_ops(cn_fwd_ops, ap); 279 } else { 280 error = ENXIO; 281 } 282 return (error); 283 } 284 285 /* 286 * cnopen() is called as an intercept function (dev will be that of the 287 * actual physical device representing our console), and also called from 288 * the muting code and from the /dev/console switch (dev will have the 289 * console's cdevsw). 290 */ 291 static int 292 cnopen(struct dev_open_args *ap) 293 { 294 cdev_t dev = ap->a_head.a_dev; 295 int flag = ap->a_oflags; 296 int mode = ap->a_devtype; 297 cdev_t cndev; 298 cdev_t physdev; 299 int retval = 0; 300 301 if (cn_tab == NULL || cn_fwd_ops == NULL) 302 return (0); 303 304 cndev = cn_tab->cn_dev; /* actual physical device */ 305 physdev = (dev == cn_devfsdev) ? cndev : dev; 306 307 /* 308 * If mute is active, then non console opens don't get here 309 * so we don't need to check for that. They bypass this and go 310 * straight to the device. 311 * 312 * It is important to note that due to our intercept and the fact 313 * that we might be called via the original (intercepted) device, 314 * the original device's ops may point to us, so to avoid an 315 * infinite recursion we have to forward through cn_fwd_ops. 316 * This is a severe hack that really needs to be fixed XXX. 317 * 318 * XXX at the moment we assume that the port forwarding function 319 * is synchronous for open. 320 */ 321 if (!cn_mute) { 322 ap->a_head.a_dev = physdev; 323 retval = dev_doperate_ops(cn_fwd_ops, &ap->a_head); 324 } 325 if (retval == 0) { 326 /* 327 * check if we openned it via /dev/console or 328 * via the physical entry (e.g. /dev/sio0). 329 */ 330 if (dev == cndev) { 331 cn_phys_is_open = 1; 332 } else if (physdev == cndev) { 333 openmode = mode; 334 openflag = flag; 335 cn_is_open = 1; 336 } 337 dev->si_tty = cndev->si_tty; 338 } 339 return (retval); 340 } 341 342 /* 343 * cnclose() is called as a port intercept function (dev will be that of the 344 * actual physical device representing our console), and also called from 345 * the muting code and from the /dev/console switch (dev will have the 346 * console's cdevsw). 347 */ 348 static int 349 cnclose(struct dev_close_args *ap) 350 { 351 struct tty *cn_tp; 352 cdev_t cndev; 353 cdev_t physdev; 354 cdev_t dev = ap->a_head.a_dev; 355 356 if (cn_tab == NULL || cn_fwd_ops == NULL) 357 return(0); 358 cndev = cn_tab->cn_dev; 359 cn_tp = cndev->si_tty; 360 physdev = (dev == cn_devfsdev) ? cndev : dev; 361 362 /* 363 * act appropriatly depending on whether it's /dev/console 364 * or the pysical device (e.g. /dev/sio) that's being closed. 365 * in either case, don't actually close the device unless 366 * both are closed. 367 */ 368 if (dev == cndev) { 369 /* the physical device is about to be closed */ 370 cn_phys_is_open = 0; 371 if (cn_is_open) { 372 if (cn_tp) { 373 /* perform a ttyhalfclose() */ 374 /* reset session and proc group */ 375 ttyclearsession(cn_tp); 376 } 377 return(0); 378 } 379 } else if (physdev == cndev) { 380 /* the logical console is about to be closed */ 381 cn_is_open = 0; 382 if (cn_phys_is_open) 383 return(0); 384 dev = cndev; 385 } 386 if (cn_fwd_ops) { 387 ap->a_head.a_dev = dev; 388 return (dev_doperate_ops(cn_fwd_ops, &ap->a_head)); 389 } 390 return (0); 391 } 392 393 /* 394 * The following functions are dispatched solely from the /dev/console 395 * device. Their job is primarily to forward the request through. 396 * If the console is not attached to anything then write()'s are sunk 397 * to null and reads return 0 (mostly). 398 */ 399 static int 400 cnread(struct dev_read_args *ap) 401 { 402 if (cn_tab == NULL || cn_fwd_ops == NULL) 403 return (0); 404 ap->a_head.a_dev = cn_tab->cn_dev; 405 return (dev_doperate(&ap->a_head)); 406 } 407 408 static int 409 cnwrite(struct dev_write_args *ap) 410 { 411 struct uio *uio = ap->a_uio; 412 cdev_t dev; 413 414 if (cn_tab == NULL || cn_fwd_ops == NULL) { 415 uio->uio_resid = 0; /* dump the data */ 416 return (0); 417 } 418 if (constty) 419 dev = constty->t_dev; 420 else 421 dev = cn_tab->cn_dev; 422 log_console(uio); 423 ap->a_head.a_dev = dev; 424 return (dev_doperate(&ap->a_head)); 425 } 426 427 static int 428 cnioctl(struct dev_ioctl_args *ap) 429 { 430 int error; 431 432 if (cn_tab == NULL || cn_fwd_ops == NULL) 433 return (0); 434 KKASSERT(curproc != NULL); 435 /* 436 * Superuser can always use this to wrest control of console 437 * output from the "virtual" console. 438 */ 439 if (ap->a_cmd == TIOCCONS && constty) { 440 if (ap->a_cred) { 441 error = priv_check_cred(ap->a_cred, PRIV_ROOT, 0); 442 if (error) 443 return (error); 444 } 445 constty = NULL; 446 return (0); 447 } 448 ap->a_head.a_dev = cn_tab->cn_dev; 449 return (dev_doperate(&ap->a_head)); 450 } 451 452 static int 453 cnpoll(struct dev_poll_args *ap) 454 { 455 if ((cn_tab == NULL) || cn_mute || cn_fwd_ops == NULL) 456 return (1); 457 ap->a_head.a_dev = cn_tab->cn_dev; 458 return (dev_doperate(&ap->a_head)); 459 } 460 461 static int 462 cnkqfilter(struct dev_kqfilter_args *ap) 463 { 464 if ((cn_tab == NULL) || cn_mute || cn_fwd_ops == NULL) 465 return (1); 466 ap->a_head.a_dev = cn_tab->cn_dev; 467 return (dev_doperate(&ap->a_head)); 468 } 469 470 /* 471 * These synchronous functions are primarily used the kernel needs to 472 * access the keyboard (e.g. when running the debugger), or output data 473 * directly to the console. 474 */ 475 int 476 cngetc(void) 477 { 478 int c; 479 if ((cn_tab == NULL) || cn_mute) 480 return (-1); 481 c = (*cn_tab->cn_getc)(cn_tab->cn_dev); 482 if (c == '\r') c = '\n'; /* console input is always ICRNL */ 483 return (c); 484 } 485 486 int 487 cncheckc(void) 488 { 489 if ((cn_tab == NULL) || cn_mute) 490 return (-1); 491 return ((*cn_tab->cn_checkc)(cn_tab->cn_dev)); 492 } 493 494 void 495 cnputc(int c) 496 { 497 char *cp; 498 499 if ((cn_tab == NULL) || cn_mute) 500 return; 501 if (c) { 502 if (c == '\n') 503 (*cn_tab->cn_putc)(cn_tab->cn_dev, '\r'); 504 (*cn_tab->cn_putc)(cn_tab->cn_dev, c); 505 #ifdef DDB 506 if (console_pausing && !db_active && (c == '\n')) { 507 #else 508 if (console_pausing && (c == '\n')) { 509 #endif 510 for(cp=console_pausestr; *cp != '\0'; cp++) 511 (*cn_tab->cn_putc)(cn_tab->cn_dev, *cp); 512 if (cngetc() == '.') 513 console_pausing = 0; 514 (*cn_tab->cn_putc)(cn_tab->cn_dev, '\r'); 515 for(cp=console_pausestr; *cp != '\0'; cp++) 516 (*cn_tab->cn_putc)(cn_tab->cn_dev, ' '); 517 (*cn_tab->cn_putc)(cn_tab->cn_dev, '\r'); 518 } 519 } 520 } 521 522 void 523 cndbctl(int on) 524 { 525 static int refcount; 526 527 if (cn_tab == NULL) 528 return; 529 if (!on) 530 refcount--; 531 if (refcount == 0 && cn_tab->cn_dbctl != NULL) 532 (*cn_tab->cn_dbctl)(cn_tab->cn_dev, on); 533 if (on) 534 refcount++; 535 } 536 537 static void 538 cn_drvinit(void *unused) 539 { 540 cn_devfsdev = make_only_devfs_dev(&cn_ops, 0, UID_ROOT, GID_WHEEL, 541 0600, "console"); 542 } 543 544 SYSINIT(cndev,SI_SUB_DRIVERS,SI_ORDER_MIDDLE+CDEV_MAJOR,cn_drvinit,NULL) 545