440 lines
		
	
	
		
			13 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			440 lines
		
	
	
		
			13 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
/*
 | 
						|
Copyright 2011 Jun WAKO <wakojun@gmail.com>
 | 
						|
Copyright 2013 Shay Green <gblargg@gmail.com>
 | 
						|
 | 
						|
This software is licensed with a Modified BSD License.
 | 
						|
All of this is supposed to be Free Software, Open Source, DFSG-free,
 | 
						|
GPL-compatible, and OK to use in both free and proprietary applications.
 | 
						|
Additions and corrections to this file are welcome.
 | 
						|
 | 
						|
 | 
						|
Redistribution and use in source and binary forms, with or without
 | 
						|
modification, are permitted provided that the following conditions are met:
 | 
						|
 | 
						|
* Redistributions of source code must retain the above copyright
 | 
						|
  notice, this list of conditions and the following disclaimer.
 | 
						|
 | 
						|
* Redistributions in binary form must reproduce the above copyright
 | 
						|
  notice, this list of conditions and the following disclaimer in
 | 
						|
  the documentation and/or other materials provided with the
 | 
						|
  distribution.
 | 
						|
 | 
						|
* Neither the name of the copyright holders nor the names of
 | 
						|
  contributors may be used to endorse or promote products derived
 | 
						|
  from this software without specific prior written permission.
 | 
						|
 | 
						|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 | 
						|
AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 | 
						|
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 | 
						|
ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
 | 
						|
LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 | 
						|
CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 | 
						|
SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 | 
						|
INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 | 
						|
CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 | 
						|
ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 | 
						|
POSSIBILITY OF SUCH DAMAGE.
 | 
						|
*/
 | 
						|
 | 
						|
#include <stdbool.h>
 | 
						|
#include <util/delay.h>
 | 
						|
#include <avr/io.h>
 | 
						|
#include <avr/interrupt.h>
 | 
						|
#include "adb.h"
 | 
						|
 | 
						|
// GCC doesn't inline functions normally
 | 
						|
#define data_lo() (ADB_DDR |= (1 << ADB_DATA_BIT))
 | 
						|
#define data_hi() (ADB_DDR &= ~(1 << ADB_DATA_BIT))
 | 
						|
#define data_in() (ADB_PIN & (1 << ADB_DATA_BIT))
 | 
						|
 | 
						|
#ifdef ADB_PSW_BIT
 | 
						|
static inline void psw_lo(void);
 | 
						|
static inline void psw_hi(void);
 | 
						|
static inline bool psw_in(void);
 | 
						|
#endif
 | 
						|
 | 
						|
static inline void     attention(void);
 | 
						|
static inline void     place_bit0(void);
 | 
						|
static inline void     place_bit1(void);
 | 
						|
static inline void     send_byte(uint8_t data);
 | 
						|
static inline uint16_t wait_data_lo(uint16_t us);
 | 
						|
static inline uint16_t wait_data_hi(uint16_t us);
 | 
						|
static inline uint16_t adb_host_dev_recv(uint8_t device);
 | 
						|
 | 
						|
void adb_host_init(void) {
 | 
						|
    ADB_PORT &= ~(1 << ADB_DATA_BIT);
 | 
						|
    data_hi();
 | 
						|
#ifdef ADB_PSW_BIT
 | 
						|
    psw_hi();
 | 
						|
#endif
 | 
						|
}
 | 
						|
 | 
						|
#ifdef ADB_PSW_BIT
 | 
						|
bool adb_host_psw(void) { return psw_in(); }
 | 
						|
#endif
 | 
						|
 | 
						|
/*
 | 
						|
 * Don't call this in a row without the delay, otherwise it makes some of poor controllers
 | 
						|
 * overloaded and misses strokes. Recommended interval is 12ms.
 | 
						|
 *
 | 
						|
 * Thanks a lot, blargg!
 | 
						|
 * <http://geekhack.org/index.php?topic=14290.msg1068919#msg1068919>
 | 
						|
 * <http://geekhack.org/index.php?topic=14290.msg1070139#msg1070139>
 | 
						|
 */
 | 
						|
 | 
						|
// ADB Bit Cells
 | 
						|
//
 | 
						|
// bit cell time: 70-130us
 | 
						|
// low part of bit0: 60-70% of bit cell
 | 
						|
// low part of bit1: 30-40% of bit cell
 | 
						|
