sio.c revision 1.3.2.2 1 1.3.2.2 yamt /* $NetBSD: sio.c,v 1.3.2.2 2013/01/23 00:05:54 yamt Exp $ */
2 1.3.2.2 yamt
3 1.3.2.2 yamt /*
4 1.3.2.2 yamt * Copyright (c) 1992 OMRON Corporation.
5 1.3.2.2 yamt *
6 1.3.2.2 yamt * This code is derived from software contributed to Berkeley by
7 1.3.2.2 yamt * OMRON Corporation.
8 1.3.2.2 yamt *
9 1.3.2.2 yamt * Redistribution and use in source and binary forms, with or without
10 1.3.2.2 yamt * modification, are permitted provided that the following conditions
11 1.3.2.2 yamt * are met:
12 1.3.2.2 yamt * 1. Redistributions of source code must retain the above copyright
13 1.3.2.2 yamt * notice, this list of conditions and the following disclaimer.
14 1.3.2.2 yamt * 2. Redistributions in binary form must reproduce the above copyright
15 1.3.2.2 yamt * notice, this list of conditions and the following disclaimer in the
16 1.3.2.2 yamt * documentation and/or other materials provided with the distribution.
17 1.3.2.2 yamt * 3. All advertising materials mentioning features or use of this software
18 1.3.2.2 yamt * must display the following acknowledgement:
19 1.3.2.2 yamt * This product includes software developed by the University of
20 1.3.2.2 yamt * California, Berkeley and its contributors.
21 1.3.2.2 yamt * 4. Neither the name of the University nor the names of its contributors
22 1.3.2.2 yamt * may be used to endorse or promote products derived from this software
23 1.3.2.2 yamt * without specific prior written permission.
24 1.3.2.2 yamt *
25 1.3.2.2 yamt * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26 1.3.2.2 yamt * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 1.3.2.2 yamt * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 1.3.2.2 yamt * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29 1.3.2.2 yamt * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30 1.3.2.2 yamt * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31 1.3.2.2 yamt * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 1.3.2.2 yamt * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 1.3.2.2 yamt * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 1.3.2.2 yamt * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 1.3.2.2 yamt * SUCH DAMAGE.
36 1.3.2.2 yamt *
37 1.3.2.2 yamt * @(#)sio.c 8.1 (Berkeley) 6/10/93
38 1.3.2.2 yamt */
39 1.3.2.2 yamt /*
40 1.3.2.2 yamt * Copyright (c) 1992, 1993
41 1.3.2.2 yamt * The Regents of the University of California. All rights reserved.
42 1.3.2.2 yamt *
43 1.3.2.2 yamt * This code is derived from software contributed to Berkeley by
44 1.3.2.2 yamt * OMRON Corporation.
45 1.3.2.2 yamt *
46 1.3.2.2 yamt * Redistribution and use in source and binary forms, with or without
47 1.3.2.2 yamt * modification, are permitted provided that the following conditions
48 1.3.2.2 yamt * are met:
49 1.3.2.2 yamt * 1. Redistributions of source code must retain the above copyright
50 1.3.2.2 yamt * notice, this list of conditions and the following disclaimer.
51 1.3.2.2 yamt * 2. Redistributions in binary form must reproduce the above copyright
52 1.3.2.2 yamt * notice, this list of conditions and the following disclaimer in the
53 1.3.2.2 yamt * documentation and/or other materials provided with the distribution.
54 1.3.2.2 yamt * 3. Neither the name of the University nor the names of its contributors
55 1.3.2.2 yamt * may be used to endorse or promote products derived from this software
56 1.3.2.2 yamt * without specific prior written permission.
57 1.3.2.2 yamt *
58 1.3.2.2 yamt * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
59 1.3.2.2 yamt * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
60 1.3.2.2 yamt * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
61 1.3.2.2 yamt * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
62 1.3.2.2 yamt * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
63 1.3.2.2 yamt * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
64 1.3.2.2 yamt * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
65 1.3.2.2 yamt * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
66 1.3.2.2 yamt * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
67 1.3.2.2 yamt * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
68 1.3.2.2 yamt * SUCH DAMAGE.
69 1.3.2.2 yamt *
70 1.3.2.2 yamt * @(#)sio.c 8.1 (Berkeley) 6/10/93
71 1.3.2.2 yamt */
72 1.3.2.2 yamt
73 1.3.2.2 yamt /* sio.c NOV-25-1991 */
74 1.3.2.2 yamt
75 1.3.2.2 yamt #define NSIO 2
76 1.3.2.2 yamt
77 1.3.2.2 yamt #include <sys/param.h>
78 1.3.2.2 yamt #include <luna68k/stand/boot/samachdep.h>
79 1.3.2.2 yamt #include <luna68k/stand/boot/sioreg.h>
80 1.3.2.2 yamt #include <luna68k/stand/boot/rcvbuf.h>
81 1.3.2.2 yamt #include <luna68k/stand/boot/kbdreg.h>
82 1.3.2.2 yamt
83 1.3.2.2 yamt static void siointr(int);
84 1.3.2.2 yamt static int sioreg(int, int);
85 1.3.2.2 yamt
86 1.3.2.2 yamt struct rcvbuf rcvbuf[NSIO];
87 1.3.2.2 yamt
88 1.3.2.2 yamt int sioconsole = -1;
89 1.3.2.2 yamt struct siodevice *sio_addr[2];
90 1.3.2.2 yamt int cur_unit;
91 1.3.2.2 yamt
92 1.3.2.2 yamt
93 1.3.2.2 yamt #define siounit(x) ( x & 0xffff )
94 1.3.2.2 yamt #define isprint(c) ((c >= 0x20) && (c < 0x7F) ? 1 : 0)
95 1.3.2.2 yamt
96 1.3.2.2 yamt
97 1.3.2.2 yamt void
98 1.3.2.2 yamt _siointr(void)
99 1.3.2.2 yamt {
100 1.3.2.2 yamt int unit;
101 1.3.2.2 yamt
102 1.3.2.2 yamt for (unit = 0; unit < NSIO; unit++)
103 1.3.2.2 yamt siointr(unit);
104 1.3.2.2 yamt }
105 1.3.2.2 yamt
106 1.3.2.2 yamt void
107 1.3.2.2 yamt siointr(int unit)
108 1.3.2.2 yamt {
109 1.3.2.2 yamt /* struct siodevice *sio = sio_addr[unit]; */
110 1.3.2.2 yamt int rr0 = sioreg(REG(unit, RR0), 0);
111 1.3.2.2 yamt int rr1 = sioreg(REG(unit, RR1), 0);
112 1.3.2.2 yamt
113 1.3.2.2 yamt if (rr0 & RR0_RXAVAIL) {
114 1.3.2.2 yamt if (rr1 & RR1_FRAMING)
115 1.3.2.2 yamt return;
116 1.3.2.2 yamt
117 1.3.2.2 yamt if (rr1 & (RR1_PARITY | RR1_OVERRUN))
118 1.3.2.2 yamt sioreg(REG(unit, WR0), WR0_ERRRST); /* Channel-A Error Reset */
119 1.3.2.2 yamt
120 1.3.2.2 yamt if (unit == 1) {
121 1.3.2.2 yamt int c = kbd_decode(sio_addr[unit]->sio_data);
122 1.3.2.2 yamt
123 1.3.2.2 yamt if ((c & KC_TYPE) == KC_CODE)
124 1.3.2.2 yamt PUSH_RBUF(unit, c);
125 1.3.2.2 yamt } else {
126 1.3.2.2 yamt PUSH_RBUF(unit, sio_addr[unit]->sio_data);
127 1.3.2.2 yamt }
128 1.3.2.2 yamt }
129 1.3.2.2 yamt }
130 1.3.2.2 yamt
131 1.3.2.2 yamt /*
132 1.3.2.2 yamt * Following are all routines needed for SIO to act as console
133 1.3.2.2 yamt */
134 1.3.2.2 yamt #include <dev/cons.h>
135 1.3.2.2 yamt #include <luna68k/stand/boot/romvec.h>
136 1.3.2.2 yamt
137 1.3.2.2 yamt void
138 1.3.2.2 yamt siocnprobe(struct consdev *cp)
139 1.3.2.2 yamt {
140 1.3.2.2 yamt sio_addr[0] = (struct siodevice *) 0x51000000;
141 1.3.2.2 yamt sio_addr[1] = (struct siodevice *) 0x51000004;
142 1.3.2.2 yamt
143 1.3.2.2 yamt /* make sure hardware exists */
144 1.3.2.2 yamt if (badaddr((short *)sio_addr[0])) {
145 1.3.2.2 yamt cp->cn_pri = CN_DEAD;
146 1.3.2.2 yamt return;
147 1.3.2.2 yamt }
148 1.3.2.2 yamt
149 1.3.2.2 yamt /* locate the major number */
150 1.3.2.2 yamt
151 1.3.2.2 yamt /* initialize required fields */
152 1.3.2.2 yamt cp->cn_dev = cur_unit = 0;
153 1.3.2.2 yamt cp->cn_pri = CN_NORMAL;
154 1.3.2.2 yamt }
155 1.3.2.2 yamt
156 1.3.2.2 yamt void
157 1.3.2.2 yamt siocninit(struct consdev *cp)
158 1.3.2.2 yamt {
159 1.3.2.2 yamt int unit = siounit(cp->cn_dev);
160 1.3.2.2 yamt
161 1.3.2.2 yamt sioinit();
162 1.3.2.2 yamt sioconsole = unit;
163 1.3.2.2 yamt }
164 1.3.2.2 yamt
165 1.3.2.2 yamt int
166 1.3.2.2 yamt siocngetc(dev_t dev)
167 1.3.2.2 yamt {
168 1.3.2.2 yamt int c, unit = siounit(dev);
169 1.3.2.2 yamt
170 1.3.2.2 yamt if (RBUF_EMPTY(unit))
171 1.3.2.2 yamt return 0;
172 1.3.2.2 yamt
173 1.3.2.2 yamt POP_RBUF(unit, c);
174 1.3.2.2 yamt
175 1.3.2.2 yamt return(c);
176 1.3.2.2 yamt }
177 1.3.2.2 yamt
178 1.3.2.2 yamt void
179 1.3.2.2 yamt siocnputc(dev_t dev, int c)
180 1.3.2.2 yamt {
181 1.3.2.2 yamt int unit = siounit(dev);
182 1.3.2.2 yamt int s;
183 1.3.2.2 yamt
184 1.3.2.2 yamt if (sioconsole == -1) {
185 1.3.2.2 yamt (void) sioinit();
186 1.3.2.2 yamt sioconsole = unit;
187 1.3.2.2 yamt }
188 1.3.2.2 yamt
189 1.3.2.2 yamt s = splsio();
190 1.3.2.2 yamt
191 1.3.2.2 yamt /* wait for any pending transmission to finish */
192 1.3.2.2 yamt while ((sioreg(REG(unit, RR0), 0) & RR0_TXEMPTY) == 0);
193 1.3.2.2 yamt
194 1.3.2.2 yamt sio_addr[unit]->sio_data = (c & 0xFF);
195 1.3.2.2 yamt
196 1.3.2.2 yamt /* wait for any pending transmission to finish */
197 1.3.2.2 yamt while ((sioreg(REG(unit, RR0), 0) & RR0_TXEMPTY) == 0);
198 1.3.2.2 yamt
199 1.3.2.2 yamt splx(s);
200 1.3.2.2 yamt }
201 1.3.2.2 yamt
202 1.3.2.2 yamt /* SIO misc routines */
203 1.3.2.2 yamt
204 1.3.2.2 yamt void
205 1.3.2.2 yamt sioinit(void)
206 1.3.2.2 yamt {
207 1.3.2.2 yamt int s;
208 1.3.2.2 yamt
209 1.3.2.2 yamt RBUF_INIT(0);
210 1.3.2.2 yamt RBUF_INIT(1);
211 1.3.2.2 yamt
212 1.3.2.2 yamt s = splsio();
213 1.3.2.2 yamt
214 1.3.2.2 yamt sioreg(REG(0, WR0), WR0_CHANRST); /* Channel-A Reset */
215 1.3.2.2 yamt
216 1.3.2.2 yamt sioreg(WR2A, WR2_VEC86 | WR2_INTR_1); /* Set CPU BUS Interface Mode */
217 1.3.2.2 yamt sioreg(WR2B, 0); /* Set Interrupt Vector */
218 1.3.2.2 yamt
219 1.3.2.2 yamt sioreg(REG(0, WR0), WR0_RSTINT); /* Reset E/S Interrupt */
220 1.3.2.2 yamt sioreg(REG(0, WR4), WR4_BAUD96 | WR4_STOP1 | WR4_NPARITY); /* Tx/Rx */
221 1.3.2.2 yamt sioreg(REG(0, WR3), WR3_RX8BIT | WR3_RXENBL); /* Rx */
222 1.3.2.2 yamt sioreg(REG(0, WR5), WR5_TX8BIT | WR5_TXENBL | WR5_DTR | WR5_RTS); /* Tx */
223 1.3.2.2 yamt sioreg(REG(0, WR0), WR0_RSTINT); /* Reset E/S Interrupt */
224 1.3.2.2 yamt sioreg(REG(0, WR1), WR1_RXALLS); /* Interrupted All Char. */
225 1.3.2.2 yamt
226 1.3.2.2 yamt sioreg(REG(1, WR0), WR0_CHANRST); /* Channel-A Reset */
227 1.3.2.2 yamt
228 1.3.2.2 yamt sioreg(REG(1, WR0), WR0_RSTINT); /* Reset E/S Interrupt */
229 1.3.2.2 yamt sioreg(REG(1, WR4), WR4_BAUD96 | WR4_STOP1 | WR4_NPARITY); /* Tx/Rx */
230 1.3.2.2 yamt sioreg(REG(1, WR3), WR3_RX8BIT | WR3_RXENBL); /* Rx */
231 1.3.2.2 yamt sioreg(REG(1, WR5), WR5_TX8BIT | WR5_TXENBL); /* Tx */
232 1.3.2.2 yamt sioreg(REG(1, WR0), WR0_RSTINT); /* Reset E/S Interrupt */
233 1.3.2.2 yamt sioreg(REG(1, WR1), WR1_RXALLS); /* Interrupted All Char. */
234 1.3.2.2 yamt
235 1.3.2.2 yamt splx(s);
236 1.3.2.2 yamt }
237 1.3.2.2 yamt
238 1.3.2.2 yamt int
239 1.3.2.2 yamt sioreg(int reg, int val)
240 1.3.2.2 yamt {
241 1.3.2.2 yamt int chan;
242 1.3.2.2 yamt
243 1.3.2.2 yamt chan = CHANNEL(reg);
244 1.3.2.2 yamt
245 1.3.2.2 yamt if (isStatusReg(reg)) {
246 1.3.2.2 yamt if (REGNO(reg) != 0)
247 1.3.2.2 yamt sio_addr[chan]->sio_cmd = REGNO(reg);
248 1.3.2.2 yamt return(sio_addr[chan]->sio_stat);
249 1.3.2.2 yamt } else {
250 1.3.2.2 yamt if (REGNO(reg) != 0)
251 1.3.2.2 yamt sio_addr[chan]->sio_cmd = REGNO(reg);
252 1.3.2.2 yamt sio_addr[chan]->sio_cmd = val;
253 1.3.2.2 yamt return(val);
254 1.3.2.2 yamt }
255 1.3.2.2 yamt }
256