1 /* $NetBSD: romcons.c,v 1.2 2014/03/16 05:20:25 dholland Exp $ */ 2 3 /* 4 * Copyright (C) 1995, 1996 Wolfgang Solfrank. 5 * Copyright (C) 1995, 1996 TooLs GmbH. 6 * All rights reserved. 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 TooLs GmbH. 19 * 4. The name of TooLs GmbH may not be used to endorse or promote products 20 * derived from this software without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR 23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 25 * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 26 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 27 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; 28 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 29 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 30 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 31 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 32 */ 33 /* 34 * romcons.c - from sys/dev/ofw/ofcons.c 35 */ 36 37 #include <sys/cdefs.h> 38 __KERNEL_RCSID(0, "$NetBSD: romcons.c,v 1.2 2014/03/16 05:20:25 dholland Exp $"); 39 40 #include <sys/param.h> 41 #include <sys/conf.h> 42 #include <sys/device.h> 43 #include <sys/proc.h> 44 #include <sys/systm.h> 45 #include <sys/callout.h> 46 #include <sys/tty.h> 47 #include <sys/kauth.h> 48 49 #include <dev/cons.h> 50 51 #include <machine/autoconf.h> 52 #include <machine/romcall.h> 53 54 #include "ioconf.h" 55 56 struct romcons_softc { 57 device_t sc_dev; 58 struct tty *sc_tty; 59 struct callout sc_poll_ch; 60 int sc_flags; 61 #define CONS_POLL 1 62 }; 63 64 #define BURSTLEN 128 /* max number of bytes to write in one chunk */ 65 66 cons_decl(romcons_); 67 68 static int romcons_match(device_t, cfdata_t, void *); 69 static void romcons_attach(device_t, device_t, void *); 70 71 CFATTACH_DECL_NEW(romcons, sizeof(struct romcons_softc), 72 romcons_match, romcons_attach, NULL, NULL); 73 74 dev_type_open(romcons_open); 75 dev_type_close(romcons_close); 76 dev_type_read(romcons_read); 77 dev_type_write(romcons_write); 78 dev_type_ioctl(romcons_ioctl); 79 dev_type_tty(romcons_tty); 80 dev_type_poll(romcons_poll); 81 82 void romcons_kbdinput(int); 83 84 const struct cdevsw romcons_cdevsw = { 85 .d_open = romcons_open, 86 .d_close = romcons_close, 87 .d_read = romcons_read, 88 .d_write = romcons_write, 89 .d_ioctl = romcons_ioctl, 90 .d_stop = nostop, 91 .d_tty = romcons_tty, 92 .d_poll = romcons_poll, 93 .d_mmap = nommap, 94 .d_kqfilter = ttykqfilter, 95 .d_flag = D_TTY 96 }; 97 98 struct consdev consdev_rom = cons_init(romcons_); 99 100 bool romcons_is_console; 101 102 static int 103 romcons_match(device_t parent, cfdata_t match, void *aux) 104 { 105 struct mainbus_attach_args *ma = aux; 106 static bool romcons_matched; 107 108 if (strcmp(ma->ma_name, "romcons")) 109 return 0; 110 111 if (!romcons_is_console) 112 return 0; 113 114 if (romcons_matched) 115 return 0; 116 117 romcons_matched = true; 118 return 1; 119 } 120 121 static void 122 romcons_attach(device_t parent, device_t self, void *aux) 123 { 124 struct romcons_softc *sc = device_private(self); 125 126 sc->sc_dev = self; 127 vectab[46] = romcallvec; /* XXX */ 128 aprint_normal("\n"); 129 130 callout_init(&sc->sc_poll_ch, 0); 131 } 132 133 static void romcons_start(struct tty *); 134 static int romcons_param(struct tty *, struct termios *); 135 static void romcons_pollin(void *); 136 137 int 138 romcons_open(dev_t dev, int flag, int mode, struct lwp *l) 139 { 140 struct romcons_softc *sc; 141 struct tty *tp; 142 143 sc = device_lookup_private(&romcons_cd, minor(dev)); 144 if (sc == NULL) 145 return ENXIO; 146 if ((tp = sc->sc_tty) == 0) 147 sc->sc_tty = tp = tty_alloc(); 148 tp->t_oproc = romcons_start; 149 tp->t_param = romcons_param; 150 tp->t_dev = dev; 151 if (kauth_authorize_device_tty(l->l_cred, KAUTH_DEVICE_TTY_OPEN, tp)) 152 return EBUSY; 153 if ((tp->t_state & TS_ISOPEN) == 0) { 154 ttychars(tp); 155 tp->t_iflag = TTYDEF_IFLAG; 156 tp->t_oflag = TTYDEF_OFLAG; 157 tp->t_cflag = TTYDEF_CFLAG; 158 tp->t_lflag = TTYDEF_LFLAG; 159 tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED; 160 romcons_param(tp, &tp->t_termios); 161 ttsetwater(tp); 162 } 163 tp->t_state |= TS_CARR_ON; 164 165 if ((sc->sc_flags & CONS_POLL) == 0) { 166 sc->sc_flags |= CONS_POLL; 167 callout_reset(&sc->sc_poll_ch, 1, romcons_pollin, sc); 168 } 169 170 return (*tp->t_linesw->l_open)(dev, tp); 171 } 172 173 int 174 romcons_close(dev_t dev, int flag, int mode, struct lwp *l) 175 { 176 struct romcons_softc *sc; 177 struct tty *tp; 178 179 sc = device_lookup_private(&romcons_cd, minor(dev)); 180 tp = sc->sc_tty; 181 callout_stop(&sc->sc_poll_ch); 182 sc->sc_flags &= ~CONS_POLL; 183 (*tp->t_linesw->l_close)(tp, flag); 184 ttyclose(tp); 185 return 0; 186 } 187 188 int 189 romcons_read(dev_t dev, struct uio *uio, int flag) 190 { 191 struct romcons_softc *sc; 192 struct tty *tp; 193 194 sc = device_lookup_private(&romcons_cd, minor(dev)); 195 tp = sc->sc_tty; 196 197 return (*tp->t_linesw->l_read)(tp, uio, flag); 198 } 199 200 int 201 romcons_write(dev_t dev, struct uio *uio, int flag) 202 { 203 struct romcons_softc *sc; 204 struct tty *tp; 205 206 sc = device_lookup_private(&romcons_cd, minor(dev)); 207 tp = sc->sc_tty; 208 return (*tp->t_linesw->l_write)(tp, uio, flag); 209 } 210 211 int 212 romcons_poll(dev_t dev, int events, struct lwp *l) 213 { 214 struct romcons_softc *sc; 215 struct tty *tp; 216 217 sc = device_lookup_private(&romcons_cd, minor(dev)); 218 tp = sc->sc_tty; 219 return (*tp->t_linesw->l_poll)(tp, events, l); 220 } 221 int 222 romcons_ioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l) 223 { 224 struct romcons_softc *sc; 225 struct tty *tp; 226 int error; 227 228 sc = device_lookup_private(&romcons_cd, minor(dev)); 229 tp = sc->sc_tty; 230 if ((error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, l)) != 231 EPASSTHROUGH) 232 return error; 233 return ttioctl(tp, cmd, data, flag, l); 234 } 235 236 struct tty * 237 romcons_tty(dev_t dev) 238 { 239 struct romcons_softc *sc; 240 241 sc = device_lookup_private(&romcons_cd, minor(dev)); 242 return sc->sc_tty; 243 } 244 245 static void 246 romcons_start(struct tty *tp) 247 { 248 int s, len; 249 uint8_t buf[BURSTLEN]; 250 251 s = spltty(); 252 if (tp->t_state & (TS_TIMEOUT | TS_BUSY | TS_TTSTOP)) { 253 splx(s); 254 return; 255 } 256 tp->t_state |= TS_BUSY; 257 splx(s); 258 len = q_to_b(&tp->t_outq, buf, BURSTLEN); 259 s = splhigh(); 260 rom_write(1, buf, len); 261 splx(s); 262 s = spltty(); 263 tp->t_state &= ~TS_BUSY; 264 if (ttypull(tp)) { 265 tp->t_state |= TS_TIMEOUT; 266 callout_schedule(&tp->t_rstrt_ch, 1); 267 } 268 splx(s); 269 } 270 271 static int 272 romcons_param(struct tty *tp, struct termios *t) 273 { 274 275 tp->t_ispeed = t->c_ispeed; 276 tp->t_ospeed = t->c_ospeed; 277 tp->t_cflag = t->c_cflag; 278 return 0; 279 } 280 281 static void 282 romcons_pollin(void *aux) 283 { 284 struct romcons_softc *sc = aux; 285 struct tty *tp = sc->sc_tty; 286 char ch; 287 int rv; 288 289 while (0 && (rv = rom_read(1, &ch, 1)) > 0) { 290 if (tp && (tp->t_state & TS_ISOPEN)) 291 (*tp->t_linesw->l_rint)(ch, tp); 292 } 293 callout_reset(&sc->sc_poll_ch, 1, romcons_pollin, sc); 294 } 295 296 void 297 romcons_kbdinput(int ks) 298 { 299 struct romcons_softc *sc; 300 struct tty *tp; 301 302 sc = device_lookup_private(&romcons_cd, 0); 303 tp = sc->sc_tty; 304 if (tp && (tp->t_state & TS_ISOPEN)) 305 (*tp->t_linesw->l_rint)(ks, tp); 306 } 307 308 void 309 romcons_cnprobe(struct consdev *cd) 310 { 311 } 312 313 void 314 romcons_cninit(struct consdev *cd) 315 { 316 int maj; 317 318 maj = cdevsw_lookup_major(&romcons_cdevsw); 319 cd->cn_dev = makedev(maj, 0); 320 romcons_is_console = true; 321 vectab[46] = romcallvec; /* XXX */ 322 } 323 324 int 325 romcons_cngetc(dev_t dev) 326 { 327 unsigned char ch = '\0'; 328 int l; 329 330 while ((l = rom_read(1, &ch, 1)) != 1) 331 if (l != -2 && l != 0) 332 return -1; 333 return ch; 334 } 335 336 void 337 romcons_cnputc(dev_t dev, int c) 338 { 339 char ch = c; 340 341 rom_write(1, &ch, 1); 342 } 343 344 void 345 romcons_cnpollc(dev_t dev, int on) 346 { 347 struct romcons_softc *sc; 348 349 sc = device_lookup_private(&romcons_cd, minor(dev)); 350 351 if (sc == NULL) 352 return; 353 if (on) { 354 if (sc->sc_flags & CONS_POLL) 355 callout_stop(&sc->sc_poll_ch); 356 sc->sc_flags &= ~CONS_POLL; 357 } else { 358 if ((sc->sc_flags & CONS_POLL) == 0) { 359 sc->sc_flags |= CONS_POLL; 360 callout_reset(&sc->sc_poll_ch, 1, romcons_pollin, sc); 361 } 362 } 363 } 364