|
|
@ -1,234 +0,0 @@ |
|
|
|
/* |
|
|
|
Copyright 2012 Jun WAKO <wakojun@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 <avr/io.h> |
|
|
|
#include <avr/interrupt.h> |
|
|
|
#include <util/delay.h> |
|
|
|
#include "serial.h" |
|
|
|
|
|
|
|
/* |
|
|
|
* Stupid Inefficient Busy-wait Software Serial |
|
|
|
* which is still useful for negative logic signal like Sun protocol |
|
|
|
* if it is not supported by hardware UART. |
|
|
|
* |
|
|
|
* TODO: delay is not accurate enough. Instruction cycle should be counted and inline assemby is needed. |
|
|
|
*/ |
|
|
|
|
|
|
|
#define WAIT_US (1000000L / SERIAL_SOFT_BAUD) |
|
|
|
|
|
|
|
#ifdef SERIAL_SOFT_LOGIC_NEGATIVE |
|
|
|
# define SERIAL_SOFT_RXD_IN() !(SERIAL_SOFT_RXD_READ()) |
|
|
|
# define SERIAL_SOFT_TXD_ON() SERIAL_SOFT_TXD_LO() |
|
|
|
# define SERIAL_SOFT_TXD_OFF() SERIAL_SOFT_TXD_HI() |
|
|
|
#else |
|
|
|
# define SERIAL_SOFT_RXD_IN() !!(SERIAL_SOFT_RXD_READ()) |
|
|
|
# define SERIAL_SOFT_TXD_ON() SERIAL_SOFT_TXD_HI() |
|
|
|
# define SERIAL_SOFT_TXD_OFF() SERIAL_SOFT_TXD_LO() |
|
|
|
#endif |
|
|
|
|
|
|
|
#ifdef SERIAL_SOFT_PARITY_EVEN |
|
|
|
# define SERIAL_SOFT_PARITY_VAL 0 |
|
|
|
#elif defined(SERIAL_SOFT_PARITY_ODD) |
|
|
|
# define SERIAL_SOFT_PARITY_VAL 1 |
|
|
|
#endif |
|
|
|
|
|
|
|
/* debug for signal timing, see debug pin with oscilloscope */ |
|
|
|
#ifdef SERIAL_SOFT_DEBUG |
|
|
|
# define SERIAL_SOFT_DEBUG_INIT() (DDRD |= 1 << 7) |
|
|
|
# define SERIAL_SOFT_DEBUG_TGL() (PORTD ^= 1 << 7) |
|
|
|
#else |
|
|
|
# define SERIAL_SOFT_DEBUG_INIT() |
|
|
|
# define SERIAL_SOFT_DEBUG_TGL() |
|
|
|
#endif |
|
|
|
|
|
|
|
void serial_init(void) { |
|
|
|
SERIAL_SOFT_DEBUG_INIT(); |
|
|
|
|
|
|
|
SERIAL_SOFT_RXD_INIT(); |
|
|
|
SERIAL_SOFT_TXD_INIT(); |
|
|
|
} |
|
|
|
|
|
|
|
/* RX ring buffer */ |
|
|
|
#define RBUF_SIZE 8 |
|
|
|
static uint8_t rbuf[RBUF_SIZE]; |
|
|
|
static uint8_t rbuf_head = 0; |
|
|
|
static uint8_t rbuf_tail = 0; |
|
|
|
|
|
|
|
uint8_t serial_recv(void) { |
|
|
|
uint8_t data = 0; |
|
|
|
if (rbuf_head == rbuf_tail) { |
|
|
|
return 0; |
|
|
|
} |
|
|
|
|
|
|
|
data = rbuf[rbuf_tail]; |
|
|
|
rbuf_tail = (rbuf_tail + 1) % RBUF_SIZE; |
|
|
|
return data; |
|
|
|
} |
|
|
|
|
|
|
|
int16_t serial_recv2(void) { |
|
|
|
uint8_t data = 0; |
|
|
|
if (rbuf_head == rbuf_tail) { |
|
|
|
return -1; |
|
|
|
} |
|
|
|
|
|
|
|
data = rbuf[rbuf_tail]; |
|
|
|
rbuf_tail = (rbuf_tail + 1) % RBUF_SIZE; |
|
|
|
return data; |
|
|
|
} |
|
|
|
|
|
|
|
void serial_send(uint8_t data) { |
|
|
|
/* signal state: IDLE: ON, START: OFF, STOP: ON, DATA0: OFF, DATA1: ON */ |
|
|
|
|
|
|
|
#ifdef SERIAL_SOFT_BIT_ORDER_MSB |
|
|
|
# ifdef SERIAL_SOFT_DATA_7BIT |
|
|
|
uint8_t mask = 0x40; |
|
|
|
# else |
|
|
|
uint8_t mask = 0x80; |
|
|
|
# endif |
|
|
|
#else |
|
|
|
uint8_t mask = 0x01; |
|
|
|
#endif |
|
|
|
|
|
|
|
uint8_t parity = 0; |
|
|
|
|
|
|
|
/* start bit */ |
|
|
|
SERIAL_SOFT_TXD_OFF(); |
|
|
|
_delay_us(WAIT_US); |
|
|
|
|
|
|
|
#ifdef SERIAL_SOFT_DATA_7BIT |
|
|
|
while (mask & 0x7F) { |
|
|
|
#else |
|
|
|
while (mask & 0xFF) { |
|
|
|
#endif |
|
|
|
if (data & mask) { |
|
|
|
SERIAL_SOFT_TXD_ON(); |
|
|
|
parity ^= 1; |
|
|
|
} else { |
|
|
|
SERIAL_SOFT_TXD_OFF(); |
|
|
|
} |
|
|
|
_delay_us(WAIT_US); |
|
|
|
|
|
|
|
#ifdef SERIAL_SOFT_BIT_ORDER_MSB |
|
|
|
mask >>= 1; |
|
|
|
#else |
|
|
|
mask <<= 1; |
|
|
|
#endif |
|
|
|
} |
|
|
|
|
|
|
|
#if defined(SERIAL_SOFT_PARITY_EVEN) || defined(SERIAL_SOFT_PARITY_ODD) |
|
|
|
/* to center of parity bit */ |
|
|
|
if (parity != SERIAL_SOFT_PARITY_VAL) { |
|
|
|
SERIAL_SOFT_TXD_ON(); |
|
|
|
} else { |
|
|
|
SERIAL_SOFT_TXD_OFF(); |
|
|
|
} |
|
|
|
_delay_us(WAIT_US); |
|
|
|
#endif |
|
|
|
|
|
|
|
/* stop bit */ |
|
|
|
SERIAL_SOFT_TXD_ON(); |
|
|
|
_delay_us(WAIT_US); |
|
|
|
} |
|
|
|
|
|
|
|
/* detect edge of start bit */ |
|
|
|
ISR(SERIAL_SOFT_RXD_VECT) { |
|
|
|
SERIAL_SOFT_DEBUG_TGL(); |
|
|
|
SERIAL_SOFT_RXD_INT_ENTER(); |
|
|
|
|
|
|
|
uint8_t data = 0; |
|
|
|
|
|
|
|
#ifdef SERIAL_SOFT_BIT_ORDER_MSB |
|
|
|
# ifdef SERIAL_SOFT_DATA_7BIT |
|
|
|
uint8_t mask = 0x40; |
|
|
|
# else |
|
|
|
uint8_t mask = 0x80; |
|
|
|
# endif |
|
|
|
#else |
|
|
|
uint8_t mask = 0x01; |
|
|
|
#endif |
|
|
|
|
|
|
|
uint8_t parity = 0; |
|
|
|
|
|
|
|
/* to center of start bit */ |
|
|
|
_delay_us(WAIT_US / 2); |
|
|
|
SERIAL_SOFT_DEBUG_TGL(); |
|
|
|
do { |
|
|
|
/* to center of next bit */ |
|
|
|
_delay_us(WAIT_US); |
|
|
|
|
|
|
|
SERIAL_SOFT_DEBUG_TGL(); |
|
|
|
if (SERIAL_SOFT_RXD_IN()) { |
|
|
|
data |= mask; |
|
|
|
parity ^= 1; |
|
|
|
} |
|
|
|
#ifdef SERIAL_SOFT_BIT_ORDER_MSB |
|
|
|
mask >>= 1; |
|
|
|
#else |
|
|
|
mask <<= 1; |
|
|
|
#endif |
|
|
|
#ifdef SERIAL_SOFT_DATA_7BIT |
|
|
|
} while (mask & 0x7F); |
|
|
|
#else |
|
|
|
} while (mask & 0xFF); |
|
|
|
#endif |
|
|
|
|
|
|
|
#if defined(SERIAL_SOFT_PARITY_EVEN) || defined(SERIAL_SOFT_PARITY_ODD) |
|
|
|
/* to center of parity bit */ |
|
|
|
_delay_us(WAIT_US); |
|
|
|
if (SERIAL_SOFT_RXD_IN()) { |
|
|
|
parity ^= 1; |
|
|
|
} |
|
|
|
SERIAL_SOFT_DEBUG_TGL(); |
|
|
|
#endif |
|
|
|
|
|
|
|
/* to center of stop bit */ |
|
|
|
_delay_us(WAIT_US); |
|
|
|
|
|
|
|
uint8_t next = (rbuf_head + 1) % RBUF_SIZE; |
|
|
|
#if defined(SERIAL_SOFT_PARITY_EVEN) || defined(SERIAL_SOFT_PARITY_ODD) |
|
|
|
if ((parity == SERIAL_SOFT_PARITY_VAL) && next != rbuf_tail) { |
|
|
|
#else |
|
|
|
if (next != rbuf_tail) { |
|
|
|
#endif |
|
|
|
rbuf[rbuf_head] = data; |
|
|
|
rbuf_head = next; |
|
|
|
} |
|
|
|
|
|
|
|
SERIAL_SOFT_RXD_INT_EXIT(); |
|
|
|
SERIAL_SOFT_DEBUG_TGL(); |
|
|
|
} |