qvkbd.c revision 1.1.2.2 1 1.1.2.2 skrll /* $NetBSD: qvkbd.c,v 1.1.2.2 2015/09/22 12:05:53 skrll Exp $ */
2 1.1.2.2 skrll
3 1.1.2.2 skrll /* Copyright (c) 2015 Charles H. Dickman. All rights reserved.
4 1.1.2.2 skrll * Derived from dzkbd.c
5 1.1.2.2 skrll *
6 1.1.2.2 skrll * Copyright (c) 1992, 1993
7 1.1.2.2 skrll * The Regents of the University of California. All rights reserved.
8 1.1.2.2 skrll *
9 1.1.2.2 skrll * This software was developed by the Computer Systems Engineering group
10 1.1.2.2 skrll * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
11 1.1.2.2 skrll * contributed to Berkeley.
12 1.1.2.2 skrll *
13 1.1.2.2 skrll * All advertising materials mentioning features or use of this software
14 1.1.2.2 skrll * must display the following acknowledgement:
15 1.1.2.2 skrll * This product includes software developed by the University of
16 1.1.2.2 skrll * California, Lawrence Berkeley Laboratory.
17 1.1.2.2 skrll *
18 1.1.2.2 skrll * Redistribution and use in source and binary forms, with or without
19 1.1.2.2 skrll * modification, are permitted provided that the following conditions
20 1.1.2.2 skrll * are met:
21 1.1.2.2 skrll * 1. Redistributions of source code must retain the above copyright
22 1.1.2.2 skrll * notice, this list of conditions and the following disclaimer.
23 1.1.2.2 skrll * 2. Redistributions in binary form must reproduce the above copyright
24 1.1.2.2 skrll * notice, this list of conditions and the following disclaimer in the
25 1.1.2.2 skrll * documentation and/or other materials provided with the distribution.
26 1.1.2.2 skrll * 3. Neither the name of the University nor the names of its contributors
27 1.1.2.2 skrll * may be used to endorse or promote products derived from this software
28 1.1.2.2 skrll * without specific prior written permission.
29 1.1.2.2 skrll *
30 1.1.2.2 skrll * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
31 1.1.2.2 skrll * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
32 1.1.2.2 skrll * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
33 1.1.2.2 skrll * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
34 1.1.2.2 skrll * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
35 1.1.2.2 skrll * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
36 1.1.2.2 skrll * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
37 1.1.2.2 skrll * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
38 1.1.2.2 skrll * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
39 1.1.2.2 skrll * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
40 1.1.2.2 skrll * SUCH DAMAGE.
41 1.1.2.2 skrll *
42 1.1.2.2 skrll * @(#)kbd.c 8.2 (Berkeley) 10/30/93
43 1.1.2.2 skrll */
44 1.1.2.2 skrll
45 1.1.2.2 skrll /*
46 1.1.2.2 skrll * LK200/LK400 keyboard attached to line 0 of the QVSS aux port
47 1.1.2.2 skrll */
48 1.1.2.2 skrll
49 1.1.2.2 skrll #include <sys/cdefs.h>
50 1.1.2.2 skrll __KERNEL_RCSID(0, "$$");
51 1.1.2.2 skrll
52 1.1.2.2 skrll #include <sys/param.h>
53 1.1.2.2 skrll #include <sys/systm.h>
54 1.1.2.2 skrll #include <sys/device.h>
55 1.1.2.2 skrll #include <sys/ioctl.h>
56 1.1.2.2 skrll #include <sys/syslog.h>
57 1.1.2.2 skrll #include <sys/malloc.h>
58 1.1.2.2 skrll #include <sys/intr.h>
59 1.1.2.2 skrll
60 1.1.2.2 skrll #include <dev/wscons/wsconsio.h>
61 1.1.2.2 skrll #include <dev/wscons/wskbdvar.h>
62 1.1.2.2 skrll #include <dev/wscons/wsksymdef.h>
63 1.1.2.2 skrll #include <dev/wscons/wsksymvar.h>
64 1.1.2.2 skrll #include <dev/dec/wskbdmap_lk201.h>
65 1.1.2.2 skrll
66 1.1.2.2 skrll #include <sys/bus.h>
67 1.1.2.2 skrll
68 1.1.2.2 skrll #include <vax/uba/qvareg.h>
69 1.1.2.2 skrll #include <vax/uba/qvavar.h>
70 1.1.2.2 skrll #include <vax/uba/qvkbdvar.h>
71 1.1.2.2 skrll #include <dev/dec/lk201reg.h>
72 1.1.2.2 skrll #include <dev/dec/lk201var.h>
73 1.1.2.2 skrll
74 1.1.2.2 skrll #include "locators.h"
75 1.1.2.2 skrll
76 1.1.2.2 skrll struct qvkbd_internal {
77 1.1.2.2 skrll struct qvaux_linestate *qvi_ls;
78 1.1.2.2 skrll struct lk201_state qvi_ks;
79 1.1.2.2 skrll };
80 1.1.2.2 skrll
81 1.1.2.2 skrll struct qvkbd_internal qvkbd_console_internal;
82 1.1.2.2 skrll
83 1.1.2.2 skrll struct qvkbd_softc {
84 1.1.2.2 skrll struct device qvkbd_dev; /* required first: base device */
85 1.1.2.2 skrll
86 1.1.2.2 skrll struct qvkbd_internal *sc_itl;
87 1.1.2.2 skrll
88 1.1.2.2 skrll int sc_enabled;
89 1.1.2.2 skrll int kbd_type;
90 1.1.2.2 skrll
91 1.1.2.2 skrll device_t sc_wskbddev;
92 1.1.2.2 skrll };
93 1.1.2.2 skrll
94 1.1.2.2 skrll static int qvkbd_input(void *, int);
95 1.1.2.2 skrll
96 1.1.2.2 skrll static int qvkbd_match(device_t, cfdata_t, void *);
97 1.1.2.2 skrll static void qvkbd_attach(device_t, device_t, void *);
98 1.1.2.2 skrll
99 1.1.2.2 skrll CFATTACH_DECL_NEW(qvkbd, sizeof(struct qvkbd_softc),
100 1.1.2.2 skrll qvkbd_match, qvkbd_attach, NULL, NULL);
101 1.1.2.2 skrll
102 1.1.2.2 skrll static int qvkbd_enable(void *, int);
103 1.1.2.2 skrll static void qvkbd_set_leds(void *, int);
104 1.1.2.2 skrll static int qvkbd_ioctl(void *, u_long, void *, int, struct lwp *);
105 1.1.2.2 skrll
106 1.1.2.2 skrll const struct wskbd_accessops qvkbd_accessops = {
107 1.1.2.2 skrll qvkbd_enable,
108 1.1.2.2 skrll qvkbd_set_leds,
109 1.1.2.2 skrll qvkbd_ioctl,
110 1.1.2.2 skrll };
111 1.1.2.2 skrll
112 1.1.2.2 skrll static void qvkbd_cngetc(void *, u_int *, int *);
113 1.1.2.2 skrll static void qvkbd_cnpollc(void *, int);
114 1.1.2.2 skrll int qvkbd_cnattach(struct qvaux_linestate *);
115 1.1.2.2 skrll
116 1.1.2.2 skrll const struct wskbd_consops qvkbd_consops = {
117 1.1.2.2 skrll qvkbd_cngetc,
118 1.1.2.2 skrll qvkbd_cnpollc,
119 1.1.2.2 skrll };
120 1.1.2.2 skrll
121 1.1.2.2 skrll static int qvkbd_sendchar(void *, u_char);
122 1.1.2.2 skrll
123 1.1.2.2 skrll const struct wskbd_mapdata qvkbd_keymapdata = {
124 1.1.2.2 skrll lkkbd_keydesctab,
125 1.1.2.2 skrll #ifdef DZKBD_LAYOUT
126 1.1.2.2 skrll DZKBD_LAYOUT,
127 1.1.2.2 skrll #else
128 1.1.2.2 skrll KB_US | KB_LK401,
129 1.1.2.2 skrll #endif
130 1.1.2.2 skrll };
131 1.1.2.2 skrll
132 1.1.2.2 skrll /*
133 1.1.2.2 skrll * kbd_match: how is this qvaux line configured?
134 1.1.2.2 skrll */
135 1.1.2.2 skrll static int
136 1.1.2.2 skrll qvkbd_match(device_t parent, cfdata_t cf, void *aux)
137 1.1.2.2 skrll {
138 1.1.2.2 skrll struct qvauxkm_attach_args *daa = aux;
139 1.1.2.2 skrll
140 1.1.2.2 skrll /* Exact match is better than wildcard. */
141 1.1.2.2 skrll if (cf->cf_loc[QVAUXCF_LINE] == daa->daa_line) {
142 1.1.2.2 skrll //printf("qvkbd_match: return 2\n");
143 1.1.2.2 skrll return 2;
144 1.1.2.2 skrll }
145 1.1.2.2 skrll /* This driver accepts wildcard. */
146 1.1.2.2 skrll if (cf->cf_loc[QVAUXCF_LINE] == QVAUXCF_LINE_DEFAULT) {
147 1.1.2.2 skrll //printf("qvkbd_match: return 1\n");
148 1.1.2.2 skrll return 1;
149 1.1.2.2 skrll }
150 1.1.2.2 skrll //printf("qvkbd_match: return 0\n");
151 1.1.2.2 skrll return 0;
152 1.1.2.2 skrll }
153 1.1.2.2 skrll
154 1.1.2.2 skrll static void
155 1.1.2.2 skrll qvkbd_attach(device_t parent, device_t self, void *aux)
156 1.1.2.2 skrll {
157 1.1.2.2 skrll struct qvaux_softc *qvaux = device_private(parent);
158 1.1.2.2 skrll struct qvkbd_softc *qvkbd = device_private(self);
159 1.1.2.2 skrll struct qvauxkm_attach_args *daa = aux;
160 1.1.2.2 skrll struct qvaux_linestate *ls;
161 1.1.2.2 skrll struct qvkbd_internal *qvi;
162 1.1.2.2 skrll struct wskbddev_attach_args a;
163 1.1.2.2 skrll int isconsole;
164 1.1.2.2 skrll
165 1.1.2.2 skrll qvaux->sc_qvaux[daa->daa_line].qvaux_catch = qvkbd_input;
166 1.1.2.2 skrll qvaux->sc_qvaux[daa->daa_line].qvaux_private = qvkbd;
167 1.1.2.2 skrll ls = &qvaux->sc_qvaux[daa->daa_line];
168 1.1.2.2 skrll
169 1.1.2.2 skrll isconsole = (daa->daa_flags & QVAUXKBD_CONSOLE);
170 1.1.2.2 skrll
171 1.1.2.2 skrll if (isconsole) {
172 1.1.2.2 skrll qvi = &qvkbd_console_internal;
173 1.1.2.2 skrll } else {
174 1.1.2.2 skrll qvi = malloc(sizeof(struct qvkbd_internal),
175 1.1.2.2 skrll M_DEVBUF, M_NOWAIT);
176 1.1.2.2 skrll qvi->qvi_ks.attmt.sendchar = qvkbd_sendchar;
177 1.1.2.2 skrll qvi->qvi_ks.attmt.cookie = ls;
178 1.1.2.2 skrll }
179 1.1.2.2 skrll qvi->qvi_ls = ls;
180 1.1.2.2 skrll qvkbd->sc_itl = qvi;
181 1.1.2.2 skrll
182 1.1.2.2 skrll printf("\n");
183 1.1.2.2 skrll
184 1.1.2.2 skrll if (!isconsole) {
185 1.1.2.2 skrll DELAY(100000);
186 1.1.2.2 skrll lk201_init(&qvi->qvi_ks);
187 1.1.2.2 skrll }
188 1.1.2.2 skrll
189 1.1.2.2 skrll /* XXX should identify keyboard ID here XXX */
190 1.1.2.2 skrll /* XXX layout and the number of LED is varying XXX */
191 1.1.2.2 skrll /* XXX ID done during kb init XXX */
192 1.1.2.2 skrll
193 1.1.2.2 skrll // qvkbd->kbd_type = WSKBD_TYPE_LK201;
194 1.1.2.2 skrll
195 1.1.2.2 skrll qvkbd->sc_enabled = 1;
196 1.1.2.2 skrll
197 1.1.2.2 skrll a.console = isconsole;
198 1.1.2.2 skrll a.keymap = &qvkbd_keymapdata;
199 1.1.2.2 skrll a.accessops = &qvkbd_accessops;
200 1.1.2.2 skrll a.accesscookie = qvkbd;
201 1.1.2.2 skrll
202 1.1.2.2 skrll qvkbd->sc_wskbddev = config_found(self, &a, wskbddevprint);
203 1.1.2.2 skrll }
204 1.1.2.2 skrll
205 1.1.2.2 skrll int
206 1.1.2.2 skrll qvkbd_cnattach(struct qvaux_linestate *ls)
207 1.1.2.2 skrll {
208 1.1.2.2 skrll
209 1.1.2.2 skrll qvkbd_console_internal.qvi_ks.attmt.sendchar = qvkbd_sendchar;
210 1.1.2.2 skrll qvkbd_console_internal.qvi_ks.attmt.cookie = ls;
211 1.1.2.2 skrll lk201_init(&qvkbd_console_internal.qvi_ks);
212 1.1.2.2 skrll qvkbd_console_internal.qvi_ls = ls;
213 1.1.2.2 skrll
214 1.1.2.2 skrll wskbd_cnattach(&qvkbd_consops, &qvkbd_console_internal,
215 1.1.2.2 skrll &qvkbd_keymapdata);
216 1.1.2.2 skrll
217 1.1.2.2 skrll return 0;
218 1.1.2.2 skrll }
219 1.1.2.2 skrll
220 1.1.2.2 skrll static int
221 1.1.2.2 skrll qvkbd_enable(void *v, int on)
222 1.1.2.2 skrll {
223 1.1.2.2 skrll struct qvkbd_softc *sc = v;
224 1.1.2.2 skrll
225 1.1.2.2 skrll sc->sc_enabled = on;
226 1.1.2.2 skrll return 0;
227 1.1.2.2 skrll }
228 1.1.2.2 skrll
229 1.1.2.2 skrll static int
230 1.1.2.2 skrll qvkbd_sendchar(void *v, u_char c)
231 1.1.2.2 skrll {
232 1.1.2.2 skrll struct qvaux_linestate *ls = v;
233 1.1.2.2 skrll int s;
234 1.1.2.2 skrll
235 1.1.2.2 skrll s = spltty();
236 1.1.2.2 skrll qvauxputc(ls, c);
237 1.1.2.2 skrll splx(s);
238 1.1.2.2 skrll return (0);
239 1.1.2.2 skrll }
240 1.1.2.2 skrll
241 1.1.2.2 skrll static void
242 1.1.2.2 skrll qvkbd_cngetc(void *v, u_int *type, int *data)
243 1.1.2.2 skrll {
244 1.1.2.2 skrll struct qvkbd_internal *qvi = v;
245 1.1.2.2 skrll int c;
246 1.1.2.2 skrll
247 1.1.2.2 skrll do {
248 1.1.2.2 skrll c = qvauxgetc(qvi->qvi_ls);
249 1.1.2.2 skrll } while (!lk201_decode(&qvi->qvi_ks, 0, c, type, data));
250 1.1.2.2 skrll }
251 1.1.2.2 skrll
252 1.1.2.2 skrll static void
253 1.1.2.2 skrll qvkbd_cnpollc(void *v, int on)
254 1.1.2.2 skrll {
255 1.1.2.2 skrll #if 0
256 1.1.2.2 skrll struct qvkbd_internal *qvi = v;
257 1.1.2.2 skrll #endif
258 1.1.2.2 skrll }
259 1.1.2.2 skrll
260 1.1.2.2 skrll static void
261 1.1.2.2 skrll qvkbd_set_leds(void *v, int leds)
262 1.1.2.2 skrll {
263 1.1.2.2 skrll struct qvkbd_softc *sc = (struct qvkbd_softc *)v;
264 1.1.2.2 skrll
265 1.1.2.2 skrll lk201_set_leds(&sc->sc_itl->qvi_ks, leds);
266 1.1.2.2 skrll }
267 1.1.2.2 skrll
268 1.1.2.2 skrll static int
269 1.1.2.2 skrll qvkbd_ioctl(void *v, u_long cmd, void *data, int flag, struct lwp *l)
270 1.1.2.2 skrll {
271 1.1.2.2 skrll struct qvkbd_softc *sc = (struct qvkbd_softc *)v;
272 1.1.2.2 skrll
273 1.1.2.2 skrll switch (cmd) {
274 1.1.2.2 skrll case WSKBDIO_GTYPE:
275 1.1.2.2 skrll *(int *)data = sc->kbd_type;
276 1.1.2.2 skrll return 0;
277 1.1.2.2 skrll case WSKBDIO_SETLEDS:
278 1.1.2.2 skrll lk201_set_leds(&sc->sc_itl->qvi_ks, *(int *)data);
279 1.1.2.2 skrll return 0;
280 1.1.2.2 skrll case WSKBDIO_GETLEDS:
281 1.1.2.2 skrll /* XXX don't dig in kbd internals */
282 1.1.2.2 skrll *(int *)data = sc->sc_itl->qvi_ks.leds_state;
283 1.1.2.2 skrll return 0;
284 1.1.2.2 skrll case WSKBDIO_COMPLEXBELL:
285 1.1.2.2 skrll lk201_bell(&sc->sc_itl->qvi_ks,
286 1.1.2.2 skrll (struct wskbd_bell_data *)data);
287 1.1.2.2 skrll return 0;
288 1.1.2.2 skrll case WSKBDIO_SETKEYCLICK:
289 1.1.2.2 skrll lk201_set_keyclick(&sc->sc_itl->qvi_ks, *(int *)data);
290 1.1.2.2 skrll return 0;
291 1.1.2.2 skrll case WSKBDIO_GETKEYCLICK:
292 1.1.2.2 skrll /* XXX don't dig in kbd internals */
293 1.1.2.2 skrll *(int *)data = sc->sc_itl->qvi_ks.kcvol;
294 1.1.2.2 skrll return 0;
295 1.1.2.2 skrll }
296 1.1.2.2 skrll return (EPASSTHROUGH);
297 1.1.2.2 skrll }
298 1.1.2.2 skrll
299 1.1.2.2 skrll static int
300 1.1.2.2 skrll qvkbd_input(void *v, int data)
301 1.1.2.2 skrll {
302 1.1.2.2 skrll struct qvkbd_softc *sc = (struct qvkbd_softc *)v;
303 1.1.2.2 skrll u_int type;
304 1.1.2.2 skrll int val;
305 1.1.2.2 skrll int decode;
306 1.1.2.2 skrll
307 1.1.2.2 skrll do {
308 1.1.2.2 skrll decode = lk201_decode(&sc->sc_itl->qvi_ks, 1,
309 1.1.2.2 skrll data, &type, &val);
310 1.1.2.2 skrll if (decode != LKD_NODATA)
311 1.1.2.2 skrll wskbd_input(sc->sc_wskbddev, type, val);
312 1.1.2.2 skrll } while (decode == LKD_MORE);
313 1.1.2.2 skrll return(1);
314 1.1.2.2 skrll }
315 1.1.2.2 skrll
316