1 /*- 2 * Copyright (C) 2008 by Nathan Whitehorn. All rights reserved. 3 * 4 * Redistribution and use in source and binary forms, with or without 5 * modification, are permitted provided that the following conditions 6 * are met: 7 * 1. Redistributions of source code must retain the above copyright 8 * notice, this list of conditions and the following disclaimer. 9 * 2. Redistributions in binary form must reproduce the above copyright 10 * notice, this list of conditions and the following disclaimer in the 11 * documentation and/or other materials provided with the distribution. 12 * 13 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 14 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 15 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 16 * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 17 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 18 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; 19 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 20 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 21 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 22 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 23 */ 24 25 #include <sys/cdefs.h> 26 __FBSDID("$FreeBSD$"); 27 28 #include "opt_comconsole.h" 29 30 #include <sys/param.h> 31 #include <sys/kdb.h> 32 #include <sys/kernel.h> 33 #include <sys/priv.h> 34 #include <sys/systm.h> 35 #include <sys/types.h> 36 #include <sys/conf.h> 37 #include <sys/cons.h> 38 #include <sys/consio.h> 39 #include <sys/tty.h> 40 41 #include <dev/ofw/openfirm.h> 42 43 #include <ddb/ddb.h> 44 45 #include "mambocall.h" 46 47 #define MAMBOBURSTLEN 128 /* max number of bytes to write in one chunk */ 48 49 #define MAMBO_CONSOLE_WRITE 0 50 #define MAMBO_CONSOLE_READ 60 51 52 static tsw_outwakeup_t mambotty_outwakeup; 53 54 static struct ttydevsw mambo_ttydevsw = { 55 .tsw_flags = TF_NOPREFIX, 56 .tsw_outwakeup = mambotty_outwakeup, 57 }; 58 59 static int polltime; 60 static struct callout mambo_callout; 61 static struct tty *tp = NULL; 62 63 #if defined(KDB) && defined(ALT_BREAK_TO_DEBUGGER) 64 static int alt_break_state; 65 #endif 66 67 static void mambo_timeout(void *); 68 69 static cn_probe_t mambo_cnprobe; 70 static cn_init_t mambo_cninit; 71 static cn_term_t mambo_cnterm; 72 static cn_getc_t mambo_cngetc; 73 static cn_putc_t mambo_cnputc; 74 75 CONSOLE_DRIVER(mambo); 76 77 static void 78 cn_drvinit(void *unused) 79 { 80 81 if (mambo_consdev.cn_pri != CN_DEAD && 82 mambo_consdev.cn_name[0] != '\0') { 83 if (OF_finddevice("/mambo") == -1) 84 return; 85 86 tp = tty_alloc(&mambo_ttydevsw, NULL); 87 tty_init_console(tp, 0); 88 tty_makedev(tp, NULL, "%s", "mambocons"); 89 90 polltime = 1; 91 92 callout_init(&mambo_callout, CALLOUT_MPSAFE); 93 callout_reset(&mambo_callout, polltime, mambo_timeout, NULL); 94 } 95 } 96 97 SYSINIT(cndev, SI_SUB_CONFIGURE, SI_ORDER_MIDDLE, cn_drvinit, NULL); 98 99 static void 100 mambotty_outwakeup(struct tty *tp) 101 { 102 int len; 103 u_char buf[MAMBOBURSTLEN]; 104 105 for (;;) { 106 len = ttydisc_getc(tp, buf, sizeof buf); 107 if (len == 0) 108 break; 109 mambocall(MAMBO_CONSOLE_WRITE, buf, (register_t)len, 1UL); 110 } 111 } 112 113 static void 114 mambo_timeout(void *v) 115 { 116 int c; 117 118 tty_lock(tp); 119 while ((c = mambo_cngetc(NULL)) != -1) 120 ttydisc_rint(tp, c, 0); 121 ttydisc_rint_done(tp); 122 tty_unlock(tp); 123 124 callout_reset(&mambo_callout, polltime, mambo_timeout, NULL); 125 } 126 127 static void 128 mambo_cnprobe(struct consdev *cp) 129 { 130 if (OF_finddevice("/mambo") == -1) { 131 cp->cn_pri = CN_DEAD; 132 return; 133 } 134 135 cp->cn_pri = CN_NORMAL; 136 } 137 138 static void 139 mambo_cninit(struct consdev *cp) 140 { 141 142 /* XXX: This is the alias, but that should be good enough */ 143 strcpy(cp->cn_name, "mambocons"); 144 } 145 146 static void 147 mambo_cnterm(struct consdev *cp) 148 { 149 } 150 151 static int 152 mambo_cngetc(struct consdev *cp) 153 { 154 int ch; 155 156 ch = mambocall(MAMBO_CONSOLE_READ); 157 158 if (ch > 0 && ch < 0xff) { 159 #if defined(KDB) && defined(ALT_BREAK_TO_DEBUGGER) 160 int kdb_brk; 161 162 if ((kdb_brk = kdb_alt_break(ch, &alt_break_state)) != 0) { 163 switch (kdb_brk) { 164 case KDB_REQ_DEBUGGER: 165 kdb_enter(KDB_WHY_BREAK, 166 "Break sequence on console"); 167 break; 168 case KDB_REQ_PANIC: 169 kdb_panic("Panic sequence on console"); 170 break; 171 case KDB_REQ_REBOOT: 172 kdb_reboot(); 173 break; 174 175 } 176 } 177 #endif 178 return (ch); 179 } 180 181 return (-1); 182 } 183 184 static void 185 mambo_cnputc(struct consdev *cp, int c) 186 { 187 char cbuf; 188 189 cbuf = c; 190 mambocall(MAMBO_CONSOLE_WRITE, &cbuf, 1UL, 1UL); 191 } 192