2 Copyright 2011 Jun Wako <wakojun@gmail.com>
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation, either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <http://www.gnu.org/licenses/>.
24 #include <util/delay.h>
34 #if (MATRIX_COLS > 16)
35 # error "MATRIX_COLS must not exceed 16"
37 #if (MATRIX_ROWS > 255)
38 # error "MATRIX_ROWS must not exceed 255"
42 static bool has_media_keys
= false;
43 static bool is_iso_layout
= false;
44 static bool is_modified
= false;
45 static report_mouse_t mouse_report
= {};
47 // matrix state buffer(1:on, 0:off)
48 #if (MATRIX_COLS <= 8)
49 static uint8_t matrix
[MATRIX_ROWS
];
51 static uint16_t matrix
[MATRIX_ROWS
];
54 #ifdef MATRIX_HAS_GHOST
55 static bool matrix_has_ghost_in_row(uint8_t row
);
57 static void register_key(uint8_t key
);
61 uint8_t matrix_rows(void)
67 uint8_t matrix_cols(void)
72 void matrix_init(void)
75 DDRD
|= (1<<6); PORTD
|= (1<<6);
78 // wait for keyboard to boot up and receive command
82 xprintf("Before init:\n");
83 for (uint8_t addr
= 1; addr
< 16; addr
++) {
84 uint16_t reg3
= adb_host_talk(addr
, ADB_REG_3
);
86 xprintf("Scan: addr:%d, reg3:%04X\n", addr
, reg3
);
91 // Determine ISO keyboard by handler id
92 // http://lxr.free-electrons.com/source/drivers/macintosh/adbhid.c?v=4.4#L815
93 uint16_t handler_id
= adb_host_talk(ADB_ADDR_KEYBOARD
, ADB_REG_3
);
95 case 0x04: case 0x05: case 0x07: case 0x09: case 0x0D:
96 case 0x11: case 0x14: case 0x19: case 0x1D: case 0xC1:
101 is_iso_layout
= false;
105 // Adjustable keyboard media keys: address=0x07 and handlerID=0x02
106 has_media_keys
= (0x02 == (adb_host_talk(ADB_ADDR_APPLIANCE
, ADB_REG_3
) & 0xff));
107 if (has_media_keys
) {
108 xprintf("Found: media keys\n");
111 // Enable keyboard left/right modifier distinction
113 // upper byte: reserved bits 0000, keyboard address 0010
114 // lower byte: device handler 00000011
115 adb_host_listen(ADB_ADDR_KEYBOARD
, ADB_REG_3
, ADB_ADDR_KEYBOARD
, ADB_HANDLER_EXTENDED_PROTOCOL
);
118 xprintf("After init:\n");
119 for (uint8_t addr
= 1; addr
< 16; addr
++) {
120 uint16_t reg3
= adb_host_talk(addr
, ADB_REG_3
);
122 xprintf("Scan: addr:%d, reg3:%04X\n", addr
, reg3
);
127 // initialize matrix state: all keys off
128 for (uint8_t i
=0; i
< MATRIX_ROWS
; i
++) matrix
[i
] = 0x00;
131 //debug_matrix = true;
132 //debug_keyboard = true;
133 //debug_mouse = true;
134 print("debug enabled.\n");
137 DDRD
|= (1<<6); PORTD
&= ~(1<<6);
141 #ifdef ADB_MOUSE_ENABLE
146 #define MAX(X, Y) ((X) > (Y) ? (X) : (Y))
148 void adb_mouse_task(void)
152 static int8_t mouseacc
;
153 _delay_ms(12); // delay for preventing overload of poor ADB keyboard controller
154 codes
= adb_host_mouse_recv();
155 // If nothing received reset mouse acceleration, and quit.
160 // Bit sixteen is button.
161 if (~codes
& (1 << 15))
162 mouse_report
.buttons
|= MOUSE_BTN1
;
163 if (codes
& (1 << 15))
164 mouse_report
.buttons
&= ~MOUSE_BTN1
;
165 // lower seven bits are movement, as signed int_7.
166 // low byte is X-axis, high byte is Y.
167 y
= (codes
>>8 & 0x3F);
168 x
= (codes
>>0 & 0x3F);
169 // bit seven and fifteen is negative
170 // usb does not use int_8, but int_7 (measuring distance) with sign-bit.
171 if (codes
& (1 << 6))
173 if (codes
& (1 << 14))
175 // Accelerate mouse. (They weren't meant to be used on screens larger than 320x200).
178 // Cap our two bytes per axis to one byte.
179 // Easier with a MIN-function, but since -MAX(-a,-b) = MIN(a,b)...
180 // I.E. MIN(MAX(x,-127),127) = -MAX(-MAX(x, -127), -127) = MIN(-MIN(-x,127),127)
181 mouse_report
.x
= -MAX(-MAX(x
, -127), -127);
182 mouse_report
.y
= -MAX(-MAX(y
, -127), -127);
184 print("adb_host_mouse_recv: "); print_bin16(codes
); print("\n");
185 print("adb_mouse raw: [");
186 phex(mouseacc
); print(" ");
187 phex(mouse_report
.buttons
); print("|");
188 print_decs(mouse_report
.x
); print(" ");
189 print_decs(mouse_report
.y
); print("]\n");
191 // Send result by usb.
192 host_mouse_send(&mouse_report
);
193 // increase acceleration of mouse
194 mouseacc
+= ( mouseacc
< ADB_MOUSE_MAXACC
? 1 : 0 );
199 uint8_t matrix_scan(void)
201 /* extra_key is volatile and more convoluted than necessary because gcc refused
202 to generate valid code otherwise. Making extra_key uint8_t and constructing codes
203 here via codes = extra_key<<8 | 0xFF; would consistently fail to even LOAD
204 extra_key from memory, and leave garbage in the high byte of codes. I tried
205 dozens of code variations and it kept generating broken assembly output. So
206 beware if attempting to make extra_key code more logical and efficient. */
207 static volatile uint16_t extra_key
= 0xFFFF;
216 if ( codes
== 0xFFFF )
218 _delay_ms(12); // delay for preventing overload of poor ADB keyboard controller
219 codes
= adb_host_kbd_recv(ADB_ADDR_KEYBOARD
);
221 // Adjustable keybaord media keys
222 if (codes
== 0 && has_media_keys
&&
223 (codes
= adb_host_kbd_recv(ADB_ADDR_APPLIANCE
))) {
225 switch (codes
& 0x7f ) {
227 codes
= (codes
& ~0x007f) | 0x42;
230 codes
= (codes
& ~0x007f) | 0x4a;
232 case 0x02: // Volume down
233 codes
= (codes
& ~0x007f) | 0x49;
235 case 0x03: // Volume Up
236 codes
= (codes
& ~0x007f) | 0x48;
238 case 0x7F: // no code
241 xprintf("ERROR: media key1\n");
245 switch ((codes
>> 8) & 0x7f ) {
247 codes
= (codes
& ~0x7f00) | (0x42 << 8);
250 codes
= (codes
& ~0x7f00) | (0x4a << 8);
252 case 0x02: // Volume down
253 codes
= (codes
& ~0x7f00) | (0x49 << 8);
255 case 0x03: // Volume Up
256 codes
= (codes
& ~0x7f00) | (0x48 << 8);
259 xprintf("ERROR: media key0\n");
267 if (debug_matrix
&& codes
) {
268 print("adb_host_kbd_recv: "); phex16(codes
); print("\n");
271 if (codes
== 0) { // no keys
273 } else if (codes
== 0x7F7F) { // power key press
275 } else if (codes
== 0xFFFF) { // power key release
277 } else if (key0
== 0xFF) { // error
278 xprintf("adb_host_kbd_recv: ERROR(%d)\n", codes
);
279 // something wrong or plug-in
283 /* Swap codes for ISO keyboard
284 * https://github.com/tmk/tmk_keyboard/issues/35
287 * ,----------- ----------.
288 * | *a| 1| 2 =|Backspa|
289 * |----------- ----------|
291 * |----------- ----------|
292 * |CapsLo| A| '|Return |
293 * |----------- ----------|
295 * `----------- ----------'
298 * ,----------- ----------.
299 * | *a| 1| 2 =|Backspa|
300 * |----------- ----------|
301 * |Tab | Q| | ]|Retur|
302 * |----------- -----` |
303 * |CapsLo| A| '| *c| |
304 * |----------- ----------|
306 * `----------- ----------'
308 * ADB scan code USB usage
309 * ------------- ---------
310 * Key ANSI ISO ANSI ISO
311 * ---------------------------------------------
312 * *a 0x32 0x0A 0x35 0x35
313 * *b ---- 0x32 ---- 0x64
314 * *c 0x2A 0x2A 0x31 0x31(or 0x32)
317 if ((key0
& 0x7F) == 0x32) {
318 key0
= (key0
& 0x80) | 0x0A;
319 } else if ((key0
& 0x7F) == 0x0A) {
320 key0
= (key0
& 0x80) | 0x32;
324 if (key1
!= 0xFF) // key1 is 0xFF when no second key.
325 extra_key
= key1
<<8 | 0xFF; // process in a separate call
331 bool matrix_is_modified(void)
337 bool matrix_has_ghost(void)
339 #ifdef MATRIX_HAS_GHOST
340 for (uint8_t i
= 0; i
< MATRIX_ROWS
; i
++) {
341 if (matrix_has_ghost_in_row(i
))
349 bool matrix_is_on(uint8_t row
, uint8_t col
)
351 return (matrix
[row
] & (1<<col
));
355 #if (MATRIX_COLS <= 8)
356 uint8_t matrix_get_row(uint8_t row
)
358 uint16_t matrix_get_row(uint8_t row
)
364 void matrix_print(void)
366 if (!debug_matrix
) return;
367 #if (MATRIX_COLS <= 8)
368 print("r/c 01234567\n");
370 print("r/c 0123456789ABCDEF\n");
372 for (uint8_t row
= 0; row
< matrix_rows(); row
++) {
373 phex(row
); print(": ");
374 #if (MATRIX_COLS <= 8)
375 pbin_reverse(matrix_get_row(row
));
377 pbin_reverse16(matrix_get_row(row
));
379 #ifdef MATRIX_HAS_GHOST
380 if (matrix_has_ghost_in_row(row
)) {
388 uint8_t matrix_key_count(void)
391 for (uint8_t i
= 0; i
< MATRIX_ROWS
; i
++) {
392 #if (MATRIX_COLS <= 8)
393 count
+= bitpop(matrix
[i
]);
395 count
+= bitpop16(matrix
[i
]);
401 #ifdef MATRIX_HAS_GHOST
403 static bool matrix_has_ghost_in_row(uint8_t row
)
405 // no ghost exists in case less than 2 keys on
406 if (((matrix
[row
] - 1) & matrix
[row
]) == 0)
409 // ghost exists in case same state as other row
410 for (uint8_t i
=0; i
< MATRIX_ROWS
; i
++) {
411 if (i
!= row
&& (matrix
[i
] & matrix
[row
]) == matrix
[row
])
419 static void register_key(uint8_t key
)
425 matrix
[row
] &= ~(1<<col
);
427 matrix
[row
] |= (1<<col
);