1 /* $NetBSD: tcom.c,v 1.22 2021/08/07 16:19:12 thorpej Exp $ */
2
3 /*-
4 * Copyright (c) 1998 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Eric S. Hvozda.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 /*
33 * Copyright (c) 1998 Jukka Marin. All rights reserved.
34 * Copyright (c) 1996 Christopher G. Demetriou. All rights reserved.
35 * Copyright (c) 1995 Charles Hannum. All rights reserved.
36 *
37 * This code is derived from public-domain software written by
38 * Roland McGrath.
39 *
40 * Redistribution and use in source and binary forms, with or without
41 * modification, are permitted provided that the following conditions
42 * are met:
43 * 1. Redistributions of source code must retain the above copyright
44 * notice, this list of conditions and the following disclaimer.
45 * 2. Redistributions in binary form must reproduce the above copyright
46 * notice, this list of conditions and the following disclaimer in the
47 * documentation and/or other materials provided with the distribution.
48 * 3. All advertising materials mentioning features or use of this software
49 * must display the following acknowledgement:
50 * This product includes software developed by Charles Hannum.
51 * 4. The name of the author may not be used to endorse or promote products
52 * derived from this software without specific prior written permission.
53 *
54 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
55 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
56 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
57 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
58 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
59 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
60 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
61 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
62 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
63 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
64 */
65
66 /*
67 * NOTE: This driver has been tested in TCOM "UNIX mode" with base address
68 * set to 0x100 or 0x200 and baud rate jumpers to "normal". This code
69 * does NOT know about the 2x and 4x baud rates available on TCOM cards.
70 */
71
72 #include <sys/cdefs.h>
73 __KERNEL_RCSID(0, "$NetBSD: tcom.c,v 1.22 2021/08/07 16:19:12 thorpej Exp $");
74
75 #include <sys/param.h>
76 #include <sys/systm.h>
77 #include <sys/device.h>
78 #include <sys/termios.h>
79
80 #include <sys/bus.h>
81 #include <sys/intr.h>
82
83 #include <dev/ic/comreg.h>
84 #include <dev/ic/comvar.h>
85
86 #include <dev/isa/isavar.h>
87 #include <dev/isa/com_multi.h>
88
89 #define NSLAVES 8 /* TCOM cards have 4 or 8 UARTs */
90 #define STATUS_OFFSET 0x40 /* offset from board base address */
91 #define STATUS_SIZE 8 /* 8 bytes reserved for irq status */
92
93 struct tcom_softc {
94 device_t sc_dev;
95 void *sc_ih;
96
97 bus_space_tag_t sc_iot;
98 int sc_iobase;
99
100 int sc_alive; /* mask of slave units attached */
101 void *sc_slaves[NSLAVES]; /* com device softc pointers */
102 bus_space_handle_t sc_slaveioh[NSLAVES];
103 bus_space_handle_t sc_statusioh;
104 };
105
106 int tcomprobe(device_t, cfdata_t, void *);
107 void tcomattach(device_t, device_t, void *);
108 int tcomintr(void *);
109
110 CFATTACH_DECL_NEW(tcom, sizeof(struct tcom_softc),
111 tcomprobe, tcomattach, NULL, NULL);
112
113 int
tcomprobe(device_t parent,cfdata_t self,void * aux)114 tcomprobe(device_t parent, cfdata_t self, void *aux)
115 {
116 struct isa_attach_args *ia = aux;
117 bus_space_tag_t iot = ia->ia_iot;
118 bus_space_handle_t ioh;
119 int i, iobase, rv = 1;
120
121 /*
122 * Do the normal com probe for the first UART and assume
123 * its presence, and the ability to map the other UARTS,
124 * means there is a multiport board there.
125 * XXX Needs more robustness.
126 */
127
128 if (ia->ia_nio < 1)
129 return (0);
130 if (ia->ia_nirq < 1)
131 return (1);
132
133 if (ISA_DIRECT_CONFIG(ia))
134 return (0);
135
136 /* Disallow wildcarded i/o address. */
137 if (ia->ia_io[0].ir_addr == ISA_UNKNOWN_PORT)
138 return (0);
139 if (ia->ia_irq[0].ir_irq == ISA_UNKNOWN_IRQ)
140 return (0);
141
142 /* if the first port is in use as console, then it. */
143 if (com_is_console(iot, ia->ia_io[0].ir_addr, 0))
144 goto checkmappings;
145
146 if (bus_space_map(iot, ia->ia_io[0].ir_addr, COM_NPORTS, 0, &ioh)) {
147 rv = 0;
148 goto out;
149 }
150 rv = comprobe1(iot, ioh);
151 bus_space_unmap(iot, ioh, COM_NPORTS);
152 if (rv == 0)
153 goto out;
154
155 checkmappings:
156 for (i = 1, iobase = ia->ia_io[0].ir_addr; i < NSLAVES; i++) {
157 iobase += COM_NPORTS;
158
159 if (com_is_console(iot, iobase, 0))
160 continue;
161
162 if (bus_space_map(iot, iobase, COM_NPORTS, 0, &ioh)) {
163 rv = 0;
164 goto out;
165 }
166 bus_space_unmap(iot, ioh, COM_NPORTS);
167 }
168
169 out:
170 if (rv) {
171 ia->ia_nio = 1;
172 ia->ia_io[0].ir_size = NSLAVES * COM_NPORTS;
173
174 ia->ia_nirq = 1;
175
176 ia->ia_niomem = 0;
177 ia->ia_ndrq = 0;
178 }
179 return (rv);
180 }
181
182 void
tcomattach(device_t parent,device_t self,void * aux)183 tcomattach(device_t parent, device_t self, void *aux)
184 {
185 struct tcom_softc *sc = device_private(self);
186 struct isa_attach_args *ia = aux;
187 struct commulti_attach_args ca;
188 bus_space_tag_t iot = ia->ia_iot;
189 int i, iobase;
190 device_t slave;
191
192 printf("\n");
193
194 sc->sc_dev = self;
195 sc->sc_iot = ia->ia_iot;
196 sc->sc_iobase = ia->ia_io[0].ir_addr;
197
198 for (i = 0; i < NSLAVES; i++) {
199 iobase = sc->sc_iobase + i * COM_NPORTS;
200 if (!com_is_console(iot, iobase, &sc->sc_slaveioh[i]) &&
201 bus_space_map(iot, iobase, COM_NPORTS, 0,
202 &sc->sc_slaveioh[i])) {
203 aprint_error_dev(sc->sc_dev,
204 "can't map i/o space for slave %d\n", i);
205 return;
206 }
207 }
208
209 if (bus_space_map(iot, sc->sc_iobase + STATUS_OFFSET, STATUS_SIZE, 0,
210 &sc->sc_statusioh)) {
211 aprint_error_dev(sc->sc_dev, "can't map status space\n");
212 return;
213 }
214
215 for (i = 0; i < NSLAVES; i++) {
216 ca.ca_slave = i;
217 ca.ca_iot = sc->sc_iot;
218 ca.ca_ioh = sc->sc_slaveioh[i];
219 ca.ca_iobase = sc->sc_iobase + i * COM_NPORTS;
220 ca.ca_noien = 0;
221
222 slave = config_found(self, &ca, commultiprint, CFARGS_NONE);
223 if (slave != NULL) {
224 sc->sc_alive |= 1 << i;
225 sc->sc_slaves[i] = device_private(slave);
226 }
227 }
228
229 sc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq[0].ir_irq,
230 IST_EDGE, IPL_SERIAL, tcomintr, sc);
231 }
232
233 int
tcomintr(void * arg)234 tcomintr(void *arg)
235 {
236 struct tcom_softc *sc = arg;
237 bus_space_tag_t iot = sc->sc_iot;
238 int alive = sc->sc_alive;
239 int bits;
240
241 bits = ~bus_space_read_1(iot, sc->sc_statusioh, 0) & alive;
242 if (bits == 0)
243 return (0);
244
245 for (;;) {
246 #define TRY(n) \
247 if (bits & (1 << (n))) \
248 comintr(sc->sc_slaves[n]);
249 TRY(0);
250 TRY(1);
251 TRY(2);
252 TRY(3);
253 TRY(4);
254 TRY(5);
255 TRY(6);
256 TRY(7);
257 #undef TRY
258 bits = ~bus_space_read_1(iot, sc->sc_statusioh, 0) & alive;
259 if (bits == 0)
260 return (1);
261 }
262 }
263