1/* $OpenBSD: bioscons.c,v 1.11 2016/05/27 05:37:51 beck Exp $ */ 2 3/* 4 * Copyright (c) 1997-1999 Michael Shalayeff 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 19 * IN NO EVENT SHALL THE AUTHOR OR HIS RELATIVES BE LIABLE FOR ANY DIRECT, 20 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 21 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 22 * SERVICES; LOSS OF MIND, USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 24 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING 25 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF 26 * THE POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29#include <sys/types.h> 30 31#include <machine/biosvar.h> 32#include <machine/pio.h> 33 34#include <dev/cons.h> 35#include <dev/ic/mc146818reg.h> 36#include <dev/ic/comreg.h> 37#include <dev/ic/ns16450reg.h> 38#include <dev/isa/isareg.h> 39 40#include <lib/libsa/stand.h> 41 42#include "biosdev.h" 43 44/* XXX cannot trust NVRAM on this. Maybe later we make a real probe. */ 45#if 0 46#define PRESENT_MASK (NVRAM_EQUIPMENT_KBD|NVRAM_EQUIPMENT_DISPLAY) 47#else 48#define PRESENT_MASK 0 49#endif 50 51void 52pc_probe(struct consdev *cn) 53{ 54 cn->cn_pri = CN_MIDPRI; 55 cn->cn_dev = makedev(12, 0); 56 printf(" pc%d", minor(cn->cn_dev)); 57 58#if 0 59 outb(IO_RTC, NVRAM_EQUIPMENT); 60 if ((inb(IO_RTC+1) & PRESENT_MASK) == PRESENT_MASK) { 61 cn->cn_pri = CN_MIDPRI; 62 /* XXX from i386/conf.c */ 63 cn->cn_dev = makedev(12, 0); 64 printf(" pc%d", minor(cn->cn_dev)); 65 } 66#endif 67} 68 69void 70pc_init(struct consdev *cn) 71{ 72} 73 74int 75pc_getc(dev_t dev) 76{ 77 register int rv; 78 79 if (dev & 0x80) { 80 __asm volatile(DOINT(0x16) "; setnz %b0" : "=a" (rv) : 81 "0" (0x100) : "%ecx", "%edx", "cc" ); 82 return (rv & 0xff); 83 } 84 85 /* 86 * Wait for a character to actually become available. Appears to 87 * be necessary on (at least) the Intel Mac Mini. 88 */ 89 do { 90 __asm volatile(DOINT(0x16) "; setnz %b0" : "=a" (rv) : 91 "0" (0x100) : "%ecx", "%edx", "cc" ); 92 } while ((rv & 0xff) == 0); 93 94 __asm volatile(DOINT(0x16) : "=a" (rv) : "0" (0x000) : 95 "%ecx", "%edx", "cc" ); 96 97 return (rv & 0xff); 98} 99 100int 101pc_getshifts(dev_t dev) 102{ 103 register int rv; 104 105 __asm volatile(DOINT(0x16) : "=a" (rv) : "0" (0x200) : 106 "%ecx", "%edx", "cc" ); 107 108 return (rv & 0xff); 109} 110 111void 112pc_putc(dev_t dev, int c) 113{ 114 __asm volatile(DOINT(0x10) : : "a" (c | 0xe00), "b" (1) : 115 "%ecx", "%edx", "cc" ); 116} 117 118const int comports[4] = { 0x3f8, 0x2f8, 0x3e8, 0x2e8 }; 119 120void 121com_probe(struct consdev *cn) 122{ 123 register int i, n; 124 125 /* get equip. (9-11 # of coms) */ 126 __asm volatile(DOINT(0x11) : "=a" (n) : : "%ecx", "%edx", "cc"); 127 n >>= 9; 128 n &= 7; 129 for (i = 0; i < n; i++) 130 printf(" com%d", i); 131 132 cn->cn_pri = CN_LOWPRI; 133 /* XXX from i386/conf.c */ 134 cn->cn_dev = makedev(8, 0); 135} 136 137int com_speed = -1; 138int com_addr = -1; 139 140void 141com_init(struct consdev *cn) 142{ 143 int port = (com_addr == -1) ? comports[minor(cn->cn_dev)] : com_addr; 144 time_t tt = getsecs() + 1; 145 u_long i = 1; 146 147 outb(port + com_ier, 0); 148 if (com_speed == -1) 149 comspeed(cn->cn_dev, 9600); /* default speed is 9600 baud */ 150 outb(port + com_mcr, MCR_DTR | MCR_RTS); 151 outb(port + com_ier, 0); 152 outb(port + com_fifo, FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | 153 FIFO_TRIGGER_1); 154 (void) inb(port + com_iir); 155 156 /* A few ms delay for the chip, using the getsecs() API */ 157 while (!(i++ % 1000) && getsecs() < tt) 158 ; 159 160 /* drain the input buffer */ 161 while (inb(port + com_lsr) & LSR_RXRDY) 162 (void)inb(port + com_data); 163} 164 165int 166com_getc(dev_t dev) 167{ 168 int port = (com_addr == -1) ? comports[minor(dev & 0x7f)] : com_addr; 169 170 if (dev & 0x80) 171 return (inb(port + com_lsr) & LSR_RXRDY); 172 173 while ((inb(port + com_lsr) & LSR_RXRDY) == 0) 174 ; 175 176 return (inb(port + com_data) & 0xff); 177} 178 179/* call with sp == 0 to query the current speed */ 180int 181comspeed(dev_t dev, int sp) 182{ 183 int port = (com_addr == -1) ? comports[minor(dev)] : com_addr; 184 int i, newsp; 185 int err; 186 187 if (sp <= 0) 188 return com_speed; 189 /* valid baud rate? */ 190 if (115200 < sp || sp < 75) 191 return -1; 192 193 /* 194 * Accepted speeds: 195 * 75 150 300 600 1200 2400 4800 9600 19200 38400 76800 and 196 * 14400 28800 57600 115200 197 */ 198 for (i = sp; i != 75 && i != 14400; i >>= 1) 199 if (i & 1) 200 return -1; 201 202/* ripped screaming from dev/ic/com.c */ 203#define divrnd(n, q) (((n)*2/(q)+1)/2) /* divide and round off */ 204 newsp = divrnd((COM_FREQ / 16), sp); 205 if (newsp <= 0) 206 return -1; 207 err = divrnd((COM_FREQ / 16) * 1000, sp * newsp) - 1000; 208 if (err < 0) 209 err = -err; 210 if (err > COM_TOLERANCE) 211 return -1; 212#undef divrnd 213 214 if (com_speed != -1 && cn_tab && cn_tab->cn_dev == dev && 215 com_speed != sp) { 216 printf("com%d: changing speed to %d baud in 5 seconds, " 217 "change your terminal to match!\n\a", 218 minor(dev), sp); 219 sleep(5); 220 } 221 222 outb(port + com_cfcr, LCR_DLAB); 223 outb(port + com_dlbl, newsp); 224 outb(port + com_dlbh, newsp>>8); 225 outb(port + com_cfcr, LCR_8BITS); 226 if (com_speed != -1) 227 printf("\ncom%d: %d baud\n", minor(dev), sp); 228 229 newsp = com_speed; 230 com_speed = sp; 231 return newsp; 232} 233 234void 235com_putc(dev_t dev, int c) 236{ 237 int port = (com_addr == -1) ? comports[minor(dev)] : com_addr; 238 239 while ((inb(port + com_lsr) & LSR_TXRDY) == 0) 240 ; 241 242 outb(port + com_data, c); 243} 244