dz_vsbus.c revision 1.37
1 /* $NetBSD: dz_vsbus.c,v 1.37 2006/03/12 17:14:42 matt Exp $ */ 2 /* 3 * Copyright (c) 1998 Ludd, University of Lule}, Sweden. 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. All advertising materials mentioning features or use of this software 15 * must display the following acknowledgement: 16 * This product includes software developed at Ludd, University of 17 * Lule}, Sweden and its contributors. 18 * 4. The name of the author may not be used to endorse or promote products 19 * derived from this software without specific prior written permission 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33 #include <sys/cdefs.h> 34 __KERNEL_RCSID(0, "$NetBSD: dz_vsbus.c,v 1.37 2006/03/12 17:14:42 matt Exp $"); 35 36 #include <sys/param.h> 37 #include <sys/proc.h> 38 #include <sys/systm.h> 39 #include <sys/ioctl.h> 40 #include <sys/tty.h> 41 #include <sys/file.h> 42 #include <sys/conf.h> 43 #include <sys/device.h> 44 #include <sys/reboot.h> 45 46 #include <dev/cons.h> 47 48 #include <machine/mtpr.h> 49 #include <machine/sid.h> 50 #include <machine/uvax.h> 51 #include <machine/vsbus.h> 52 #include <machine/cpu.h> 53 #include <machine/scb.h> 54 55 #include <arch/vax/vax/gencons.h> 56 57 #include <dev/dec/dzreg.h> 58 #include <dev/dec/dzvar.h> 59 60 #include "ioconf.h" 61 #include "locators.h" 62 #include "dzkbd.h" 63 #include "dzms.h" 64 #include "opt_cputype.h" 65 66 #if NDZKBD > 0 || NDZMS > 0 67 #include <dev/dec/dzkbdvar.h> 68 69 #if 0 70 static struct dz_linestate dz_conslinestate = { NULL, -1, NULL, NULL, NULL }; 71 #endif 72 #endif 73 74 static int dz_vsbus_match(struct device *, struct cfdata *, void *); 75 static void dz_vsbus_attach(struct device *, struct device *, void *); 76 77 static vaddr_t dz_regs; /* Used for console */ 78 79 CFATTACH_DECL(dz_vsbus, sizeof(struct dz_softc), 80 dz_vsbus_match, dz_vsbus_attach, NULL, NULL); 81 82 #define REG(name) short name; short X##name##X; 83 static volatile struct ss_dz {/* base address of DZ-controller: 0x200A0000 */ 84 REG(csr); /* 00 Csr: control/status register */ 85 REG(rbuf); /* 04 Rbuf/Lpr: receive buffer/line param reg. */ 86 REG(tcr); /* 08 Tcr: transmit console register */ 87 REG(tdr); /* 0C Msr/Tdr: modem status reg/transmit data reg */ 88 REG(lpr0); /* 10 Lpr0: */ 89 REG(lpr1); /* 14 Lpr0: */ 90 REG(lpr2); /* 18 Lpr0: */ 91 REG(lpr3); /* 1C Lpr0: */ 92 } *dz; 93 #undef REG 94 95 cons_decl(dz); 96 97 #if NDZKBD > 0 || NDZMS > 0 98 static int 99 dz_print(void *aux, const char *name) 100 { 101 #if 0 102 #if NDZKBD > 0 || NDZMS > 0 103 struct dz_attach_args *dz_args = aux; 104 if (name == NULL) { 105 aprint_normal (" line %d", dz_args->line); 106 if (dz_args->hwflags & DZ_HWFLAG_CONSOLE) 107 aprint_normal (" (console)"); 108 } 109 return (QUIET); 110 #else 111 if (name) 112 aprint_normal ("lkc at %s", name); 113 return (UNCONF); 114 #endif 115 #endif 116 return (UNCONF); 117 } 118 #endif 119 120 static int 121 dz_vsbus_match(struct device *parent, struct cfdata *cf, void *aux) 122 { 123 struct vsbus_attach_args *va = aux; 124 struct ss_dz *dzP; 125 short i; 126 127 #if VAX53 || VAX49 || VAXANY 128 if (vax_boardtype == VAX_BTYP_53 || vax_boardtype == VAX_BTYP_49) 129 if (cf->cf_loc[VSBUSCF_CSR] != 0x25000000) 130 return 0; /* Ugly */ 131 #endif 132 133 dzP = (struct ss_dz *)va->va_addr; 134 i = dzP->tcr; 135 dzP->csr = DZ_CSR_MSE|DZ_CSR_TXIE; 136 dzP->tcr = 0; 137 DELAY(1000); 138 dzP->tcr = 1; 139 DELAY(100000); 140 dzP->tcr = i; 141 142 /* If the device doesn't exist, no interrupt has been generated */ 143 return 1; 144 } 145 146 static void 147 dz_vsbus_attach(struct device *parent, struct device *self, void *aux) 148 { 149 struct dz_softc *sc = (void *)self; 150 struct vsbus_attach_args *va = aux; 151 #if NDZKBD > 0 152 extern const struct cdevsw dz_cdevsw; 153 #endif 154 #if NDZKBD > 0 || NDZMS > 0 155 struct dzkm_attach_args daa; 156 #endif 157 int s, consline; 158 159 /* 160 * XXX - This is evil and ugly, but... 161 * due to the nature of how bus_space_* works on VAX, this will 162 * be perfectly good until everything is converted. 163 */ 164 if (dz_regs == 0) /* This isn't console */ { 165 dz_regs = vax_map_physmem(va->va_paddr, 1); 166 consline = -1; 167 } else 168 consline = minor(cn_tab->cn_dev); 169 sc->sc_ioh = dz_regs; 170 sc->sc_dr.dr_csr = 0; 171 sc->sc_dr.dr_rbuf = 4; 172 sc->sc_dr.dr_dtr = 9; 173 sc->sc_dr.dr_break = 13; 174 sc->sc_dr.dr_tbuf = 12; 175 sc->sc_dr.dr_tcr = 8; 176 sc->sc_dr.dr_dcd = 13; 177 sc->sc_dr.dr_ring = 13; 178 179 sc->sc_dr.dr_firstreg = 0; 180 sc->sc_dr.dr_winsize = 14; 181 182 sc->sc_type = DZ_DZV; 183 184 sc->sc_dsr = 0x0f; /* XXX check if VS has modem ctrl bits */ 185 186 scb_vecalloc(va->va_cvec, dzxint, sc, SCB_ISTACK, &sc->sc_tintrcnt); 187 scb_vecalloc(va->va_cvec - 4, dzrint, sc, SCB_ISTACK, &sc->sc_rintrcnt); 188 189 printf("\n%s: 4 lines", self->dv_xname); 190 191 dzattach(sc, NULL, consline); 192 DELAY(10000); 193 194 if (consline != -1) 195 cn_set_magic("\033D"); /* set VAX DDB escape sequence */ 196 197 #if NDZKBD > 0 198 /* Don't touch this port if this is the console */ 199 if (cn_tab->cn_dev != makedev(cdevsw_lookup_major(&dz_cdevsw), 0)) { 200 dz->rbuf = DZ_LPR_RX_ENABLE | (DZ_LPR_B4800 << 8) 201 | DZ_LPR_8_BIT_CHAR; 202 daa.daa_line = 0; 203 daa.daa_flags = 204 (cn_tab->cn_pri == CN_INTERNAL ? DZKBD_CONSOLE : 0); 205 config_found(self, &daa, dz_print); 206 } 207 #endif 208 #if NDZMS > 0 209 dz->rbuf = DZ_LPR_RX_ENABLE | (DZ_LPR_B4800 << 8) | DZ_LPR_8_BIT_CHAR \ 210 | DZ_LPR_PARENB | DZ_LPR_OPAR | 1 /* line */; 211 daa.daa_line = 1; 212 daa.daa_flags = 0; 213 config_found(self, &daa, dz_print); 214 #endif 215 s = spltty(); 216 dzrint(sc); 217 dzxint(sc); 218 splx(s); 219 } 220 221 int 222 dzcngetc(dev_t dev) 223 { 224 int c = 0, s; 225 int mino = minor(dev); 226 u_short rbuf; 227 228 s = spltty(); 229 do { 230 while ((dz->csr & 0x80) == 0) 231 ; /* Wait for char */ 232 rbuf = dz->rbuf; 233 if (((rbuf >> 8) & 3) != mino) 234 continue; 235 c = rbuf & 0x7f; 236 } while (c == 17 || c == 19); /* ignore XON/XOFF */ 237 splx(s); 238 239 if (c == 13) 240 c = 10; 241 242 return (c); 243 } 244 245 void 246 dzcnprobe(struct consdev *cndev) 247 { 248 extern vaddr_t iospace; 249 int diagcons; 250 paddr_t ioaddr = 0x200A0000; 251 extern const struct cdevsw dz_cdevsw; 252 253 switch (vax_boardtype) { 254 case VAX_BTYP_410: 255 case VAX_BTYP_420: 256 case VAX_BTYP_43: 257 diagcons = (vax_confdata & 0x20 ? 3 : 0); 258 break; 259 260 case VAX_BTYP_46: 261 case VAX_BTYP_48: 262 diagcons = (vax_confdata & 0x100 ? 3 : 0); 263 break; 264 265 case VAX_BTYP_49: 266 case VAX_BTYP_53: 267 ioaddr = 0x25000000; 268 diagcons = (vax_confdata & 8 ? 3 : 0); 269 break; 270 271 default: 272 cndev->cn_pri = CN_DEAD; 273 return; 274 } 275 if (diagcons) 276 cndev->cn_pri = CN_REMOTE; 277 else 278 cndev->cn_pri = CN_NORMAL; 279 cndev->cn_dev = makedev(cdevsw_lookup_major(&dz_cdevsw), diagcons); 280 dz_regs = iospace; 281 dz = (void *)dz_regs; 282 ioaccess(iospace, ioaddr, 1); 283 } 284 285 void 286 dzcninit(struct consdev *cndev) 287 { 288 dz = (void*)dz_regs; 289 290 dz->csr = 0; /* Disable scanning until initting is done */ 291 dz->tcr = (1 << minor(cndev->cn_dev)); /* Turn on xmitter */ 292 dz->csr = 0x20; /* Turn scanning back on */ 293 } 294 295 296 void 297 dzcnputc(dev_t dev, int ch) 298 { 299 int timeout = 1<<15; /* don't hang the machine! */ 300 int mino = minor(dev); 301 int s; 302 u_short tcr; 303 304 if (mfpr(PR_MAPEN) == 0) 305 return; 306 307 s = spltty(); 308 tcr = dz->tcr; /* remember which lines to scan */ 309 dz->tcr = (1 << mino); 310 311 while ((dz->csr & 0x8000) == 0) /* Wait until ready */ 312 if (--timeout < 0) 313 break; 314 dz->tdr = ch; /* Put the character */ 315 timeout = 1<<15; 316 while ((dz->csr & 0x8000) == 0) /* Wait until ready */ 317 if (--timeout < 0) 318 break; 319 320 dz->tcr = tcr; 321 splx(s); 322 } 323 324 void 325 dzcnpollc(dev_t dev, int pollflag) 326 { 327 static u_char mask; 328 329 if (pollflag) 330 mask = vsbus_setmask(0); 331 else 332 vsbus_setmask(mask); 333 } 334 335 #if NDZKBD > 0 || NDZMS > 0 336 int 337 dzgetc(struct dz_linestate *ls) 338 { 339 int line = ls->dz_line; 340 int s; 341 u_short rbuf; 342 343 s = spltty(); 344 for (;;) { 345 for(; (dz->csr & DZ_CSR_RX_DONE) == 0;); 346 rbuf = dz->rbuf; 347 if (((rbuf >> 8) & 3) == line) { 348 splx(s); 349 return (rbuf & 0xff); 350 } 351 } 352 } 353 354 void 355 dzputc(struct dz_linestate *ls, int ch) 356 { 357 int line; 358 u_short tcr; 359 int s; 360 extern const struct cdevsw dz_cdevsw; 361 362 /* if the dz has already been attached, the MI 363 driver will do the transmitting: */ 364 if (ls && ls->dz_sc) { 365 s = spltty(); 366 line = ls->dz_line; 367 putc(ch, &ls->dz_tty->t_outq); 368 tcr = dz->tcr; 369 if (!(tcr & (1 << line))) 370 dz->tcr = tcr | (1 << line); 371 dzxint(ls->dz_sc); 372 splx(s); 373 return; 374 } 375 376 /* use dzcnputc to do the transmitting: */ 377 dzcnputc(makedev(cdevsw_lookup_major(&dz_cdevsw), 0), ch); 378 } 379 #endif /* NDZKBD > 0 || NDZMS > 0 */ 380
Indexes created Tue Sep 30 17:09:57 GMT 2025