1 /* $NetBSD: tc5165buf.c,v 1.20 2021/08/07 16:18:54 thorpej Exp $ */
2
3 /*-
4 * Copyright (c) 1999-2001 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by UCHIYAMA Yasushi.
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 * Device driver for TOSHIBA TC5165BFTS, PHILIPS 74ALVC16241/245
34 * buffer chip
35 */
36
37 #include <sys/cdefs.h>
38 __KERNEL_RCSID(0, "$NetBSD: tc5165buf.c,v 1.20 2021/08/07 16:18:54 thorpej Exp $");
39
40 #include "opt_use_poll.h"
41
42 #include <sys/param.h>
43 #include <sys/bus.h>
44 #include <sys/callout.h>
45 #include <sys/device.h>
46 #include <sys/intr.h>
47 #include <sys/systm.h>
48
49 #include <dev/hpc/hpckbdvar.h>
50
51 #include <mips/cpuregs.h>
52
53 #include <hpcmips/tx/tx39var.h>
54 #include <hpcmips/tx/txcsbusvar.h>
55 #include <hpcmips/dev/tc5165bufvar.h>
56
57 #define TC5165_ROW_MAX 16
58 #define TC5165_COLUMN_MAX 8
59
60 #ifdef TC5165DEBUG
61 #define DPRINTF(arg) printf arg
62 #else
63 #define DPRINTF(arg)
64 #endif
65
66 struct tc5165buf_chip {
67 bus_space_tag_t scc_cst;
68 bus_space_handle_t scc_csh;
69 u_int16_t scc_buf[TC5165_COLUMN_MAX];
70 int scc_enabled;
71 int scc_queued;
72 struct callout scc_soft_ch;
73 struct hpckbd_ic_if scc_if;
74 struct hpckbd_if *scc_hpckbd;
75 };
76
77 struct tc5165buf_softc {
78 struct tc5165buf_chip *sc_chip;
79 tx_chipset_tag_t sc_tc;
80 void *sc_ih;
81 };
82
83 int tc5165buf_match(device_t, cfdata_t, void *);
84 void tc5165buf_attach(device_t, device_t, void *);
85 int tc5165buf_intr(void *);
86 int tc5165buf_poll(void *);
87 void tc5165buf_soft(void *);
88 void tc5165buf_ifsetup(struct tc5165buf_chip *);
89
90 int tc5165buf_input_establish(void *, struct hpckbd_if *);
91
92 struct tc5165buf_chip tc5165buf_chip;
93
94 CFATTACH_DECL_NEW(tc5165buf, sizeof(struct tc5165buf_softc),
95 tc5165buf_match, tc5165buf_attach, NULL, NULL);
96
97 int
tc5165buf_match(device_t parent,cfdata_t cf,void * aux)98 tc5165buf_match(device_t parent, cfdata_t cf, void *aux)
99 {
100
101 return (1);
102 }
103
104 void
tc5165buf_attach(device_t parent,device_t self,void * aux)105 tc5165buf_attach(device_t parent, device_t self, void *aux)
106 {
107 struct cs_attach_args *ca = aux;
108 struct tc5165buf_softc *sc = device_private(self);
109 struct hpckbd_attach_args haa;
110
111 printf(": ");
112 sc->sc_tc = ca->ca_tc;
113 sc->sc_chip = &tc5165buf_chip;
114
115 callout_init(&sc->sc_chip->scc_soft_ch, 0);
116
117 sc->sc_chip->scc_cst = ca->ca_csio.cstag;
118
119 if (bus_space_map(sc->sc_chip->scc_cst, ca->ca_csio.csbase,
120 ca->ca_csio.cssize, 0, &sc->sc_chip->scc_csh)) {
121 printf("can't map i/o space\n");
122 return;
123 }
124
125 sc->sc_chip->scc_enabled = 0;
126
127 if (ca->ca_irq1 != -1) {
128 sc->sc_ih = tx_intr_establish(sc->sc_tc, ca->ca_irq1,
129 IST_EDGE, IPL_TTY,
130 tc5165buf_intr, sc);
131 printf("interrupt mode");
132 } else {
133 sc->sc_ih = tx39_poll_establish(sc->sc_tc, 1, IPL_TTY,
134 tc5165buf_intr, sc);
135 printf("polling mode");
136 }
137
138 if (!sc->sc_ih) {
139 printf(" can't establish interrupt\n");
140 return;
141 }
142
143 printf("\n");
144
145 /* setup upper interface */
146 tc5165buf_ifsetup(sc->sc_chip);
147
148 haa.haa_ic = &sc->sc_chip->scc_if;
149
150 config_found(self, &haa, hpckbd_print, CFARGS_NONE);
151 }
152
153 void
tc5165buf_ifsetup(struct tc5165buf_chip * scc)154 tc5165buf_ifsetup(struct tc5165buf_chip *scc)
155 {
156
157 scc->scc_if.hii_ctx = scc;
158 scc->scc_if.hii_establish = tc5165buf_input_establish;
159 scc->scc_if.hii_poll = tc5165buf_poll;
160 }
161
162 int
tc5165buf_cnattach(paddr_t addr)163 tc5165buf_cnattach(paddr_t addr)
164 {
165 struct tc5165buf_chip *scc = &tc5165buf_chip;
166
167 scc->scc_csh = MIPS_PHYS_TO_KSEG1(addr);
168
169 tc5165buf_ifsetup(scc);
170
171 hpckbd_cnattach(&scc->scc_if);
172
173 return (0);
174 }
175
176 int
tc5165buf_input_establish(void * ic,struct hpckbd_if * kbdif)177 tc5165buf_input_establish(void *ic, struct hpckbd_if *kbdif)
178 {
179 struct tc5165buf_chip *scc = ic;
180
181 /* save hpckbd interface */
182 scc->scc_hpckbd = kbdif;
183
184 scc->scc_enabled = 1;
185
186 return (0);
187 }
188
189 int
tc5165buf_intr(void * arg)190 tc5165buf_intr(void *arg)
191 {
192 struct tc5165buf_softc *sc = arg;
193 struct tc5165buf_chip *scc = sc->sc_chip;
194
195 if (!scc->scc_enabled || scc->scc_queued)
196 return (0);
197
198 scc->scc_queued = 1;
199 callout_reset(&scc->scc_soft_ch, 1, tc5165buf_soft, scc);
200
201 return (0);
202 }
203
204 int
tc5165buf_poll(void * arg)205 tc5165buf_poll(void *arg)
206 {
207 struct tc5165buf_chip *scc = arg;
208
209 if (!scc->scc_enabled)
210 return (POLL_CONT);
211
212 tc5165buf_soft(arg);
213
214 return (POLL_CONT);
215 }
216
217 void
tc5165buf_soft(void * arg)218 tc5165buf_soft(void *arg)
219 {
220 struct tc5165buf_chip *scc = arg;
221 bus_space_tag_t t = scc->scc_cst;
222 bus_space_handle_t h = scc->scc_csh;
223 u_int16_t mask, rpat, edge;
224 int i, j, type, val;
225 int s;
226
227 hpckbd_input_hook(scc->scc_hpckbd);
228
229 /* clear scanlines */
230 (void)bus_space_read_2(t, h, 0);
231 delay(3);
232
233 for (i = 0; i < TC5165_COLUMN_MAX; i++) {
234 rpat = bus_space_read_2(t, h, 2 << i);
235 delay(3);
236 (void)bus_space_read_2(t, h, 0);
237 delay(3);
238 if ((edge = (rpat ^ scc->scc_buf[i]))) {
239 scc->scc_buf[i] = rpat;
240 for (j = 0, mask = 1; j < TC5165_ROW_MAX;
241 j++, mask <<= 1) {
242 if (mask & edge) {
243 type = mask & rpat ? 1 : 0;
244 val = j * TC5165_COLUMN_MAX + i;
245 DPRINTF(("%d %d\n", j, i));
246 hpckbd_input(scc->scc_hpckbd,
247 type, val);
248 }
249 }
250 }
251 }
252
253 s = spltty();
254 scc->scc_queued = 0;
255 splx(s);
256 }
257