|
|
@ -57,25 +57,26 @@ |
|
|
|
|
|
|
|
#ifdef __SAM3X8E__ |
|
|
|
|
|
|
|
#include <U8glib.h> |
|
|
|
#include <Arduino.h> |
|
|
|
#include "../../core/macros.h" |
|
|
|
#include <U8glib.h> |
|
|
|
#include <Arduino.h> |
|
|
|
#include "../../core/macros.h" |
|
|
|
|
|
|
|
void u8g_SetPIOutput_DUE(u8g_t *u8g, uint8_t pin_index) { |
|
|
|
PIO_Configure(g_APinDescription[u8g->pin_list[pin_index]].pPort, PIO_OUTPUT_1, |
|
|
|
g_APinDescription[u8g->pin_list[pin_index]].ulPin, g_APinDescription[u8g->pin_list[pin_index]].ulPinConfiguration); // OUTPUT
|
|
|
|
} |
|
|
|
void u8g_SetPIOutput_DUE(u8g_t *u8g, uint8_t pin_index) { |
|
|
|
PIO_Configure(g_APinDescription[u8g->pin_list[pin_index]].pPort, PIO_OUTPUT_1, |
|
|
|
g_APinDescription[u8g->pin_list[pin_index]].ulPin, g_APinDescription[u8g->pin_list[pin_index]].ulPinConfiguration); // OUTPUT
|
|
|
|
} |
|
|
|
|
|
|
|
void u8g_SetPILevel_DUE(u8g_t *u8g, uint8_t pin_index, uint8_t level) { |
|
|
|
volatile Pio* port = g_APinDescription[u8g->pin_list[pin_index]].pPort; |
|
|
|
uint32_t mask = g_APinDescription[u8g->pin_list[pin_index]].ulPin; |
|
|
|
if (level) port->PIO_SODR = mask; |
|
|
|
else port->PIO_CODR = mask; |
|
|
|
} |
|
|
|
void u8g_SetPILevel_DUE(u8g_t *u8g, uint8_t pin_index, uint8_t level) { |
|
|
|
volatile Pio* port = g_APinDescription[u8g->pin_list[pin_index]].pPort; |
|
|
|
uint32_t mask = g_APinDescription[u8g->pin_list[pin_index]].ulPin; |
|
|
|
if (level) port->PIO_SODR = mask; |
|
|
|
else port->PIO_CODR = mask; |
|
|
|
} |
|
|
|
|
|
|
|
#define nop() __asm__ __volatile__("nop;\n\t":::) |
|
|
|
|
|
|
|
void __delay_4cycles(uint32_t cy) __attribute__ ((weak)); |
|
|
|
|
|
|
|
FORCE_INLINE void __delay_4cycles(uint32_t cy) { // +1 cycle
|
|
|
|
#if ARCH_PIPELINE_RELOAD_CYCLES<2 |
|
|
|
#define EXTRA_NOP_CYCLES "nop" |
|
|
@ -96,107 +97,107 @@ FORCE_INLINE void __delay_4cycles(uint32_t cy) { // +1 cycle |
|
|
|
); |
|
|
|
} |
|
|
|
|
|
|
|
Pio *SCK_pPio, *MOSI_pPio; |
|
|
|
uint32_t SCK_dwMask, MOSI_dwMask; |
|
|
|
|
|
|
|
static void spiSend_sw_DUE(uint8_t val) { // 800KHz
|
|
|
|
for (uint8_t i = 0; i < 8; i++) { |
|
|
|
if (val & 0x80) |
|
|
|
MOSI_pPio->PIO_SODR = MOSI_dwMask; |
|
|
|
else |
|
|
|
MOSI_pPio->PIO_CODR = MOSI_dwMask; |
|
|
|
val = val << 1; |
|
|
|
__delay_4cycles(2); |
|
|
|
SCK_pPio->PIO_SODR = SCK_dwMask; |
|
|
|
__delay_4cycles(22); |
|
|
|
SCK_pPio->PIO_CODR = SCK_dwMask; |
|
|
|
} |
|
|
|
Pio *SCK_pPio, *MOSI_pPio; |
|
|
|
uint32_t SCK_dwMask, MOSI_dwMask; |
|
|
|
|
|
|
|
static void spiSend_sw_DUE(uint8_t val) { // 800KHz
|
|
|
|
for (uint8_t i = 0; i < 8; i++) { |
|
|
|
if (val & 0x80) |
|
|
|
MOSI_pPio->PIO_SODR = MOSI_dwMask; |
|
|
|
else |
|
|
|
MOSI_pPio->PIO_CODR = MOSI_dwMask; |
|
|
|
val = val << 1; |
|
|
|
__delay_4cycles(2); |
|
|
|
SCK_pPio->PIO_SODR = SCK_dwMask; |
|
|
|
__delay_4cycles(22); |
|
|
|
SCK_pPio->PIO_CODR = SCK_dwMask; |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
static uint8_t rs_last_state = 255; |
|
|
|
|
|
|
|
static void u8g_com_DUE_st7920_write_byte_sw_spi(uint8_t rs, uint8_t val) { |
|
|
|
uint8_t i; |
|
|
|
static uint8_t rs_last_state = 255; |
|
|
|
|
|
|
|
if ( rs != rs_last_state) { // time to send a command/data byte
|
|
|
|
rs_last_state = rs; |
|
|
|
static void u8g_com_DUE_st7920_write_byte_sw_spi(uint8_t rs, uint8_t val) { |
|
|
|
uint8_t i; |
|
|
|
|
|
|
|
if ( rs == 0 ) |
|
|
|
/* command */ |
|
|
|
spiSend_sw_DUE(0x0f8); |
|
|
|
else |
|
|
|
/* data */ |
|
|
|
spiSend_sw_DUE(0x0fa); |
|
|
|
if ( rs != rs_last_state) { // time to send a command/data byte
|
|
|
|
rs_last_state = rs; |
|
|
|
|
|
|
|
for( i = 0; i < 4; i++ ) // give the controller some time to process the data
|
|
|
|
u8g_10MicroDelay(); // 2 is bad, 3 is OK, 4 is safe
|
|
|
|
} |
|
|
|
if ( rs == 0 ) |
|
|
|
/* command */ |
|
|
|
spiSend_sw_DUE(0x0f8); |
|
|
|
else |
|
|
|
/* data */ |
|
|
|
spiSend_sw_DUE(0x0fa); |
|
|
|
|
|
|
|
spiSend_sw_DUE(val & 0x0f0); |
|
|
|
spiSend_sw_DUE(val << 4); |
|
|
|
for( i = 0; i < 4; i++ ) // give the controller some time to process the data
|
|
|
|
u8g_10MicroDelay(); // 2 is bad, 3 is OK, 4 is safe
|
|
|
|
} |
|
|
|
|
|
|
|
spiSend_sw_DUE(val & 0x0f0); |
|
|
|
spiSend_sw_DUE(val << 4); |
|
|
|
} |
|
|
|
|
|
|
|
uint8_t u8g_com_HAL_DUE_ST7920_sw_spi_fn(u8g_t *u8g, uint8_t msg, uint8_t arg_val, void *arg_ptr) { |
|
|
|
switch (msg) { |
|
|
|
case U8G_COM_MSG_INIT: |
|
|
|
SCK_pPio = g_APinDescription[u8g->pin_list[U8G_PI_SCK]].pPort; |
|
|
|
SCK_dwMask = g_APinDescription[u8g->pin_list[U8G_PI_SCK]].ulPin; |
|
|
|
MOSI_pPio = g_APinDescription[u8g->pin_list[U8G_PI_MOSI]].pPort; |
|
|
|
MOSI_dwMask = g_APinDescription[u8g->pin_list[U8G_PI_MOSI]].ulPin; |
|
|
|
|
|
|
|
u8g_SetPILevel_DUE(u8g, U8G_PI_CS, 0); |
|
|
|
u8g_SetPIOutput_DUE(u8g, U8G_PI_CS); |
|
|
|
u8g_SetPILevel_DUE(u8g, U8G_PI_SCK, 0); |
|
|
|
u8g_SetPIOutput_DUE(u8g, U8G_PI_SCK); |
|
|
|
u8g_SetPILevel_DUE(u8g, U8G_PI_MOSI, 0); |
|
|
|
u8g_SetPILevel_DUE(u8g, U8G_PI_MOSI, 1); |
|
|
|
u8g_SetPIOutput_DUE(u8g, U8G_PI_MOSI); |
|
|
|
u8g_Delay(5); |
|
|
|
u8g->pin_list[U8G_PI_A0_STATE] = 0; /* inital RS state: command mode */ |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_STOP: |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_RESET: |
|
|
|
if (U8G_PIN_NONE != u8g->pin_list[U8G_PI_RESET]) u8g_SetPILevel_DUE(u8g, U8G_PI_RESET, arg_val); |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_ADDRESS: /* define cmd (arg_val = 0) or data mode (arg_val = 1) */ |
|
|
|
u8g->pin_list[U8G_PI_A0_STATE] = arg_val; |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_CHIP_SELECT: |
|
|
|
if (U8G_PIN_NONE != u8g->pin_list[U8G_PI_CS]) |
|
|
|
u8g_SetPILevel_DUE(u8g, U8G_PI_CS, arg_val); //note: the st7920 has an active high chip select
|
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_WRITE_BYTE: |
|
|
|
|
|
|
|
u8g_com_DUE_st7920_write_byte_sw_spi(u8g->pin_list[U8G_PI_A0_STATE], arg_val); |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_WRITE_SEQ: { |
|
|
|
uint8_t *ptr = (uint8_t*) arg_ptr; |
|
|
|
while (arg_val > 0) { |
|
|
|
u8g_com_DUE_st7920_write_byte_sw_spi(u8g->pin_list[U8G_PI_A0_STATE], *ptr++); |
|
|
|
arg_val--; |
|
|
|
} |
|
|
|
|
|
|
|
uint8_t u8g_com_HAL_DUE_ST7920_sw_spi_fn(u8g_t *u8g, uint8_t msg, uint8_t arg_val, void *arg_ptr) { |
|
|
|
switch (msg) { |
|
|
|
case U8G_COM_MSG_INIT: |
|
|
|
SCK_pPio = g_APinDescription[u8g->pin_list[U8G_PI_SCK]].pPort; |
|
|
|
SCK_dwMask = g_APinDescription[u8g->pin_list[U8G_PI_SCK]].ulPin; |
|
|
|
MOSI_pPio = g_APinDescription[u8g->pin_list[U8G_PI_MOSI]].pPort; |
|
|
|
MOSI_dwMask = g_APinDescription[u8g->pin_list[U8G_PI_MOSI]].ulPin; |
|
|
|
|
|
|
|
u8g_SetPILevel_DUE(u8g, U8G_PI_CS, 0); |
|
|
|
u8g_SetPIOutput_DUE(u8g, U8G_PI_CS); |
|
|
|
u8g_SetPILevel_DUE(u8g, U8G_PI_SCK, 0); |
|
|
|
u8g_SetPIOutput_DUE(u8g, U8G_PI_SCK); |
|
|
|
u8g_SetPILevel_DUE(u8g, U8G_PI_MOSI, 0); |
|
|
|
u8g_SetPILevel_DUE(u8g, U8G_PI_MOSI, 1); |
|
|
|
u8g_SetPIOutput_DUE(u8g, U8G_PI_MOSI); |
|
|
|
u8g_Delay(5); |
|
|
|
u8g->pin_list[U8G_PI_A0_STATE] = 0; /* inital RS state: command mode */ |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_STOP: |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_RESET: |
|
|
|
if (U8G_PIN_NONE != u8g->pin_list[U8G_PI_RESET]) u8g_SetPILevel_DUE(u8g, U8G_PI_RESET, arg_val); |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_ADDRESS: /* define cmd (arg_val = 0) or data mode (arg_val = 1) */ |
|
|
|
u8g->pin_list[U8G_PI_A0_STATE] = arg_val; |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_CHIP_SELECT: |
|
|
|
if (U8G_PIN_NONE != u8g->pin_list[U8G_PI_CS]) |
|
|
|
u8g_SetPILevel_DUE(u8g, U8G_PI_CS, arg_val); //note: the st7920 has an active high chip select
|
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_WRITE_BYTE: |
|
|
|
|
|
|
|
u8g_com_DUE_st7920_write_byte_sw_spi(u8g->pin_list[U8G_PI_A0_STATE], arg_val); |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_WRITE_SEQ: { |
|
|
|
uint8_t *ptr = (uint8_t*) arg_ptr; |
|
|
|
while (arg_val > 0) { |
|
|
|
u8g_com_DUE_st7920_write_byte_sw_spi(u8g->pin_list[U8G_PI_A0_STATE], *ptr++); |
|
|
|
arg_val--; |
|
|
|
} |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_WRITE_SEQ_P: { |
|
|
|
uint8_t *ptr = (uint8_t*) arg_ptr; |
|
|
|
while (arg_val > 0) { |
|
|
|
u8g_com_DUE_st7920_write_byte_sw_spi(u8g->pin_list[U8G_PI_A0_STATE], *ptr++); |
|
|
|
arg_val--; |
|
|
|
} |
|
|
|
} |
|
|
|
break; |
|
|
|
|
|
|
|
case U8G_COM_MSG_WRITE_SEQ_P: { |
|
|
|
uint8_t *ptr = (uint8_t*) arg_ptr; |
|
|
|
while (arg_val > 0) { |
|
|
|
u8g_com_DUE_st7920_write_byte_sw_spi(u8g->pin_list[U8G_PI_A0_STATE], *ptr++); |
|
|
|
arg_val--; |
|
|
|
} |
|
|
|
break; |
|
|
|
} |
|
|
|
return 1; |
|
|
|
} |
|
|
|
break; |
|
|
|
} |
|
|
|
return 1; |
|
|
|
} |
|
|
|
|
|
|
|
#pragma GCC reset_options |
|
|
|
|
|
|
|