//
 | 
						|
//    bit cell time         70us        130us
 | 
						|
//    --------------------------------------------
 | 
						|
//    low  part of bit0     42-49       78-91
 | 
						|
//    high part of bit0     21-28       39-52
 | 
						|
//    low  part of bit1     21-28       39-52
 | 
						|
//    high part of bit1     42-49       78-91
 | 
						|
//
 | 
						|
//
 | 
						|
// bit0:
 | 
						|
//    70us bit cell:
 | 
						|
//      ____________~~~~~~
 | 
						|
//      42-49        21-28
 | 
						|
//
 | 
						|
//    130us bit cell:
 | 
						|
//      ____________~~~~~~
 | 
						|
//      78-91        39-52
 | 
						|
//
 | 
						|
// bit1:
 | 
						|
//    70us bit cell:
 | 
						|
//      ______~~~~~~~~~~~~
 | 
						|
//      21-28        42-49
 | 
						|
//
 | 
						|
//    130us bit cell:
 | 
						|
//      ______~~~~~~~~~~~~
 | 
						|
//      39-52        78-91
 | 
						|
//
 | 
						|
// [from Apple IIgs Hardware Reference Second Edition]
 | 
						|
 | 
						|
enum { ADDR_KEYB = 0x20, ADDR_MOUSE = 0x30 };
 | 
						|
 | 
						|
uint16_t adb_host_kbd_recv(void) { return adb_host_dev_recv(ADDR_KEYB); }
 | 
						|
 | 
						|
#ifdef ADB_MOUSE_ENABLE
 | 
						|
void adb_mouse_init(void) { return; }
 | 
						|
 | 
						|
uint16_t adb_host_mouse_recv(void) { return adb_host_dev_recv(ADDR_MOUSE); }
 | 
						|
#endif
 | 
						|
 | 
						|
static inline uint16_t adb_host_dev_recv(uint8_t device) {
 | 
						|
    uint16_t data = 0;
 | 
						|
    cli();
 | 
						|
    attention();
 | 
						|
    send_byte(device | 0x0C);  // Addr:Keyboard(0010)/Mouse(0011), Cmd:Talk(11), Register0(00)
 | 
						|
    place_bit0();              // Stopbit(0)
 | 
						|
    if (!wait_data_hi(500)) {  // Service Request(310us Adjustable Keyboard): just ignored
 | 
						|
        sei();
 | 
						|
        return -30;  // something wrong
 | 
						|
    }
 | 
						|
    if (!wait_data_lo(500)) {  // Tlt/Stop to Start(140-260us)
 | 
						|
        sei();
 | 
						|
        return 0;  // No data to send
 | 
						|
    }
 | 
						|
 | 
						|
    uint8_t n = 17;  // start bit + 16 data bits
 | 
						|
    do {
 | 
						|
        uint8_t lo = (uint8_t)wait_data_hi(130);
 | 
						|
        if (!lo) goto error;
 | 
						|
 | 
						|
        uint8_t hi = (uint8_t)wait_data_lo(lo);
 | 
						|
        if (!hi) goto error;
 | 
						|
 | 
						|
        hi = lo - hi;
 | 
						|
        lo = 130 - lo;
 | 
						|
 | 
						|
        data <<= 1;
 | 
						|
        if (lo < hi) {
 | 
						|
            data |= 1;
 | 
						|
        } else if (n == 17) {
 | 
						|
            sei();
 | 
						|
            return -20;
 | 
						|
        }
 | 
						|
    } while (--n);
 | 
						|
 | 
						|
    // Stop bit can't be checked normally since it could have service request lenghtening
 | 
						|
    // and its high state never goes low.
 | 
						|
    if (!wait_data_hi(351) || wait_data_lo(91)) {
 | 
						|
        sei();
 | 
						|
        return -21;
 | 
						|
    }
 | 
						|
    sei();
 | 
						|
    return data;
 | 
						|
 | 
						|
error:
 | 
						|
    sei();
 | 
						|
    return -n;
 | 
						|
}
 | 
						|
 | 
						|
