1 /* $NetBSD: puccn.c,v 1.13 2014/01/26 10:54:24 msaitoh Exp $ */ 2 3 /* 4 * Derived from pci.c 5 * Copyright (c) 2000 Geocast Networks Systems. All rights reserved. 6 * 7 * Copyright (c) 1995, 1996, 1997, 1998 8 * Christopher G. Demetriou. All rights reserved. 9 * Copyright (c) 1994 Charles M. Hannum. All rights reserved. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 3. All advertising materials mentioning features or use of this software 20 * must display the following acknowledgement: 21 * This product includes software developed by Charles M. Hannum. 22 * 4. The name of the author may not be used to endorse or promote products 23 * derived from this software without specific prior written permission. 24 * 25 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 26 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 27 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 28 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 29 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 30 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 31 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 32 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 33 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 34 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 35 */ 36 37 38 /* 39 * Machine independent support for PCI serial console support. 40 * 41 * Scan the PCI bus for something which resembles a 16550 42 */ 43 44 #include <sys/cdefs.h> 45 __KERNEL_RCSID(0, "$NetBSD: puccn.c,v 1.13 2014/01/26 10:54:24 msaitoh Exp $"); 46 47 #include "opt_kgdb.h" 48 49 #include <sys/param.h> 50 #include <sys/systm.h> 51 #include <sys/conf.h> 52 #include <sys/device.h> 53 54 #include <dev/pci/pcireg.h> 55 #include <dev/pci/pcivar.h> 56 #include <dev/pci/pcidevs.h> 57 58 #include <sys/termios.h> 59 #include <dev/ic/comreg.h> 60 #include <dev/ic/comvar.h> 61 62 #include <dev/cons.h> 63 64 #include <dev/pci/pucvar.h> 65 #include <dev/pci/puccn.h> 66 67 #ifndef CONSPEED 68 #define CONSPEED TTYDEF_SPEED 69 #endif 70 #ifndef CONMODE 71 #define CONMODE ((TTYDEF_CFLAG & ~(CSIZE|CSTOPB|PARENB))|CS8) /* 8N1 */ 72 #endif 73 74 cons_decl(com); 75 76 static bus_addr_t puccnbase; 77 static bus_space_tag_t puctag; 78 static int puccnflags; 79 80 #ifdef KGDB 81 static bus_addr_t pucgdbbase; 82 #endif 83 84 /* 85 * Static dev/func variables allow pucprobe to be called multiple times, 86 * resuming the search where it left off, never retrying the same adaptor. 87 */ 88 89 static bus_addr_t 90 pucprobe_doit(struct consdev *cn) 91 { 92 struct pci_attach_args pa; 93 int bus; 94 static int dev = 0, func = 0; 95 int maxdev, nfunctions = 0, i; /* XXX */ 96 pcireg_t reg, bhlcr, subsys = 0; /* XXX */ 97 int foundport = 0; 98 const struct puc_device_description *desc; 99 pcireg_t base; 100 101 /* Fetch our tags */ 102 #if defined(amd64) || defined(i386) 103 if (cpu_puc_cnprobe(cn, &pa) != 0) 104 #endif 105 return 0; 106 107 pci_decompose_tag(pa.pa_pc, pa.pa_tag, &bus, &maxdev, NULL); 108 109 /* Scan through devices and find a communication class device. */ 110 for (; dev <= maxdev ; dev++) { 111 pa.pa_tag = pci_make_tag(pa.pa_pc, bus, dev, 0); 112 reg = pci_conf_read(pa.pa_pc, pa.pa_tag, PCI_ID_REG); 113 if (PCI_VENDOR(reg) == PCI_VENDOR_INVALID 114 || PCI_VENDOR(reg) == 0) 115 continue; 116 bhlcr = pci_conf_read(pa.pa_pc, pa.pa_tag, PCI_BHLC_REG); 117 if (PCI_HDRTYPE_MULTIFN(bhlcr)) { 118 nfunctions = 8; 119 } else { 120 nfunctions = 1; 121 } 122 resume_scan: 123 for (; func < nfunctions; func++) { 124 pa.pa_tag = pci_make_tag(pa.pa_pc, bus, dev, func); 125 reg = pci_conf_read(pa.pa_pc, pa.pa_tag, PCI_CLASS_REG); 126 if (PCI_CLASS(reg) == PCI_CLASS_COMMUNICATIONS 127 && PCI_SUBCLASS(reg) 128 == PCI_SUBCLASS_COMMUNICATIONS_SERIAL) { 129 pa.pa_id = pci_conf_read(pa.pa_pc, pa.pa_tag, PCI_ID_REG); 130 subsys = pci_conf_read(pa.pa_pc, pa.pa_tag, 131 PCI_SUBSYS_ID_REG); 132 foundport = 1; 133 break; 134 } 135 } 136 if (foundport) 137 break; 138 139 func = 0; 140 } 141 142 /* 143 * If all devices was scanned and couldn't find any communication 144 * device, return with 0. 145 */ 146 if (!foundport) 147 return 0; 148 149 /* Clear foundport flag */ 150 foundport = 0; 151 152 /* Check whether the device is in the puc device table or not */ 153 desc = puc_find_description(PCI_VENDOR(pa.pa_id), 154 PCI_PRODUCT(pa.pa_id), PCI_VENDOR(subsys), PCI_PRODUCT(subsys)); 155 156 /* If not, check the next communication device */ 157 if (desc == NULL) { 158 /* Resume from the next function */ 159 func++; 160 goto resume_scan; 161 } 162 163 /* 164 * We found a device and it's on the puc table. Set the tag and 165 * the base address. 166 */ 167 for (i = 0; PUC_PORT_VALID(desc, i); i++) 168 { 169 if (desc->ports[i].type != PUC_PORT_TYPE_COM) 170 continue; 171 puccnflags = desc->ports[i].flags; 172 base = pci_conf_read(pa.pa_pc, pa.pa_tag, desc->ports[i].bar); 173 base += desc->ports[i].offset; 174 175 if (PCI_MAPREG_TYPE(base) == PCI_MAPREG_TYPE_IO) { 176 puctag = pa.pa_iot; 177 base = PCI_MAPREG_IO_ADDR(base); 178 } 179 #if 0 /* For MMIO device */ 180 else { 181 puctag = pa.pa_memt; 182 base = PCI_MAPREG_MEM_ADDR(base); 183 } 184 #endif 185 186 if (com_is_console(puctag, base, NULL)) 187 continue; 188 foundport = 1; 189 break; 190 } 191 192 if (foundport == 0) { 193 func++; 194 goto resume_scan; 195 } 196 197 #if 0 198 cn->cn_pri = CN_REMOTE; 199 #else 200 if (cn) 201 cn->cn_pri = CN_REMOTE; 202 #endif 203 return base; 204 } 205 206 #ifdef KGDB 207 void comgdbprobe(struct consdev *); 208 void comgdbinit(struct consdev *); 209 210 void 211 comgdbprobe(struct consdev *cn) 212 { 213 214 pucgdbbase = pucprobe_doit(cn); 215 } 216 217 void 218 comgdbinit(struct consdev *cn) 219 { 220 221 if (pucgdbbase == 0) 222 return; 223 224 com_kgdb_attach(puctag, pucgdbbase, CONSPEED, COM_FREQ, 225 COM_TYPE_NORMAL, CONMODE); 226 } 227 #endif 228 229 void 230 puc_cnprobe(struct consdev *cn) 231 { 232 233 puccnbase = pucprobe_doit(cn); 234 } 235 236 int 237 puc_cninit(struct consdev *cn) 238 { 239 240 if (puccnbase == 0) 241 return -1; 242 243 return comcnattach(puctag, puccnbase, CONSPEED, 244 puccnflags & PUC_COM_CLOCKMASK, COM_TYPE_NORMAL, 245 CONMODE); 246 } 247 248 /* comcngetc, comcnputc, comcnpollc provided by dev/ic/com.c */ 249