lk201_ws.c revision 1.5 1 /* $NetBSD: lk201_ws.c,v 1.5 2001/11/13 12:49:45 lukem Exp $ */
2
3 /*
4 * Copyright (c) 1998
5 * Matthias Drochner. 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 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed for the NetBSD Project
18 * by Matthias Drochner.
19 * 4. The name of the author may not be used to endorse or promote products
20 * derived from this software without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 *
33 */
34
35 #include <sys/cdefs.h>
36 __KERNEL_RCSID(0, "$NetBSD: lk201_ws.c,v 1.5 2001/11/13 12:49:45 lukem Exp $");
37
38 #include <sys/param.h>
39 #include <sys/systm.h>
40
41 #include <dev/wscons/wsconsio.h>
42
43 #include <dev/dec/lk201reg.h>
44 #include <dev/dec/lk201var.h>
45 #include <dev/dec/wskbdmap_lk201.h> /* for {MIN,MAX}_LK201_KEY */
46
47 #define send(lks, c) ((*((lks)->attmt.sendchar))((lks)->attmt.cookie, c))
48
49 int
50 lk201_init(lks)
51 struct lk201_state *lks;
52 {
53 int i;
54
55 send(lks, LK_LED_ENABLE);
56 send(lks, LK_LED_ALL);
57
58 /*
59 * set all keys to updown mode; autorepeat is
60 * done by wskbd software
61 */
62 for (i = 1; i <= 14; i++)
63 send(lks, LK_CMD_MODE(LK_UPDOWN, i));
64
65 send(lks, LK_CL_ENABLE);
66 send(lks, LK_PARAM_VOLUME(3));
67 lks->kcvol = (8 - 3) * 100 / 8;
68
69 lks->bellvol = -1; /* not yet set */
70
71 for (i = 0; i < LK_KLL; i++)
72 lks->down_keys_list[i] = -1;
73 send(lks, LK_KBD_ENABLE);
74
75 send(lks, LK_LED_DISABLE);
76 send(lks, LK_LED_ALL);
77 lks->leds_state = 0;
78
79 return (0);
80 }
81
82 int
83 lk201_decode(lks, datain, type, dataout)
84 struct lk201_state *lks;
85 int datain;
86 u_int *type;
87 int *dataout;
88 {
89 int i, freeslot;
90
91 switch (datain) {
92 case LK_KEY_UP:
93 for (i = 0; i < LK_KLL; i++)
94 lks->down_keys_list[i] = -1;
95 *type = WSCONS_EVENT_ALL_KEYS_UP;
96 return (1);
97 case LK_POWER_UP:
98 printf("lk201_decode: powerup detected\n");
99 lk201_init(lks);
100 return (0);
101 case LK_KDOWN_ERROR:
102 case LK_POWER_ERROR:
103 case LK_OUTPUT_ERROR:
104 case LK_INPUT_ERROR:
105 printf("lk201_decode: error %x\n", datain);
106 /* FALLTHRU */
107 case LK_KEY_REPEAT: /* autorepeat handled by wskbd */
108 case LK_MODE_CHANGE: /* ignore silently */
109 return (0);
110 }
111
112 if (datain < MIN_LK201_KEY || datain > MAX_LK201_KEY) {
113 printf("lk201_decode: %x\n", datain);
114 return (0);
115 }
116
117 *dataout = datain - MIN_LK201_KEY;
118
119 freeslot = -1;
120 for (i = 0; i < LK_KLL; i++) {
121 if (lks->down_keys_list[i] == datain) {
122 *type = WSCONS_EVENT_KEY_UP;
123 lks->down_keys_list[i] = -1;
124 return (1);
125 }
126 if (lks->down_keys_list[i] == -1 && freeslot == -1)
127 freeslot = i;
128 }
129
130 if (freeslot == -1) {
131 printf("lk201_decode: down(%d) no free slot\n", datain);
132 return (0);
133 }
134
135 *type = WSCONS_EVENT_KEY_DOWN;
136 lks->down_keys_list[freeslot] = datain;
137 return (1);
138 }
139
140 void
141 lk201_bell(lks, bell)
142 struct lk201_state *lks;
143 struct wskbd_bell_data *bell;
144 {
145 unsigned int vol;
146
147 if (bell->which & WSKBD_BELL_DOVOLUME) {
148 vol = 8 - bell->volume * 8 / 100;
149 if (vol > 7)
150 vol = 7;
151 } else
152 vol = 3;
153
154 if (vol != lks->bellvol) {
155 send(lks, LK_BELL_ENABLE);
156 send(lks, LK_PARAM_VOLUME(vol));
157 lks->bellvol = vol;
158 }
159 send(lks, LK_RING_BELL);
160 }
161
162 void
163 lk201_set_leds(lks, leds)
164 struct lk201_state *lks;
165 int leds;
166 {
167 int newleds;
168
169 newleds = 0;
170 if (leds & WSKBD_LED_SCROLL)
171 newleds |= LK_LED_WAIT;
172 if (leds & WSKBD_LED_CAPS)
173 newleds |= LK_LED_LOCK;
174
175 send(lks, LK_LED_DISABLE);
176 send(lks, (0x80 | (~newleds & 0x0f)));
177
178 send(lks, LK_LED_ENABLE);
179 send(lks, (0x80 | (newleds & 0x0f)));
180
181 lks->leds_state = leds;
182 }
183
184 void
185 lk201_set_keyclick(lks, vol)
186 struct lk201_state *lks;
187 int vol;
188 {
189 unsigned int newvol;
190
191 if (vol == 0)
192 send(lks, LK_CL_DISABLE);
193 else {
194 newvol = 8 - vol * 8 / 100;
195 if (newvol > 7)
196 newvol = 7;
197
198 send(lks, LK_CL_ENABLE);
199 send(lks, LK_PARAM_VOLUME(newvol));
200 }
201
202 lks->kcvol = vol;
203 }
204