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