Modularization, stage 1
This commit is contained in:
@@ -0,0 +1,110 @@
|
||||
//
|
||||
// Created by MightyPork on 2018/02/03.
|
||||
//
|
||||
|
||||
#include "platform.h"
|
||||
#include "unit_base.h"
|
||||
#include "unit_sipo.h"
|
||||
|
||||
#define SIPO_INTERNAL
|
||||
#include "_sipo_internal.h"
|
||||
|
||||
static void send_pulse(bool pol, GPIO_TypeDef *port, uint32_t ll)
|
||||
{
|
||||
if (pol) {
|
||||
LL_GPIO_SetOutputPin(port, ll);
|
||||
}
|
||||
else {
|
||||
LL_GPIO_ResetOutputPin(port, ll);
|
||||
}
|
||||
|
||||
__asm_loop(2);
|
||||
|
||||
if (pol) {
|
||||
LL_GPIO_ResetOutputPin(port, ll);
|
||||
}
|
||||
else {
|
||||
LL_GPIO_SetOutputPin(port, ll);
|
||||
}
|
||||
}
|
||||
|
||||
#pragma GCC push_options
|
||||
#pragma GCC optimize ("O2")
|
||||
error_t UU_SIPO_Write(Unit *unit, const uint8_t *buffer, uint16_t buflen, uint16_t terminal_data)
|
||||
{
|
||||
CHECK_TYPE(unit, &UNIT_SIPO);
|
||||
struct priv *priv = unit->data;
|
||||
|
||||
if (buflen % priv->data_width != 0) {
|
||||
dbg("Buflen %d vs width %d", (int)buflen, (int)priv->data_width);
|
||||
return E_BAD_COUNT; // must be a multiple of the channel count
|
||||
}
|
||||
|
||||
// buffer contains data for the individual data pins, back to back as AAA BBB CCC (whole bytes)
|
||||
const uint8_t data_width = priv->data_width;
|
||||
const uint16_t bytelen = buflen / data_width;
|
||||
const uint16_t mask = priv->cfg.data_pins;
|
||||
|
||||
uint8_t offsets[16];
|
||||
for (int i=0; i<16; i++) offsets[i] = (uint8_t) (bytelen * i);
|
||||
|
||||
for (int32_t bn = bytelen - 1; bn >= 0; bn--) {
|
||||
// send the byte
|
||||
for (int32_t i = 0; i < 8; i++) {
|
||||
uint16_t packed = 0;
|
||||
for (int32_t j = data_width - 1; j >= 0; j--) {
|
||||
packed |= (buffer[bn + offsets[j]] >> i) & 1;
|
||||
if (j > 0) packed <<= 1;
|
||||
}
|
||||
|
||||
uint16_t spread = pinmask_spread(packed, mask);
|
||||
priv->data_port->BSRR = spread | (((~spread) & mask) << 16);
|
||||
|
||||
// Shift clock pulse
|
||||
send_pulse(priv->cfg.shift_pol, priv->shift_port, priv->shift_ll);
|
||||
}
|
||||
}
|
||||
|
||||
// load the final data - this may be used by some other circuitry or
|
||||
// simply to rest the lines at a defined known level
|
||||
uint16_t spread = pinmask_spread(terminal_data, mask);
|
||||
priv->data_port->BSRR = spread | (((~spread) & mask) << 16);
|
||||
|
||||
send_pulse(priv->cfg.store_pol, priv->store_port, priv->store_ll);
|
||||
return E_SUCCESS;
|
||||
}
|
||||
#pragma GCC pop_options
|
||||
|
||||
error_t UU_SIPO_DirectData(Unit *unit, uint16_t data_packed)
|
||||
{
|
||||
CHECK_TYPE(unit, &UNIT_SIPO);
|
||||
struct priv *priv = unit->data;
|
||||
|
||||
uint16_t spread = pinmask_spread(data_packed, priv->cfg.data_pins);
|
||||
priv->data_port->BSRR = spread | (((~spread) & priv->cfg.data_pins) << 16);
|
||||
return E_SUCCESS;
|
||||
}
|
||||
|
||||
error_t UU_SIPO_DirectClear(Unit *unit)
|
||||
{
|
||||
CHECK_TYPE(unit, &UNIT_SIPO);
|
||||
struct priv *priv = unit->data;
|
||||
send_pulse(priv->cfg.clear_pol, priv->clear_port, priv->clear_ll);
|
||||
return E_SUCCESS;
|
||||
}
|
||||
|
||||
error_t UU_SIPO_DirectShift(Unit *unit)
|
||||
{
|
||||
CHECK_TYPE(unit, &UNIT_SIPO);
|
||||
struct priv *priv = unit->data;
|
||||
send_pulse(priv->cfg.shift_pol, priv->shift_port, priv->shift_ll);
|
||||
return E_SUCCESS;
|
||||
}
|
||||
|
||||
error_t UU_SIPO_DirectStore(Unit *unit)
|
||||
{
|
||||
CHECK_TYPE(unit, &UNIT_SIPO);
|
||||
struct priv *priv = unit->data;
|
||||
send_pulse(priv->cfg.store_pol, priv->store_port, priv->store_ll);
|
||||
return E_SUCCESS;
|
||||
}
|
||||
@@ -0,0 +1,113 @@
|
||||
//
|
||||
// Created by MightyPork on 2018/02/03.
|
||||
//
|
||||
|
||||
#include "platform.h"
|
||||
#include "unit_base.h"
|
||||
|
||||
#define SIPO_INTERNAL
|
||||
#include "_sipo_internal.h"
|
||||
|
||||
/** Allocate data structure and set defaults */
|
||||
error_t USIPO_preInit(Unit *unit)
|
||||
{
|
||||
struct priv *priv = unit->data = calloc_ck(1, sizeof(struct priv));
|
||||
if (priv == NULL) return E_OUT_OF_MEM;
|
||||
|
||||
priv->cfg.pin_store = R_PA0;
|
||||
priv->cfg.store_pol = true;
|
||||
|
||||
priv->cfg.pin_shift = R_PA1;
|
||||
priv->cfg.shift_pol = true;
|
||||
|
||||
priv->cfg.pin_clear = R_PA2;
|
||||
priv->cfg.clear_pol = false;
|
||||
|
||||
priv->cfg.data_pname = 'A';
|
||||
priv->cfg.data_pins = (1<<3);
|
||||
|
||||
return E_SUCCESS;
|
||||
}
|
||||
|
||||
/** Finalize unit set-up */
|
||||
error_t USIPO_init(Unit *unit)
|
||||
{
|
||||
bool suc = true;
|
||||
struct priv *priv = unit->data;
|
||||
|
||||
// --- Parse config ---
|
||||
suc &= hw_pinrsc2ll(priv->cfg.pin_store, &priv->store_port, &priv->store_ll);
|
||||
suc &= hw_pinrsc2ll(priv->cfg.pin_shift, &priv->shift_port, &priv->shift_ll);
|
||||
suc &= hw_pinrsc2ll(priv->cfg.pin_clear, &priv->clear_port, &priv->clear_ll);
|
||||
if (!suc) return E_BAD_CONFIG;
|
||||
TRY(rsc_claim(unit, priv->cfg.pin_store));
|
||||
TRY(rsc_claim(unit, priv->cfg.pin_shift));
|
||||
TRY(rsc_claim(unit, priv->cfg.pin_clear));
|
||||
|
||||
// Claim all needed pins
|
||||
TRY(rsc_claim_gpios(unit, priv->cfg.data_pname, priv->cfg.data_pins));
|
||||
priv->data_port = hw_port2periph(priv->cfg.data_pname, &suc);
|
||||
|
||||
// --- Init hardware ---
|
||||
|
||||
priv->data_width = 0;
|
||||
for (int i = 0; i < 16; i++) {
|
||||
if (priv->cfg.data_pins & (1 << i)) {
|
||||
uint32_t ll_pin = hw_pin2ll((uint8_t) i, &suc);
|
||||
LL_GPIO_SetPinMode(priv->data_port, ll_pin, LL_GPIO_MODE_OUTPUT);
|
||||
LL_GPIO_SetPinOutputType(priv->data_port, ll_pin, LL_GPIO_OUTPUT_PUSHPULL);
|
||||
LL_GPIO_SetPinSpeed(priv->data_port, ll_pin, LL_GPIO_SPEED_FREQ_HIGH);
|
||||
priv->data_width++;
|
||||
}
|
||||
}
|
||||
|
||||
// Set the initial state - zeros
|
||||
priv->data_port->ODR &= ~priv->cfg.data_pins;
|
||||
|
||||
|
||||
// STORE
|
||||
LL_GPIO_SetPinMode(priv->store_port, priv->store_ll, LL_GPIO_MODE_OUTPUT);
|
||||
LL_GPIO_SetPinOutputType(priv->store_port, priv->store_ll, LL_GPIO_OUTPUT_PUSHPULL);
|
||||
LL_GPIO_SetPinSpeed(priv->store_port, priv->store_ll, LL_GPIO_SPEED_FREQ_HIGH);
|
||||
|
||||
if (priv->cfg.store_pol)
|
||||
LL_GPIO_ResetOutputPin(priv->store_port, priv->store_ll);
|
||||
else
|
||||
LL_GPIO_SetOutputPin(priv->store_port, priv->store_ll);
|
||||
|
||||
// SHIFT
|
||||
LL_GPIO_SetPinMode(priv->shift_port, priv->shift_ll, LL_GPIO_MODE_OUTPUT);
|
||||
LL_GPIO_SetPinOutputType(priv->shift_port, priv->shift_ll, LL_GPIO_OUTPUT_PUSHPULL);
|
||||
LL_GPIO_SetPinSpeed(priv->shift_port, priv->shift_ll, LL_GPIO_SPEED_FREQ_HIGH);
|
||||
|
||||
if (priv->cfg.shift_pol)
|
||||
LL_GPIO_ResetOutputPin(priv->shift_port, priv->shift_ll);
|
||||
else
|
||||
LL_GPIO_SetOutputPin(priv->shift_port, priv->shift_ll);
|
||||
|
||||
// CLEAR
|
||||
LL_GPIO_SetPinMode(priv->clear_port, priv->clear_ll, LL_GPIO_MODE_OUTPUT);
|
||||
LL_GPIO_SetPinOutputType(priv->clear_port, priv->clear_ll, LL_GPIO_OUTPUT_PUSHPULL);
|
||||
LL_GPIO_SetPinSpeed(priv->clear_port, priv->clear_ll, LL_GPIO_SPEED_FREQ_HIGH);
|
||||
|
||||
if (priv->cfg.clear_pol)
|
||||
LL_GPIO_ResetOutputPin(priv->clear_port, priv->clear_ll);
|
||||
else
|
||||
LL_GPIO_SetOutputPin(priv->clear_port, priv->clear_ll);
|
||||
|
||||
// initial clear
|
||||
UU_SIPO_DirectClear(unit);
|
||||
|
||||
return E_SUCCESS;
|
||||
}
|
||||
|
||||
|
||||
/** Tear down the unit */
|
||||
void USIPO_deInit(Unit *unit)
|
||||
{
|
||||
// Release all resources, deinit pins
|
||||
rsc_teardown(unit);
|
||||
|
||||
// Free memory
|
||||
free_ck(unit->data);
|
||||
}
|
||||
@@ -0,0 +1,120 @@
|
||||
//
|
||||
// Created by MightyPork on 2018/02/03.
|
||||
//
|
||||
|
||||
#ifndef GEX_F072_SIPO_INTERNAL_H
|
||||
#define GEX_F072_SIPO_INTERNAL_H
|
||||
|
||||
#ifndef SIPO_INTERNAL
|
||||
#error bad include!
|
||||
#endif
|
||||
|
||||
#include "unit_base.h"
|
||||
|
||||
/** Private data structure */
|
||||
struct priv {
|
||||
struct {
|
||||
// settings
|
||||
Resource pin_store;
|
||||
bool store_pol; //!< Store pulse active edge
|
||||
|
||||
Resource pin_shift;
|
||||
bool shift_pol; //!< Shift clock active edge
|
||||
|
||||
Resource pin_clear;
|
||||
bool clear_pol; //!< Clear signal active level
|
||||
|
||||
char data_pname;
|
||||
uint16_t data_pins;
|
||||
} cfg;
|
||||
|
||||
// live fields
|
||||
uint32_t store_ll;
|
||||
uint32_t shift_ll;
|
||||
uint32_t clear_ll;
|
||||
|
||||
GPIO_TypeDef *store_port;
|
||||
GPIO_TypeDef *shift_port;
|
||||
GPIO_TypeDef *clear_port;
|
||||
GPIO_TypeDef *data_port;
|
||||
|
||||
uint8_t data_width;
|
||||
};
|
||||
|
||||
/** Allocate data structure and set defaults */
|
||||
error_t USIPO_preInit(Unit *unit);
|
||||
|
||||
/** Load from a binary buffer stored in Flash */
|
||||
void USIPO_loadBinary(Unit *unit, PayloadParser *pp);
|
||||
|
||||
/** Write to a binary buffer for storing in Flash */
|
||||
void USIPO_writeBinary(Unit *unit, PayloadBuilder *pb);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
|
||||
/** Parse a key-value pair from the INI file */
|
||||
error_t USIPO_loadIni(Unit *unit, const char *key, const char *value);
|
||||
|
||||
/** Generate INI file section for the unit */
|
||||
void USIPO_writeIni(Unit *unit, IniWriter *iw);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
|
||||
/** Finalize unit set-up */
|
||||
error_t USIPO_init(Unit *unit);
|
||||
|
||||
/** Tear down the unit */
|
||||
void USIPO_deInit(Unit *unit);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
|
||||
/**
|
||||
* Write a buffer to the pins.
|
||||
* Buffer contains data for the individual channels, sequentially (AAAAAA BBBBBB CCCCCC ...)
|
||||
* The bytes are sent LSB first, from the last byte (e.g. 1,2,3 - 3 is sent first, LSB-first).
|
||||
*
|
||||
* The chunks order is from the lowest to the highest bit
|
||||
*
|
||||
* @param unit
|
||||
* @param buffer - buffer of data to send
|
||||
* @param buflen - number of bytes in the buffer
|
||||
* @param terminal_data - data to set before sending the store pulse (final data lines state, will not appear in the SIPOs)
|
||||
* @return success
|
||||
*/
|
||||
error_t UU_SIPO_Write(Unit *unit, const uint8_t *buffer, uint16_t buflen, uint16_t terminal_data);
|
||||
|
||||
/**
|
||||
* Direct access to the output data pins (may be useful for debugging, or circuits that use them
|
||||
* for something else when not loading a new value).
|
||||
*
|
||||
* @param unit
|
||||
* @param data_packed - packed data to set on the output (right-aligned, highest to lowest pin)
|
||||
* @return success
|
||||
*/
|
||||
error_t UU_SIPO_DirectData(Unit *unit, uint16_t data_packed);
|
||||
|
||||
/**
|
||||
* Send a clear pulse.
|
||||
*
|
||||
* @param unit
|
||||
* @return success
|
||||
*/
|
||||
error_t UU_SIPO_DirectClear(Unit *unit);
|
||||
|
||||
/**
|
||||
* Send a shift pulse.
|
||||
*
|
||||
* @param unit
|
||||
* @return success
|
||||
*/
|
||||
error_t UU_SIPO_DirectShift(Unit *unit);
|
||||
|
||||
/**
|
||||
* Send a store pulse.
|
||||
*
|
||||
* @param unit
|
||||
* @return success
|
||||
*/
|
||||
error_t UU_SIPO_DirectStore(Unit *unit);
|
||||
|
||||
#endif //GEX_F072_SIPO_INTERNAL_H
|
||||
@@ -0,0 +1,116 @@
|
||||
//
|
||||
// Created by MightyPork on 2018/02/03.
|
||||
//
|
||||
|
||||
#include "platform.h"
|
||||
#include "unit_base.h"
|
||||
|
||||
#define SIPO_INTERNAL
|
||||
#include "_sipo_internal.h"
|
||||
|
||||
/** Load from a binary buffer stored in Flash */
|
||||
void USIPO_loadBinary(Unit *unit, PayloadParser *pp)
|
||||
{
|
||||
struct priv *priv = unit->data;
|
||||
|
||||
uint8_t version = pp_u8(pp);
|
||||
(void)version;
|
||||
|
||||
priv->cfg.pin_store = (Resource) pp_u8(pp);
|
||||
priv->cfg.store_pol = pp_bool(pp);
|
||||
|
||||
priv->cfg.pin_shift = (Resource) pp_u8(pp);
|
||||
priv->cfg.shift_pol = pp_bool(pp);
|
||||
|
||||
priv->cfg.pin_clear = (Resource) pp_u8(pp);
|
||||
priv->cfg.clear_pol = pp_bool(pp);
|
||||
|
||||
priv->cfg.data_pname = pp_char(pp);
|
||||
priv->cfg.data_pins = pp_u16(pp);
|
||||
}
|
||||
|
||||
/** Write to a binary buffer for storing in Flash */
|
||||
void USIPO_writeBinary(Unit *unit, PayloadBuilder *pb)
|
||||
{
|
||||
struct priv *priv = unit->data;
|
||||
|
||||
pb_u8(pb, 0); // version
|
||||
|
||||
pb_u8(pb, priv->cfg.pin_store);
|
||||
pb_bool(pb, priv->cfg.store_pol);
|
||||
|
||||
pb_u8(pb, priv->cfg.pin_shift);
|
||||
pb_bool(pb, priv->cfg.shift_pol);
|
||||
|
||||
pb_u8(pb, priv->cfg.pin_clear);
|
||||
pb_bool(pb, priv->cfg.clear_pol);
|
||||
|
||||
pb_char(pb, priv->cfg.data_pname);
|
||||
pb_u16(pb, priv->cfg.data_pins);
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
|
||||
/** Parse a key-value pair from the INI file */
|
||||
error_t USIPO_loadIni(Unit *unit, const char *key, const char *value)
|
||||
{
|
||||
bool suc = true;
|
||||
struct priv *priv = unit->data;
|
||||
|
||||
if (streq(key, "store-pin")) {
|
||||
priv->cfg.pin_store = cfg_pinrsc_parse(value, &suc);
|
||||
}
|
||||
else if (streq(key, "shift-pin")) {
|
||||
priv->cfg.pin_shift = cfg_pinrsc_parse(value, &suc);
|
||||
}
|
||||
else if (streq(key, "clear-pin")) {
|
||||
priv->cfg.pin_clear = cfg_pinrsc_parse(value, &suc);
|
||||
}
|
||||
|
||||
else if (streq(key, "store-pol")) {
|
||||
priv->cfg.store_pol = cfg_bool_parse(value, &suc);
|
||||
}
|
||||
else if (streq(key, "shift-pol")) {
|
||||
priv->cfg.shift_pol = cfg_bool_parse(value, &suc);
|
||||
}
|
||||
else if (streq(key, "clear-pol")) {
|
||||
priv->cfg.clear_pol = cfg_bool_parse(value, &suc);
|
||||
}
|
||||
|
||||
else if (streq(key, "data-port")) {
|
||||
suc = cfg_port_parse(value, &priv->cfg.data_pname);
|
||||
}
|
||||
else if (streq(key, "data-pins")) {
|
||||
priv->cfg.data_pins = cfg_pinmask_parse(value, &suc);
|
||||
}
|
||||
|
||||
else {
|
||||
return E_BAD_KEY;
|
||||
}
|
||||
|
||||
if (!suc) return E_BAD_VALUE;
|
||||
return E_SUCCESS;
|
||||
}
|
||||
|
||||
/** Generate INI file section for the unit */
|
||||
void USIPO_writeIni(Unit *unit, IniWriter *iw)
|
||||
{
|
||||
struct priv *priv = unit->data;
|
||||
|
||||
iw_comment(iw, "Shift pin & its active edge (1-rising,0-falling)");
|
||||
iw_entry_s(iw, "shift-pin", cfg_pinrsc_encode(priv->cfg.pin_shift));
|
||||
iw_entry_d(iw, "shift-pol", priv->cfg.shift_pol);
|
||||
|
||||
iw_comment(iw, "Store pin & its active edge");
|
||||
iw_entry_s(iw, "store-pin", cfg_pinrsc_encode(priv->cfg.pin_store));
|
||||
iw_entry_d(iw, "store-pol", priv->cfg.store_pol);
|
||||
|
||||
iw_comment(iw, "Clear pin & its active level");
|
||||
iw_entry_s(iw, "clear-pin", cfg_pinrsc_encode(priv->cfg.pin_clear));
|
||||
iw_entry_d(iw, "clear-pol", priv->cfg.clear_pol);
|
||||
|
||||
iw_comment(iw, "Data port and pins");
|
||||
iw_entry(iw, "data-port", "%c", priv->cfg.data_pname);
|
||||
iw_entry_s(iw, "data-pins", cfg_pinmask_encode(priv->cfg.data_pins, unit_tmp512, true));
|
||||
}
|
||||
|
||||
@@ -0,0 +1,73 @@
|
||||
//
|
||||
// Created by MightyPork on 2017/11/25.
|
||||
//
|
||||
|
||||
#include "unit_base.h"
|
||||
#include "unit_sipo.h"
|
||||
|
||||
#define SIPO_INTERNAL
|
||||
|
||||
#include "_sipo_internal.h"
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
|
||||
enum SipoCmd_ {
|
||||
CMD_WRITE = 0,
|
||||
CMD_DIRECT_DATA = 1,
|
||||
CMD_DIRECT_SHIFT = 2,
|
||||
CMD_DIRECT_CLEAR = 3,
|
||||
CMD_DIRECT_STORE = 4,
|
||||
};
|
||||
|
||||
/** Handle a request message */
|
||||
static error_t USIPO_handleRequest(Unit *unit, TF_ID frame_id, uint8_t command, PayloadParser *pp)
|
||||
{
|
||||
switch (command) {
|
||||
case CMD_WRITE:
|
||||
{
|
||||
uint32_t len;
|
||||
uint16_t terminal_packed = pp_u16(pp);
|
||||
const uint8_t *tail = pp_tail(pp, &len);
|
||||
TRY(UU_SIPO_Write(unit, (uint8_t *) tail, (uint16_t) len, terminal_packed));
|
||||
}
|
||||
return E_SUCCESS;
|
||||
|
||||
case CMD_DIRECT_DATA:
|
||||
TRY(UU_SIPO_DirectData(unit, pp_u16(pp)));
|
||||
return E_SUCCESS;
|
||||
|
||||
case CMD_DIRECT_CLEAR:
|
||||
TRY(UU_SIPO_DirectClear(unit));
|
||||
return E_SUCCESS;
|
||||
|
||||
case CMD_DIRECT_SHIFT:
|
||||
TRY(UU_SIPO_DirectShift(unit));
|
||||
return E_SUCCESS;
|
||||
|
||||
case CMD_DIRECT_STORE:
|
||||
TRY(UU_SIPO_DirectStore(unit));
|
||||
return E_SUCCESS;
|
||||
|
||||
default:
|
||||
return E_UNKNOWN_COMMAND;
|
||||
}
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
|
||||
/** Unit template */
|
||||
const UnitDriver UNIT_SIPO = {
|
||||
.name = "SIPO",
|
||||
.description = "Shift register driver (595, 4094)",
|
||||
// Settings
|
||||
.preInit = USIPO_preInit,
|
||||
.cfgLoadBinary = USIPO_loadBinary,
|
||||
.cfgWriteBinary = USIPO_writeBinary,
|
||||
.cfgLoadIni = USIPO_loadIni,
|
||||
.cfgWriteIni = USIPO_writeIni,
|
||||
// Init
|
||||
.init = USIPO_init,
|
||||
.deInit = USIPO_deInit,
|
||||
// Function
|
||||
.handleRequest = USIPO_handleRequest,
|
||||
};
|
||||
@@ -0,0 +1,16 @@
|
||||
//
|
||||
// Created by MightyPork on 2017/11/25.
|
||||
//
|
||||
// Digital input unit; single or multiple pin read access on one port (A-F)
|
||||
//
|
||||
|
||||
#ifndef U_SIPO_H
|
||||
#define U_SIPO_H
|
||||
|
||||
#include "unit.h"
|
||||
|
||||
extern const UnitDriver UNIT_SIPO;
|
||||
|
||||
// UU_ prototypes
|
||||
|
||||
#endif //U_SIPO_H
|
||||
Reference in New Issue
Block a user