1 /* $NetBSD: lk201_ws.c,v 1.11 2024/02/14 12:59:44 tsutsui 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 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 26 * 27 */ 28 29 #include <sys/cdefs.h> 30 __KERNEL_RCSID(0, "$NetBSD: lk201_ws.c,v 1.11 2024/02/14 12:59:44 tsutsui Exp $"); 31 32 #include <sys/param.h> 33 #include <sys/systm.h> 34 #include <sys/callout.h> 35 36 #include <dev/wscons/wsconsio.h> 37 38 #include <dev/dec/lk201reg.h> 39 #include <dev/dec/lk201var.h> 40 #include <dev/dec/wskbdmap_lk201.h> /* for {MIN,MAX}_LK201_KEY */ 41 42 #define send(lks, c) ((*((lks)->attmt.sendchar))((lks)->attmt.cookie, c)) 43 44 void lk201_identify(void *); 45 46 static const char *lkkbd_descr[] = { 47 "no keyboard", 48 "LK-201 keyboard", 49 "LK-401 keyboard", 50 }; 51 52 int 53 lk201_init(struct lk201_state *lks) 54 { 55 int i; 56 57 lks->waitack = 0; 58 59 send(lks, LK_LED_ENABLE); 60 send(lks, LK_LED_ALL); 61 62 /* 63 * set all keys to updown mode; autorepeat is 64 * done by wskbd software 65 */ 66 for (i = 1; i <= 14; i++) 67 send(lks, LK_CMD_MODE(LK_UPDOWN, i)); 68 69 send(lks, LK_CL_ENABLE); 70 send(lks, LK_PARAM_VOLUME(3)); 71 lks->kcvol = (8 - 3) * 100 / 8; 72 73 lks->bellvol = -1; /* not yet set */ 74 75 for (i = 0; i < LK_KLL; i++) 76 lks->down_keys_list[i] = -1; 77 send(lks, LK_KBD_ENABLE); 78 79 send(lks, LK_LED_DISABLE); 80 send(lks, LK_LED_ALL); 81 lks->leds_state = 0; 82 83 /* 84 * Swallow all the keyboard acknowledges from lk201_init(). 85 * There should be 14 of them - one per LK_CMD_MODE command. 86 */ 87 for(;;) { 88 lks->waitack = 1; 89 for (i = 100; i != 0; i--) { 90 DELAY(1000); 91 if (lks->waitack == 0) 92 break; 93 } 94 if (i == 0) 95 break; 96 } 97 98 /* 99 * Try to set the keyboard in LK-401 mode. 100 * If we receive an error, this is an LK-201 keyboard. 101 */ 102 lks->waitack = 1; 103 send(lks, LK_ENABLE_401); 104 for (i = 100; i != 0; i--) { 105 DELAY(1000); 106 if (lks->waitack == 0) 107 break; 108 } 109 if (lks->waitack != 0) 110 lks->kbdtype = KBD_NONE; 111 else { 112 if (lks->ackdata == LK_INPUT_ERROR) 113 lks->kbdtype = KBD_LK201; 114 else 115 lks->kbdtype = KBD_LK401; 116 } 117 lks->waitack = 0; 118 119 printf("lkkbd0: %s\n", lkkbd_descr[lks->kbdtype]); 120 121 return 0; 122 } 123 124 int 125 lk201_decode(struct lk201_state *lks, int wantmulti, int datain, u_int *type, int *dataout) 126 { 127 int i, freeslot; 128 129 if (lks->waitack != 0) { 130 lks->ackdata = datain; 131 lks->waitack = 0; 132 return LKD_NODATA; 133 } 134 135 switch (datain) { 136 case LK_POWER_UP: 137 printf("lk201_decode: powerup detected\n"); 138 lk201_init(lks); 139 return LKD_NODATA; 140 case LK_KDOWN_ERROR: 141 case LK_POWER_ERROR: 142 case LK_OUTPUT_ERROR: 143 case LK_INPUT_ERROR: 144 printf("lk201_decode: error %x\n", datain); 145 /* FALLTHRU */ 146 case LK_KEY_REPEAT: /* autorepeat handled by wskbd */ 147 case LK_MODE_CHANGE: /* ignore silently */ 148 return LKD_NODATA; 149 } 150 151 152 if (datain == LK_KEY_UP) { 153 if (wantmulti) { 154 for (i = 0; i < LK_KLL; i++) 155 if (lks->down_keys_list[i] != -1) { 156 *type = WSCONS_EVENT_KEY_UP; 157 *dataout = lks->down_keys_list[i] - 158 MIN_LK201_KEY; 159 lks->down_keys_list[i] = -1; 160 return LKD_MORE; 161 } 162 return LKD_NODATA; 163 } else { 164 for (i = 0; i < LK_KLL; i++) 165 lks->down_keys_list[i] = -1; 166 *type = WSCONS_EVENT_ALL_KEYS_UP; 167 return LKD_COMPLETE; 168 } 169 } else if (datain < MIN_LK201_KEY || datain > MAX_LK201_KEY) { 170 printf("lk201_decode: %x\n", datain); 171 return LKD_NODATA; 172 } 173 174 *dataout = datain - MIN_LK201_KEY; 175 176 freeslot = -1; 177 for (i = 0; i < LK_KLL; i++) { 178 if (lks->down_keys_list[i] == datain) { 179 *type = WSCONS_EVENT_KEY_UP; 180 lks->down_keys_list[i] = -1; 181 return LKD_COMPLETE; 182 } 183 if (lks->down_keys_list[i] == -1 && freeslot == -1) 184 freeslot = i; 185 } 186 187 if (freeslot == -1) { 188 printf("lk201_decode: down(%d) no free slot\n", datain); 189 return LKD_NODATA; 190 } 191 192 *type = WSCONS_EVENT_KEY_DOWN; 193 lks->down_keys_list[freeslot] = datain; 194 return LKD_COMPLETE; 195 } 196 197 void 198 lk201_bell(struct lk201_state *lks, struct wskbd_bell_data *bell) 199 { 200 unsigned int vol; 201 202 if (bell->which & WSKBD_BELL_DOVOLUME) { 203 vol = 8 - bell->volume * 8 / 100; 204 if (vol > 7) 205 vol = 7; 206 } else 207 vol = 3; 208 209 if (vol != lks->bellvol) { 210 send(lks, LK_BELL_ENABLE); 211 send(lks, LK_PARAM_VOLUME(vol)); 212 lks->bellvol = vol; 213 } 214 send(lks, LK_RING_BELL); 215 } 216 217 void 218 lk201_set_leds(struct lk201_state *lks, int leds) 219 { 220 int newleds; 221 222 newleds = 0; 223 if (leds & WSKBD_LED_SCROLL) 224 newleds |= LK_LED_WAIT; 225 if (leds & WSKBD_LED_CAPS) 226 newleds |= LK_LED_LOCK; 227 228 send(lks, LK_LED_DISABLE); 229 send(lks, (0x80 | (~newleds & 0x0f))); 230 231 send(lks, LK_LED_ENABLE); 232 send(lks, (0x80 | (newleds & 0x0f))); 233 234 lks->leds_state = leds; 235 } 236 237 void 238 lk201_set_keyclick(struct lk201_state *lks, int vol) 239 { 240 unsigned int newvol; 241 242 if (vol == 0) 243 send(lks, LK_CL_DISABLE); 244 else { 245 newvol = 8 - vol * 8 / 100; 246 if (newvol > 7) 247 newvol = 7; 248 249 send(lks, LK_CL_ENABLE); 250 send(lks, LK_PARAM_VOLUME(newvol)); 251 } 252 253 lks->kcvol = vol; 254 } 255
Indexes created Sun Sep 21 20:09:37 GMT 2025