void adb_host_listen(uint8_t cmd, uint8_t data_h, uint8_t data_l) {
 | 
						|
    cli();
 | 
						|
    attention();
 | 
						|
    send_byte(cmd);
 | 
						|
    place_bit0();    // Stopbit(0)
 | 
						|
    _delay_us(200);  // Tlt/Stop to Start
 | 
						|
    place_bit1();    // Startbit(1)
 | 
						|
    send_byte(data_h);
 | 
						|
    send_byte(data_l);
 | 
						|
    place_bit0();  // Stopbit(0);
 | 
						|
    sei();
 | 
						|
}
 | 
						|
 | 
						|
// send state of LEDs
 | 
						|
void adb_host_kbd_led(uint8_t led) {
 | 
						|
    // Addr:Keyboard(0010), Cmd:Listen(10), Register2(10)
 | 
						|
    // send upper byte (not used)
 | 
						|
    // send lower byte (bit2: ScrollLock, bit1: CapsLock, bit0:
 | 
						|
    adb_host_listen(0x2A, 0, led & 0x07);
 | 
						|
}
 | 
						|
 | 
						|
#ifdef ADB_PSW_BIT
 | 
						|
static inline void psw_lo() {
 | 
						|
    ADB_DDR |= (1 << ADB_PSW_BIT);
 | 
						|
    ADB_PORT &= ~(1 << ADB_PSW_BIT);
 | 
						|
}
 | 
						|
static inline void psw_hi() {
 | 
						|
    ADB_PORT |= (1 << ADB_PSW_BIT);
 | 
						|
    ADB_DDR &= ~(1 << ADB_PSW_BIT);
 | 
						|
}
 | 
						|
static inline bool psw_in() {
 | 
						|
    ADB_PORT |= (1 << ADB_PSW_BIT);
 | 
						|
    ADB_DDR &= ~(1 << ADB_PSW_BIT);
 | 
						|
    return ADB_PIN & (1 << ADB_PSW_BIT);
 | 
						|
}
 | 
						|
#endif
 | 
						|
 | 
						|
static inline void attention(void) {
 | 
						|
    data_lo();
 | 
						|
    _delay_us(800 - 35);  // bit1 holds lo for 35 more
 | 
						|
    place_bit1();
 | 
						|
}
 | 
						|
 | 
						|
static inline void place_bit0(void) {
 | 
						|
    data_lo();
 | 
						|
    _delay_us(65);
 | 
						|
    data_hi();
 | 
						|
    _delay_us(35);
 | 
						|
}
 | 
						|
 | 
						|
static inline void place_bit1(void) {
 | 
						|
    data_lo();
 | 
						|
    _delay_us(35);
 | 
						|
    data_hi();
 | 
						|
    _delay_us(65);
 | 
						|
}
 | 
						|
 | 
						|
static inline void send_byte(uint8_t data) {
 | 
						|
    for (int i = 0; i < 8; i++) {
 | 
						|
        if (data & (0x80 >> i))
 | 
						|
            place_bit1();
 | 
						|
        else
 | 
						|
            place_bit0();
 | 
						|
    }
 | 
						|
}
 | 
						|
 | 
						|
// These are carefully coded to take 6 cycles of overhead.
 | 
						|
// inline asm approach became too convoluted
 | 
						|
static inline uint16_t wait_data_lo(uint16_t us) {
 | 
						|
    do {
 | 
						|
        if (!data_in()) break;
 | 
						|
        _delay_us(1 - (6 * 1000000.0 / F_CPU));
 | 
						|
    } while (--us);
 | 
						|
    return us;
 | 
						|
}
 | 
						|
 | 
						|
static inline uint16_t wait_data_hi(uint16_t us) {
 | 
						|
    do {
 | 
						|
        if (data_in()) break;
 | 
						|
        _delay_us(1 - (6 * 1000000.0 / F_CPU));
 | 
						|
    } while (--us);
 | 
						|
    return us;
 | 
						|
}
 | 
						|
 | 
						|
