xref: /freebsd/sys/dev/scc/scc_dev_z8530.c (revision 8a272653d9fbd9fc37691c9aad6a05089b4ecb4d)
1 /*-
2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3  *
4  * Copyright (c) 2004-2006 Marcel Moolenaar
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  *
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  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  */
28 
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
31 
32 #include <sys/param.h>
33 #include <sys/systm.h>
34 #include <sys/bus.h>
35 #include <sys/conf.h>
36 #include <machine/bus.h>
37 #include <sys/lock.h>
38 #include <sys/mutex.h>
39 #include <sys/rman.h>
40 #include <sys/serial.h>
41 
42 #include <dev/scc/scc_bfe.h>
43 #include <dev/scc/scc_bus.h>
44 
45 #include <dev/ic/z8530.h>
46 
47 #include "scc_if.h"
48 
49 static int z8530_bfe_attach(struct scc_softc *, int);
50 static int z8530_bfe_iclear(struct scc_softc *, struct scc_chan *);
51 static int z8530_bfe_ipend(struct scc_softc *);
52 static int z8530_bfe_probe(struct scc_softc *);
53 
54 /* Channel B is always at 0 offset. */
55 #define	CHAN_A	(-(sc->sc_class->cl_range))
56 #define	CHAN_B	0
57 
58 static kobj_method_t z8530_methods[] = {
59 	KOBJMETHOD(scc_attach,	z8530_bfe_attach),
60 	KOBJMETHOD(scc_iclear,	z8530_bfe_iclear),
61 	KOBJMETHOD(scc_ipend,	z8530_bfe_ipend),
62 	KOBJMETHOD(scc_probe,	z8530_bfe_probe),
63 	KOBJMETHOD_END
64 };
65 
66 /*
67  * escc (macio) spacing.
68  */
69 struct scc_class scc_z8530_escc_class = {
70 	"z8530 escc class",
71 	z8530_methods,
72 	sizeof(struct scc_softc),
73 	.cl_channels = 2,
74 	.cl_class = SCC_CLASS_Z8530,
75 	.cl_modes = SCC_MODE_ASYNC | SCC_MODE_BISYNC | SCC_MODE_HDLC,
76 	/* Negative .cl_range signifies this is channel spacing. */
77 	.cl_range = (CHAN_B - 16),
78 };
79 
80 /*
81  * SUN compatible channel spacing.
82  */
83 struct scc_class scc_z8530_legacy_class = {
84 	"z8530 legacy class",
85 	z8530_methods,
86 	sizeof(struct scc_softc),
87 	.cl_channels = 2,
88 	.cl_class = SCC_CLASS_Z8530,
89 	.cl_modes = SCC_MODE_ASYNC | SCC_MODE_BISYNC | SCC_MODE_HDLC,
90 	/* Negative .cl_range signifies this is channel spacing. */
91 	.cl_range = (CHAN_B - 2),
92 };
93 
94 /* Multiplexed I/O. */
95 static __inline uint8_t
96 scc_getmreg(struct scc_bas *bas, int ch, int reg)
97 {
98 
99 	scc_setreg(bas, ch + REG_CTRL, reg);
100 	scc_barrier(bas);
101 	return (scc_getreg(bas, ch + REG_CTRL));
102 }
103 
104 static int
105 z8530_bfe_attach(struct scc_softc *sc __unused, int reset __unused)
106 {
107 
108 	return (0);
109 }
110 
111 static int
112 z8530_bfe_iclear(struct scc_softc *sc, struct scc_chan *ch)
113 {
114 	struct scc_bas *bas;
115 	int c;
116 
117 	bas = &sc->sc_bas;
118 	c = (ch->ch_nr == 1) ? CHAN_A : CHAN_B;
119 	mtx_lock_spin(&sc->sc_hwmtx);
120 	if (ch->ch_ipend & SER_INT_TXIDLE) {
121 		scc_setreg(bas, c + REG_CTRL, CR_RSTTXI);
122 		scc_barrier(bas);
123 	}
124 	if (ch->ch_ipend & SER_INT_RXREADY) {
125 		scc_getreg(bas, c + REG_DATA);
126 		scc_barrier(bas);
127 	}
128 	if (ch->ch_ipend & (SER_INT_OVERRUN|SER_INT_BREAK))
129 		scc_setreg(bas, c + REG_CTRL, CR_RSTERR);
130 	mtx_unlock_spin(&sc->sc_hwmtx);
131 	return (0);
132 }
133 
134 #define	SIGCHG(c, i, s, d)				\
135 	if (c) {					\
136 		i |= (i & s) ? s : s | d;		\
137 	} else {					\
138 		i = (i & s) ? (i & ~s) | d : i;		\
139 	}
140 
141 static int
142 z8530_bfe_ipend(struct scc_softc *sc)
143 {
144 	struct scc_bas *bas;
145 	struct scc_chan *ch[2];
146 	uint32_t sig;
147 	uint8_t bes, ip, src;
148 
149 	bas = &sc->sc_bas;
150 	ch[0] = &sc->sc_chan[0];
151 	ch[1] = &sc->sc_chan[1];
152 	ch[0]->ch_ipend = 0;
153 	ch[1]->ch_ipend = 0;
154 
155 	mtx_lock_spin(&sc->sc_hwmtx);
156 	ip = scc_getmreg(bas, CHAN_A, RR_IP);
157 	if (ip & IP_RIA)
158 		ch[0]->ch_ipend |= SER_INT_RXREADY;
159 	if (ip & IP_RIB)
160 		ch[1]->ch_ipend |= SER_INT_RXREADY;
161 	if (ip & IP_TIA)
162 		ch[0]->ch_ipend |= SER_INT_TXIDLE;
163 	if (ip & IP_TIB)
164 		ch[1]->ch_ipend |= SER_INT_TXIDLE;
165 	if (ip & IP_SIA) {
166 		bes = scc_getmreg(bas, CHAN_A, CR_RSTXSI);
167 		if (bes & BES_BRK)
168 			ch[0]->ch_ipend |= SER_INT_BREAK;
169 		sig = ch[0]->ch_hwsig;
170 		SIGCHG(bes & BES_CTS, sig, SER_CTS, SER_DCTS);
171 		SIGCHG(bes & BES_DCD, sig, SER_DCD, SER_DDCD);
172 		SIGCHG(bes & BES_SYNC, sig, SER_DSR, SER_DDSR);
173 		if (sig & SER_MASK_DELTA) {
174 			ch[0]->ch_hwsig = sig;
175 			ch[0]->ch_ipend |= SER_INT_SIGCHG;
176 		}
177 		src = scc_getmreg(bas, CHAN_A, RR_SRC);
178 		if (src & SRC_OVR)
179 			ch[0]->ch_ipend |= SER_INT_OVERRUN;
180 	}
181 	if (ip & IP_SIB) {
182 		bes = scc_getmreg(bas, CHAN_B, CR_RSTXSI);
183 		if (bes & BES_BRK)
184 			ch[1]->ch_ipend |= SER_INT_BREAK;
185 		sig = ch[1]->ch_hwsig;
186 		SIGCHG(bes & BES_CTS, sig, SER_CTS, SER_DCTS);
187 		SIGCHG(bes & BES_DCD, sig, SER_DCD, SER_DDCD);
188 		SIGCHG(bes & BES_SYNC, sig, SER_DSR, SER_DDSR);
189 		if (sig & SER_MASK_DELTA) {
190 			ch[1]->ch_hwsig = sig;
191 			ch[1]->ch_ipend |= SER_INT_SIGCHG;
192 		}
193 		src = scc_getmreg(bas, CHAN_B, RR_SRC);
194 		if (src & SRC_OVR)
195 			ch[1]->ch_ipend |= SER_INT_OVERRUN;
196 	}
197 	mtx_unlock_spin(&sc->sc_hwmtx);
198 
199 	return (ch[0]->ch_ipend | ch[1]->ch_ipend);
200 }
201 
202 static int
203 z8530_bfe_probe(struct scc_softc *sc __unused)
204 {
205 
206 	return (0);
207 }
208