/*
 | 
						|
ADB Protocol
 | 
						|
============
 | 
						|
 | 
						|
Resources
 | 
						|
---------
 | 
						|
ADB - The Untold Story: Space Aliens Ate My Mouse
 | 
						|
    http://developer.apple.com/legacy/mac/library/#technotes/hw/hw_01.html
 | 
						|
ADB Manager
 | 
						|
    http://developer.apple.com/legacy/mac/library/documentation/mac/pdf/Devices/ADB_Manager.pdf
 | 
						|
    Service request(5-17)
 | 
						|
Apple IIgs Hardware Reference Second Edition [Chapter6 p121]
 | 
						|
    ftp://ftp.apple.asimov.net/pub/apple_II/documentation/Apple%20IIgs%20Hardware%20Reference.pdf
 | 
						|
ADB Keycode
 | 
						|
    http://72.0.193.250/Documentation/macppc/adbkeycodes/
 | 
						|
    http://m0115.web.fc2.com/m0115.jpg
 | 
						|
    [Inside Macintosh volume V, pages 191-192]
 | 
						|
    http://www.opensource.apple.com/source/IOHIDFamily/IOHIDFamily-421.18.3/IOHIDFamily/Cosmo_USB2ADB.c
 | 
						|
ADB Signaling
 | 
						|
    http://kbdbabel.sourceforge.net/doc/kbd_signaling_pcxt_ps2_adb.pdf
 | 
						|
ADB Overview & History
 | 
						|
    http://en.wikipedia.org/wiki/Apple_Desktop_Bus
 | 
						|
Microchip Application Note: ADB device(with code for PIC16C)
 | 
						|
    http://www.microchip.com/stellent/idcplg?IdcService=SS_GET_PAGE&nodeId=1824&appnote=en011062
 | 
						|
AVR ATtiny2131 ADB to PS/2 converter(Japanese)
 | 
						|
    http://hp.vector.co.jp/authors/VA000177/html/KeyBoardA5DEA5CBA5A2II.html
 | 
						|
 | 
						|
 | 
						|
Pinouts
 | 
						|
-------
 | 
						|
    ADB female socket from the front:
 | 
						|
    __________
 | 
						|
    |        | <--- top
 | 
						|
    | 4o  o3 |
 | 
						|
    |2o    o1|
 | 
						|
    |   ==   |
 | 
						|
    |________| <--- bottom
 | 
						|
      |    |   <--- 4pins
 | 
						|
 | 
						|
 | 
						|
    ADB female socket from bottom:
 | 
						|
 | 
						|
    ========== <--- front
 | 
						|
    |        |
 | 
						|
    |        |
 | 
						|
    |2o    o1|
 | 
						|
    |4o    o3|
 | 
						|
    ---------- <--- back
 | 
						|
 | 
						|
    1: Data
 | 
						|
    2: Power SW(low when press Power key)
 | 
						|
    3: Vcc(5V)
 | 
						|
    4: GND
 | 
						|
 | 
						|
 | 
						|
Commands
 | 
						|
--------
 | 
						|
    ADB command is 1byte and consists of 4bit-address, 2bit-command
 | 
						|
    type and 2bit-register. The commands are always sent by Host.
 | 
						|
 | 
						|
    Command format:
 | 
						|
    7 6 5 4 3 2 1 0
 | 
						|
    | | | |------------ address
 | 
						|
            | |-------- command type
 | 
						|
                | |---- register
 | 
						|
 | 
						|
    bits                commands
 | 
						|
    ------------------------------------------------------
 | 
						|
    - - - - 0 0 0 0     Send Request(reset all devices)
 | 
						|
    A A A A 0 0 0 1     Flush(reset a device)
 | 
						|
    - - - - 0 0 1 0     Reserved
 | 
						|
    - - - - 0 0 1 1     Reserved
 | 
						|
    - - - - 0 1 - -     Reserved
 | 
						|
    A A A A 1 0 R R     Listen(write to a device)
 | 
						|
    A A A A 1 1 R R     Talk(read from a device)
 | 
						|
 | 
						|
    The command to read keycodes from keyboard is 0x2C which
 | 
						|
    consist of keyboard address 2 and Talk against register 0.
 | 
						|
 | 
						|
    Address:
 | 
						|
    2:  keyboard
 | 
						|
    3:  mice
 | 
						|
 | 
						|
    Registers:
 | 
						|
    0: application(keyboard uses this to store its data.)
 | 
						|
    1: application
 | 
						|
    2: application(keyboard uses this for LEDs and state of modifiers)
 | 
						|
    3: status and command
 | 
						|
 | 
						|
 | 
						|
Communication
 | 
						|
-------------
 | 
						|
    This is a minimum information for keyboard communication.
 | 
						|
    See "Resources" for detail.
 | 
						|
 | 
						|
    Signaling:
 | 
						|
 | 
						|
    ~~~~____________~~||||||||||||__~~~~~_~~|||||||||||||||__~~~~
 | 
						|
 | 
						|
        |800us     |  |7 Command 0|  |   |  |15-64  Data  0|Stopbit(0)
 | 
						|
        +Attention |              |  |   +Startbit(1)
 | 
						|
                   +Startbit(1)   |  +Tlt(140-260us)
 | 
						|
                                  +stopbit(0)
 | 
						|
 | 
						|
    Bit cells:
 | 
						|
 | 
						|
    bit0: ______~~~
 | 
						|
          65    :35us
 | 
						|
 | 
						|
    bit1: ___~~~~~~
 | 
						|
          35 :65us
 | 
						|
 | 
						|
    bit0 low time: 60-70% of bit cell(42-91us)
 | 
						|
    bit1 low time: 30-40% of bit cell(21-52us)
 | 
						|
    bit cell time: 70-130us
 | 
						|
    [from Apple IIgs Hardware Reference Second Edition]
 | 
						|
 | 
						|
    Criterion for bit0/1:
 | 
						|
    After 55us if line is low/high then bit is 0/1.
 | 
						|
 | 
						|
    Attention & start bit:
 | 
						|
    Host asserts low in 560-1040us then places start bit(1).
 | 
						|
 | 
						|
    Tlt(Stop to Start):
 | 
						|
    Bus stays high in 140-260us then device places start bit(1).
 | 
						|
 | 
						|
    Global reset:
 | 
						|
    Host asserts low in 2.8-5.2ms. All devices are forced to reset.
 | 
						|
 | 
						|
    Service request from device(Srq):
 | 
						|
    Device can request to send at commad(Global only?) stop bit.
 | 
						|
    Requesting device keeps low for 140-260us at stop bit of command.
 | 
						|
 | 
						|
 | 
						|
Keyboard Data(Register0)
 | 
						|
    This 16bit data can contains two keycodes and two released flags.
 | 
						|
    First keycode is palced in upper byte. When one keyocode is sent,
 | 
						|
    lower byte is 0xFF.
 | 
						|
    Release flag is 1 when key is released.
 | 
						|
 | 
						|
    1514 . . . . . 8 7 6 . . . . . 0
 | 
						|
     | | | | | | | | | +-+-+-+-+-+-+-   Keycode2
 | 
						|
     | | | | | | | | +---------------   Released2(1 when the key is released)
 | 
						|
     | +-+-+-+-+-+-+-----------------   Keycode1
 | 
						|
     +-------------------------------   Released1(1 when the key is released)
 | 
						|
 | 
						|
    Keycodes:
 | 
						|
    Scancode consists of 7bit keycode and 1bit release flag.
 | 
						|
    Device can send two keycodes at once. If just one keycode is sent
 | 
						|
    keycode1 contains it and keyocode2 is 0xFF.
 | 
						|
 | 
						|
    Power switch:
 | 
						|
    You can read the state from PSW line(active low) however
 | 
						|
    the switch has a special scancode 0x7F7F, so you can
 | 
						|
    also read from Data line. It uses 0xFFFF for release scancode.
 | 
						|
 | 
						|
Keyboard LEDs & state of keys(Register2)
 | 
						|
    This register hold current state of three LEDs and nine keys.
 | 
						|
    The state of LEDs can be changed by sending Listen command.
 | 
						|
 | 
						|
    1514 . . . . . . 7 6 5 . 3 2 1 0
 | 
						|
     | | | | | | | | | | | | | | | +-   LED1(NumLock)
 | 
						|
     | | | | | | | | | | | | | | +---   LED2(CapsLock)
 | 
						|
     | | | | | | | | | | | | | +-----   LED3(ScrollLock)
 | 
						|
     | | | | | | | | | | +-+-+-------   Reserved
 | 
						|
     | | | | | | | | | +-------------   ScrollLock
 | 
						|
     | | | | | | | | +---------------   NumLock
 | 
						|
     | | | | | | | +-----------------   Apple/Command
 | 
						|
     | | | | | | +-------------------   Option
 | 
						|
     | | | | | +---------------------   Shift
 | 
						|
     | | | | +-----------------------   Control
 | 
						|
     | | | +-------------------------   Reset/Power
 | 
						|
     | | +---------------------------   CapsLock
 | 
						|
     | +-----------------------------   Delete
 | 
						|
     +-------------------------------   Reserved
 | 
						|
 | 
						|
END_OF_ADB
 | 
						|
*/
 |